TEdit To Button then Form Caption

Submitted by:Tim Kelly

Date added:31 May, 2011

Category:Pascal

Here are the code for TEdit To Button then Form Caption

Tags: form caption

Code Snippet:

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

Comments