Adding TLabel to form - Noobie Delphi User

[new person]

Hi, im kind of new to delphi and i have a small problem.
i would like it so when you click a button on the botton of the screen, a Tlabel would appear at the top of the screen, and if you click it again, another would appear below it, and so on.

ive tried this myself a few times, but i dont have a clue and just get errors.

thanks alot

[Harry Hunt]

Off the back of my head

[pascal]
var
LastLabelIndex: Integer;

procedure Button1Click(Sender: TObject);
begin
with TLabel.Create(Form1) do
begin
Parent := Form1;
Caption := 'Hello World';
Visible := True;
Left := 10;
Top := LastLabelIndex * 20;
Name := 'NewLabel' + IntToStr(LastLabelIndex);
end;

Inc(LastLabelIndex);
end;
[/pascal]

[new person]

thanks!

[new user]

sorry for bein a bother, but how could i make it so when i clicked on one of the labels, something would happen like:
showmessage('hello')
thanks again

[Harry Hunt]

sorry for bein a bother, but how could i make it so when i clicked on one of the labels, something would happen like:
showmessage('hello')
thanks again

[pascal]TForm1 = class(TForm)
private
procedure MyEvent(Sender: TObject);
public
...
end;

procedure TForm1.MyEvent(Sender: TObject);
begin
if Sender is TLabel begin
ShowMessage((Sender as TLabel).Caption);
end;
end;
[/pascal]

Upon creating the label

[pascal]
with TLabel.Create(Form1)
begin
...
OnClick := MyEvent;
...
end;
[/pascal]