Difference between revisions of "Howto Use TSaveDialog"
(Removed a wrong statement. The dialog does in fact have an option to check that a file already exists) |
|||
Line 1: | Line 1: | ||
{{Howto Use TSaveDialog}} | {{Howto Use TSaveDialog}} | ||
− | |||
− | |||
[[Image:tsavedialog.png]] | [[Image:tsavedialog.png]] | ||
Line 7: | Line 5: | ||
Simple guideline: | Simple guideline: | ||
− | + | # Place the SaveDialog widget [[Image:tsavedialog.png]] on your [[TForm|form]] (anyplace, since it will be not visible). <br /> [[Image:Component_Palette_Dialogs.png]] <br /> (It is the second left dialog under [[Dialogs tab]]) | |
− | + | # Add a [[TMemo|memo]] [[Image:tmemo.png]] in the form. | |
− | + | # Add a [[TButton|button]] [[Image:tbutton.png]] in the form. | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
The [[IDE_Window:_Object_Inspector|Object Inspector]] will display the properties of the object Button1. | The [[IDE_Window:_Object_Inspector|Object Inspector]] will display the properties of the object Button1. | ||
− | Change a property named 'Caption', with the displayed value 'Button1' to 'Save'. | + | Change a [[Property|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: | + | 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, | a smaller box with three dots (... ellipsis) appears. Click on this, | ||
you are taken automatically into the Source Editor and your cursor will be | you are taken automatically into the Source Editor and your cursor will be | ||
placed in a piece of code starting. Completion code: | placed in a piece of code starting. Completion code: | ||
− | + | <syntaxhighlight lang="pascal"> | |
− | <syntaxhighlight> | + | |
− | procedure TForm1.Button1Click( Sender: TObject ); | + | procedure TForm1.Button1Click( Sender: TObject ); |
begin | begin | ||
if SaveDialog1.Execute then | if SaveDialog1.Execute then | ||
Line 36: | Line 26: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
− | The [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] method displays the file save dialog. It returns [[True|true]] when user has selected a file, [[False|false]] when user has aborted. | + | The [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] [[Method|method]] displays the file save dialog. It returns [[True|true]] when user has selected a file, [[False|false]] when user has aborted. |
The [[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] property returns the full filename including drive and path. | The [[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] property returns the full filename including drive and path. | ||
− | + | {{Note| This control only collects the filename. It does not actually open the file for writing. Your code must do that.}} | |
== See also == | == See also == | ||
* [[Howto Use TOpenDialog]] | * [[Howto Use TOpenDialog]] | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− |
Revision as of 20:52, 27 August 2019
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
Simple guideline:
- Place the SaveDialog widget on your form (anyplace, since it will be not visible).
(It is the second left dialog under Dialogs tab) - Add a memo in the form.
- 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:
procedure TForm1.Button1Click( Sender: TObject );
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile( SaveDialog1.Filename );
end;
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.