Delphi 4 in 21 days exercise day2

[Saarg]

Har litt problemer med å få til Exercise 1 på day 2.

Her er oppgaven:

Write a procedure called Test2 that changes the caption of a Label component. Put a button on a form and have the button's OnClick handler call the Test2 procedure.

 

Kan noen vise meg hvordan denne skal løses eller komme med noen hint?

 

Fortvilet Delphi newbie

[DidzisK]

type
 TForm1 = class(TForm)
   Label1: TLabel;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   procedure Test2;
 public
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
 Test2;
end;

procedure TForm1.Test2;
begin
 Label1.Caption:='My caption';
end;

[Saarg]

Takker så mye. Da så jeg endelig lyset