コーディングしたprocedure内でVCLの補完が上手く効きません

解決

もも 2009-08-05 23:16:03 No: 35347

いつもお世話になります。
  procedureで独自の関数を定コーディングしていますが、作成したprocedure内でVCLの補完機能を使うと、Form1から選択しないとコーディングが出来ません。通常、ボタンなどコンポーネントのprocedure内のようにEdit1.Textなど短縮した形式でコーディングするにはどうしたらよいのでしょうか？
  implementationより上のどこかに定義する必要があるのでしょうか？
  どなかご教授をお願い致します。

めそっど 2009-08-06 00:13:13 No: 35348

Form1.Edit1.Textじゃなくて、Edit1.Textのように書きたいってこと？
それなら、その独自関数をTForm1クラスのメソッドにしなくちゃね。
あるいは、
  with Form1 do begin
    Edit1.Text := .....
    .........
  end;
とか。

もも 2009-08-06 00:18:06 No: 35349

めそっど様

>Form1.Edit1.Textじゃなくて、Edit1.Textのように書きたいってこと？

はい。そういうことです。
どうすればよいでしょうか？

もも 2009-08-06 00:42:11 No: 35350

procedure・・・をpublicに定義すると上手く行きました。
他のコンポーネントと同様にTForm1.を頭に付けないとダメですね。

ありがとうございました。(m_m)