Howto Use TSaveDialog/ja

TSaveDialog の使い方

簡単な説明:

1. SaveDialogをFormに配置します。（アイコンは実行時には表示されませんので、Form上のどこにおいても大丈夫です。）

 Image:Component_Palette_Dialogs.png
 (SaveDialogは「Dialog」タブの左から2番目)

2. memoをformに配置します。

3. buttonをformに配置します。

オブジェクトインスペクタに Button1のプロパティが表示されるので, 'Caption'を'Save'に変更します。 オブジェクトインスペクタのイベントタブをクリックし、OnClick の右側のボックスをクリックしてください。 3つのドット(...)が表示されたさらに小さいboxが表れますので、クリックすると自動的にソースエディタのコーディングするべき場所にカーソルが移動します。

４. 下記を参考にコーディングします。

 procedure TForm1.Button1Click( Sender: TObject );
 begin
   if SaveDialog1.Execute then
    Memo1.Lines.SaveToFile( SaveDialog1.Filename );
 end;

Execute メソッドによりファイルを保存するダイアログが表示されます。 ファイルが選ばれたときはtrueが返値となり、キャンセルしたときはfalseが返値となります。

Filename プロパティは、ドライブ名とパスを含んだファイル名（ファイルへのフルパス） を返り値とします。

関連項目

• TOpenDialog の使い方
• Dialog タブ
• TButton
• TMemo

From the Free Pascal wiki, page "Howto Use TSaveDialog/ja", 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.