advanced code snippet search

Posted By

itguy51 on 08/01/10


Tagged


Versions (?)

TEdit To Button then Form Caption

 / Published in: Pascal
 
Expand | Embed | Plain Text 
  1. procedure TForm1.Button1Click(Sender: TObject);
  2. begin
  3. Button1.Caption := Edit1.Text;
  4. Self.Caption := Button1.Caption
  5. end;

Report this snippet  

You need to login to post a comment.