Howto Use TSaveDialog/ja
From Free Pascal wiki
Revision as of 03:23, 5 July 2008 by Miyatakejiro (talk | contribs) (New page: {{Howto Use TSaveDialog}} {{Japanese Menu}} Image:tsavedialog.png シンプルなガイドライン: 1. SaveDialogのウィジェットをFormに配置する(不可視のウィ...)
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
日本語 (ja) │
polski (pl) │
русский (ru) │
slovenčina (sk) │
シンプルなガイドライン:
1. SaveDialogのウィジェットをFormに配置する(不可視のウィジェットであり、Form上の位置はどこでもよい).
(SaveDialogは「Dialog」タブの中の左から2番目にある。)
2. memoをformに配置する.
3. buttonをformに配置する.
Object Inspector に Button1のプロパティが表示されるので, 'Caption'を'Save'に変更する. Object Inspectorのイベントタブをクリックし, OnClick の右側のボックスをクリックする.: 3つのドット(... ellipsis)が表示されたさらに小さいboxが表れるので, クリックすると,自動的に Source Editor のコーディングするべき場所にカーソルが移動する. Completion code:
2. 下記を参考にコーディングする。
<delphi>
procedure TForm1.Button1Click( Sender: TObject ); begin if SaveDialog1.Execute then Memo1.Lines.SaveToFile( SaveDialog1.Filename ); end;
</delphi>
Execute メソッドによりfile save dialogが表示される. ファイルが選ばれたときはtrueが返値となり, 中止したときはfalseが返値となる.
Filename プロパティは,ドライブ名とパスを含んだファイル名(ファイルへのフルパス) を返り値とする.