Editをマウスでクリックした時に反転表示したいのですができません。
Memoではできるのですが・・・。
どなたかご教授お願いします。
以前作ったプログラムで
実現できなかったので
私は以下のようにしました。
procedure TForm1.Edit1Click(Sender: TObject);
begin
Edit2.SetFocus;
Edit1.SetFocus;
end;
procedure TForm1.Edit2Click(Sender: TObject);
begin
edit1.SetFocus;
Edit2.SetFocus;
end;
一度他のオブジェクトにフォーカスを移動し
再度フォーカスを得るものです。
もっといい方法がありそうな気がするのですが・・・・・。
SelectAllメソッドですね。
にしのさん、ありがとうございます。
いつも掲示板で拝見さしていただいていますが、ほんとに色々と勉強になります。
ありがとうございました!
ツイート | ![]() |