Difference between revisions of "Howto Use TSaveDialog"
Miyatakejiro (talk | contribs) |
|||
Line 43: | Line 43: | ||
* [[Howto Use TOpenDialog]] | * [[Howto Use TOpenDialog]] | ||
− | * [[Dialogs_tab | + | * [[Dialogs_tab| Dialogs tab]] |
* [[Standard_tab#TButton| TButton]] | * [[Standard_tab#TButton| TButton]] | ||
* [[Standard_tab#TMemo| TMemo]] | * [[Standard_tab#TMemo| TMemo]] |
Revision as of 02:54, 23 May 2009
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
Howto Use TSaveDialog
Simple guideline:
1. Place the SaveDialog widget on your form (anyplace, since it will be not visible).
(It is the second left dialog under Dialogs tab)
2. Add a memo in the form.
3. Add a button in the form.
The Object Inspector will display the properties of the object Button1. Change a property named 'Caption', with the displayed value 'Button1' to 'Save'. Click on the Events tab on the Object Inspector.Select the box to the right of OnClick: a smaller box with three dots (... ellipsis) appears. Click on this, you are taken automatically into the Source Editor and your cursor will be placed in a piece of code starting. Completion code:
<delphi>
procedure TForm1.Button1Click( Sender: TObject ); begin if SaveDialog1.Execute then Memo1.Lines.SaveToFile( SaveDialog1.Filename ); end;
</delphi>
The Execute method displays the file save dialog. It returns true when user has selected a file, false when user has aborted.
The Filename property returns the full filename including drive and path