名前
題名
▼ Mr.XRAYさん > このことに関連する，当サイトの記事は以下の通りです． > > 他のフォームを使用する関係は， > [122_複数のフォームを使用するプロジェクト ( 入門者用 ) ] > http://mrxray.on.coocan.jp/Delphi/plSamples/122_PluralForms.htm > > クラスのメンバとしての関数類を書く場所 > http://mrxray.on.coocan.jp/Delphi/Others/A_UltraIntro01.htm#list1 > > [特別な領域] の設定は，拡張子が .dfm のファイルに保存される > [特別な領域を dfm ファイルで確認] > http://mrxray.on.coocan.jp/Delphi/Others/A_UltraIntro01.htm#07 > > クラスのメンバーのメソッドや関数作成でタイプミス防止 > [関数等の宣言文から実装部 ( スケルトン ) を作成 - クラス補完] > http://mrxray.on.coocan.jp/Delphi/Others/A_IDETechnique.htm#02 > > > -------------- 質問者が提示したコード ----------------------------- > type > TForm2 = class(TForm) > Name: TEdit; > function moji:String; > private > { Private 宣言 } > public > { Public 宣言 } > end; > > var > Form2: TForm2; > > implementation > > {$R *.dfm} > > { TForm2 } > > function moji: String; > begin > Name.Text := 'test'; > Result := Name.Text; > end; > > 質問者が提示したコードは上のようになっています． > もし，function moji: String; をグローバルに使用するというのであれば， > 以下のように書けます． > ただし，質問者の意図は不明です． > この関数をクラスのメンバとして，使いたいのか，グローバルな関数として > 使いたいのか． > > type > TForm2 = class(TForm) > Name: TEdit; > private > { Private 宣言 } > public > { Public 宣言 } > end; > > function moji: String; // ここに書くとグローバルになる > > var > Form2: TForm2; > > implementation > > {$R *.dfm} > > { TForm2 } > > function moji: String; > begin > //function moji は Form2 のメンバではないので Form2 が必要 > //Name(TEdit)はForm2 のメンバ > Form2.Name.Text := 'test'; > Result := Form2.Name.Text; > end;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link