Board index » delphi » Change THedit To TLabel

Change THedit To TLabel

i will To Make A Thedit To Tlabel on Enter And OnExit
On Enter = THedit
On Exit = TLabel

Example

Procedure edit1On Exit
begin
  edit1.borderstyle := bsnone <<---- << not work
end;

Procedure Edit1onenter
begin
  edit1.borderstyle := bssingle <<---- << not work
end;

Please help me.

Thanks.
efig...@geocisies.com

 

Re:Change THedit To TLabel


It should work like that... Maybe you should change the property
Ctl3D as well. Not that you edit might flicker and you might loose
the cursor because a call to ReCreateWindow is done by the VCL
when you change one of those properties.

Good luck and regards
Jacco

Other Threads