Difference between revisions of "Howto Use TSaveDialog/de"
m |
m (Fixed syntax highlighting; deleted category included in page template) |
||
| (3 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
{{Howto Use TSaveDialog}} | {{Howto Use TSaveDialog}} | ||
| − | + | <br> | |
| + | Zurück zu den [[Additional information/de|Zusätzlichen Informationen]].<br> | ||
| + | <br> | ||
Wie man den TSaveDialog benutzt | Wie man den TSaveDialog benutzt | ||
| Line 28: | Line 30: | ||
Ergänzen Sie folgenden Code: | Ergänzen Sie folgenden Code: | ||
| − | < | + | <syntaxhighlight lang=pascal> |
procedure TForm1.Button1Click( Sender: TObject ); | procedure TForm1.Button1Click( Sender: TObject ); | ||
begin | begin | ||
| Line 34: | Line 36: | ||
Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | ||
end; | end; | ||
| − | </ | + | </syntaxhighlight> |
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. | 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. | ||
Latest revision as of 08:51, 17 February 2020
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
Zurück zu den Zusätzlichen Informationen.
Wie man den TSaveDialog benutzt
Einfache Richtlinie: :
1. Legen Sie eine SaveDialog-Komponente auf Ihrem Formular ab (an einer beliebigen Stelle, weil es später unsichtbar ist).
(Es ist der zweite Dialog von links aus der Komponentenseite 'Dialogs')
2. Fügen Sie ein Memo in das Formular ein.
3. Fügen Sie eine Schaltfläche in das Formular ein.
Der 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:
procedure TForm1.Button1Click( Sender: TObject );
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile( SaveDialog1.Filename );
end;
Die Methode Execute zeigt den Dialog 'Datei speichern' an. Sie liefert true zurück, wenn der Benutzer eine Datei ausgewählt hat, false, wenn der Benutzer den Dialog abgebrochen hat.
Die Eigenschaft Filename gibt den vollständigen Dateinamen inklusive Laufwerk und Pfad zurück.
