Difference between revisions of "Howto Use TSaveDialog/ja"

From Free Pascal wiki
Jump to navigationJump to search
(New page: {{Howto Use TSaveDialog}} {{Japanese Menu}} Image:tsavedialog.png シンプルなガイドライン: 1. SaveDialogのウィジェットをFormに配置する(不可視のウィ...)
 
Line 44: Line 44:
  
 
* [[Howto Use TOpenDialog/ja|TOpenDialogの使い方]]
 
* [[Howto Use TOpenDialog/ja|TOpenDialogの使い方]]
* [[Dialogs_tab#TSaveDialog/ja| TSaveDialog]]
+
* [[Dialogs_tab| Dialog タブ]]
 
* [[Standard_tab#TButton/ja| TButton]]
 
* [[Standard_tab#TButton/ja| TButton]]
 
* [[Standard_tab#TMemo/ja| TMemo]]
 
* [[Standard_tab#TMemo/ja| 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)

日本語版メニュー
メインページ - Lazarus Documentation日本語版 - 翻訳ノート - 日本語障害情報

tsavedialog.png

シンプルなガイドライン:

1. SaveDialogのウィジェットをFormに配置する(不可視のウィジェットであり、Form上の位置はどこでもよい).

 Component Palette Dialogs.png
 (SaveDialogは「Dialog」タブの中の左から2番目にある。)


2. memoをformに配置する.

tmemo.png


3. buttonをformに配置する.

tbutton.png

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 プロパティは,ドライブ名とパスを含んだファイル名(ファイルへのフルパス) を返り値とする.

See also