Howto Use TSaveDialog/de: what changed
Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.
Title: Howto Use TSaveDialog/de
| Old | New | Line | |
|---|---|---|---|
| 1 | + | \ | |
| 2 | + | Zurück zu den [[Additional information/de|Zusätzlichen Informationen]].\ | |
| 3 | + | \ | |
| 4 | + | Wie man den TSaveDialog benutzt | |
| 5 | + | ||
| 6 | + | <figure> | |
| 7 | + | <img src="tsavedialog.png" title="tsavedialog.png" /> | |
| 8 | + | <figcaption>tsavedialog.png</figcaption> | |
| 9 | + | </figure> | |
| 10 | + | ||
| 11 | + | Einfache Richtlinie: : | |
| 12 | + | ||
| 13 | + | 1\. Legen Sie eine SaveDialog-Komponente auf Ihrem Formular ab (an einer beliebigen Stelle, weil es später unsichtbar ist). | |
| 14 | + | ||
| 15 | + | ` `\ | |
| 16 | + | ` (Es ist der zweite Dialog von links aus der `[[Dialogs tab|Komponentenseite 'Dialogs']]`)` | |
| 17 | + | ||
| 18 | + | 2\. Fügen Sie ein Memo in das Formular ein. | |
| 19 | + | ||
| 20 | + | <figure> | |
| 21 | + | <img src="tmemo.png" title="tmemo.png" /> | |
| 22 | + | <figcaption>tmemo.png</figcaption> | |
| 23 | + | </figure> | |
| 24 | + | ||
| 25 | + | 3\. Fügen Sie eine Schaltfläche in das Formular ein. | |
| 26 | + | ||
| 27 | + | <figure> | |
| 28 | + | <img src="tbutton.png" title="tbutton.png" /> | |
| 29 | + | <figcaption>tbutton.png</figcaption> | |
| 30 | + | </figure> | |
| 31 | + | ||
| 32 | + | Der [[IDE Window: Object Inspector|Objektinspector]] zeigt die Eigenschaften der Schaltfläche 'Button1' an. Ändern Sie die Eigenschaft 'Caption' vom angezeigten Wert 'Button1' zu 'Save'. Klicken Sie im Objektinspektor auf den Karteireiter 'Ereignisse'. Wählen Sie das Ereignis 'OnClick' aus: es erscheint ein kleiner Knopf mit drei Punkten (... Ellipsis). Klicken Sie darauf, dadurch kommen Sie automatisch zum Quelltexteditor und der Kursor steht an Anfang einer Codestelle. Ergänzen Sie folgenden Code: | |
| 33 | + | ||
| 34 | + | ``` pascal | |
| 35 | + | procedure TForm1.Button1Click( Sender: TObject ); | |
| 36 | + | begin | |
| 37 | + | if SaveDialog1.Execute then | |
| 38 | + | Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | |
| 39 | + | end; | |
| 40 | + | ``` | |
| 41 | + | ||
| 42 | + | Die Methode [[doc:lcl/dialogs/tcommondialog.execute.html|Execute]] zeigt den Dialog 'Datei speichern' an. Sie liefert [[True|true]] zurück, wenn der Benutzer eine Datei ausgewählt hat, [[False|false]], wenn der Benutzer den Dialog abgebrochen hat. | |
| 43 | + | ||
| 44 | + | Die Eigenschaft [[doc:lcl/dialogs/tfiledialog.filename.html|Filename]] gibt den vollständigen Dateinamen inklusive Laufwerk und Pfad zurück. | |
| 45 | + | ||
| 46 | + | ## Siehe auch | |
| 47 | + | ||
| 48 | + | - [[Howto Use TOpenDialog/de]] | |
| 49 | + | - [[Dialogs tab]] | |
| 50 | + | - [[Standard tab|TButton]] | |
| 51 | + | - [[Standard tab|TMemo]] | |
| 52 | + | ||
| 53 | + | --- | |
| 54 | + | *From the Free Pascal wiki, page "Howto Use TSaveDialog/de", as it stood on 2020-02-17 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* |