Posted By

itguy51 on 08/01/10


Tagged


Versions (?)

TEdit To Button then Form Caption


 / Published in: Pascal
 

  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.