イベントを二つ指定するには？

解決

sdwet 2009-03-20 12:56:11 No: 33721 IP: 192.*.*.*

ボタンなどのOnClickなどのイベントを二つ以上割り当てるにはどうすればよいのでしょうか

んん？ 2009-03-20 13:01:17 No: 33722 IP: 192.*.*.*

何のためにそんな必要があるのかな？

sdwet 2009-03-20 13:08:33 No: 33723 IP: 192.*.*.*

えーっと・・・
今Editを並べてデータを入力するようなソフトを作っています
OnChangeで
決められた数以上を入力した場合は上限に戻る、ということと
入力するたびにデータを配列変数に代入する、ということをしたいのです

いくつかのEditにはすでに他のonChangeが割り当てられていてこの二つを指定することが出来ないのです

ちょっと変な文になっちゃいましたね・・・

編集削除

KHE00221 2009-03-20 13:58:11 No: 33724 IP: 192.*.*.*

>決められた数以上を入力した場合は上限に戻る、ということと
>入力するたびにデータを配列変数に代入する、ということをしたいのです

を必要とする Edit のみ

>いくつかのEditにはすでに他のonChangeが割り当てられていてこの二つを指定することが出来ないのです

この OnChange の内容と

>決められた数以上を入力した場合は上限に戻る、ということと
>入力するたびにデータを配列変数に代入する、ということをしたいのです

を組み込んだ OnChange に変更して下さい。

編集削除

・・・ 2009-03-20 14:40:58 No: 33725 IP: 192.*.*.*

procedure TForm1.Edit1Change(Sender: TObject);
begin
  //いろいろ
  TEdit(Sender).Text := ほにゃらら
end;

procedure TForm1.Edit2Change(Sender: TObject);
begin
  //いろいろ
  Edit1Change(Sender);
  //いろいろ
end;

ということか？

編集削除

sdwet 2009-03-20 15:13:46 No: 33726 IP: 192.*.*.*

なるほど
二つ指定することは出来ないんですね
・・・さんの方法でやってみます
ありがとうございました

編集削除

sdwet 2009-03-20 16:30:50 No: 33727 IP: 192.*.*.*

解決にチェックするのを忘れてました

編集削除