Difference between revisions of "Howto Use TSaveDialog/ja"
From Free Pascal wiki
Jump to navigationJump to searchMiyatakejiro (talk | contribs) |
m (Fixed syntax highlighting; deleted category included in page template) |
||
(2 intermediate revisions by 2 users not shown) | |||
Line 2: | Line 2: | ||
{{Japanese Menu}} | {{Japanese Menu}} | ||
+ | |||
+ | TSaveDialog の使い方 | ||
[[Image:tsavedialog.png]] | [[Image:tsavedialog.png]] | ||
Line 21: | Line 23: | ||
[[Image:tbutton.png]] | [[Image:tbutton.png]] | ||
− | + | オブジェクトインスペクタに Button1のプロパティが表示されるので, 'Caption'を'Save'に変更します。 | |
− | + | オブジェクトインスペクタのイベントタブをクリックし、OnClick の右側のボックスをクリックしてください。 3つのドット(...)が表示されたさらに小さいboxが表れますので、クリックすると自動的にソースエディタのコーディングするべき場所にカーソルが移動します。 | |
4. 下記を参考にコーディングします。 | 4. 下記を参考にコーディングします。 | ||
− | < | + | <syntaxhighlight lang=pascal> |
procedure TForm1.Button1Click( Sender: TObject ); | procedure TForm1.Button1Click( Sender: TObject ); | ||
begin | begin | ||
Line 32: | Line 34: | ||
Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | Memo1.Lines.SaveToFile( SaveDialog1.Filename ); | ||
end; | end; | ||
− | </ | + | </syntaxhighlight> |
− | [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] | + | [[doc:lcl/dialogs/tcommondialog.execute.html | Execute]] メソッドによりファイルを保存するダイアログが表示されます。 ファイルが選ばれたときは[[True|true]]が返値となり、キャンセルしたときは[[False|false]]が返値となります。 |
[[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] プロパティは、ドライブ名とパスを含んだファイル名(ファイルへのフルパス) を返り値とします。 | [[doc:lcl/dialogs/tfiledialog.filename.html | Filename]] プロパティは、ドライブ名とパスを含んだファイル名(ファイルへのフルパス) を返り値とします。 | ||
− | == | + | ==関連項目== |
* [[Howto Use TOpenDialog/ja|TOpenDialog の使い方]] | * [[Howto Use TOpenDialog/ja|TOpenDialog の使い方]] |
Latest revision as of 08:52, 17 February 2020
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
TSaveDialog の使い方
簡単な説明:
1. SaveDialogをFormに配置します。(アイコンは実行時には表示されませんので、Form上のどこにおいても大丈夫です。)
(SaveDialogは「Dialog」タブの左から2番目)
2. memoをformに配置します。
3. buttonをformに配置します。
オブジェクトインスペクタに Button1のプロパティが表示されるので, 'Caption'を'Save'に変更します。 オブジェクトインスペクタのイベントタブをクリックし、OnClick の右側のボックスをクリックしてください。 3つのドット(...)が表示されたさらに小さいboxが表れますので、クリックすると自動的にソースエディタのコーディングするべき場所にカーソルが移動します。
4. 下記を参考にコーディングします。
procedure TForm1.Button1Click( Sender: TObject );
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile( SaveDialog1.Filename );
end;
Execute メソッドによりファイルを保存するダイアログが表示されます。 ファイルが選ばれたときはtrueが返値となり、キャンセルしたときはfalseが返値となります。
Filename プロパティは、ドライブ名とパスを含んだファイル名(ファイルへのフルパス) を返り値とします。