Posted By

itguy51 on 08/01/10

Tagged

Viewed 691 times

Favorited by 0 user(s)

/ Published in: Pascal

Expand | Embed | Plain Text

Copy this code and paste it in your HTML

procedure TForm1.Button1Click(Sender: TObject);
begin
Button1.Caption := Edit1.Text;
Self.Caption := Button1.Caption
end;

Comment:

You need to login to post a comment.