（Delphi5） Edit または Panel をブリンクさせるには？

入力位置を分かりやすくするために、FocusがあるEdit Boxをブリンクさせたいのですが可能でしょうか？
Edit Boxがだめなら、Panelのブリンクでもいいので、何かいい方法があったら教えて下さい。

No.1 ベストアンサー 回答者： hana-hana3 回答日時： 2004/03/15 22:27

基本的にはイベントが無いと何も起きないので、タイマーを使って点滅処理させる方法があります。

この回答へのお礼

回答ありがとうございます。
タイマーを使って、Colorの設定を変えればできそうですね。試しにやってみます！

お礼日時：2004/03/15 22:51

No.2 回答者： ABC_DES 回答日時： 2004/03/16 01:00

ブリンクはタイマを使う必要があり、チラツキが気になるかも知れませんね

フォーカスが有るときだけ色を変えるというのであれば単純にできそうな気がしますね

Editコンポーネントであれば、TEditを継承したコンポーネントを自作して、
protected
procedure DoEnter; override;
procedure DoExit; override;
を定義して、DoEnterで色を設定して、DoExitで元にもどしてあげれば良いでしょう
ま、これだけのことでもいろいろ調整は必要でしょうが．．．

この回答へのお礼

回答ありがとうございました。
少し詳しくお話しますと、入力項目が多数あり、フォーカスがある時には色を変え、さらに、特殊な入力を行う項目は（今回の場合、バーコード入力です）ブリンクさせる・・・というようなことを考えています。色を変えることについては参考にさせていただきます。

お礼日時：2004/03/16 11:54