[delphi6]dynamiczne teorzenie memo

Jak stowrzyc dynamicznie komponent memo?
chodzi mi o takie cos:
naciskam button ktury dodaje mi komponent memo.
Tak zeby liczba tych komponentow byla nieograniczona.( przynajmniej 20)
ale zeby podczas projektowania programu dodac do formy tylko 1 komponent.

Może tak:

var
NewMemo: TMemo;
begin
NewMemo:=TMemo.Create(Form1);
NewMemo.Parent:=Form1;
// ta linijka jest chyba niepotrzebna, ale nie jestem pewien:
Form1.Componnents.Add(NewMemo);

with NewMemo do begin
Left:=...
Top:=....
...
end
end;--Vogel [Delphi 6 PE]

I TY możesz nauczyć się grać w bierki!

Memo mozesz stworzyc w ten sposob:

var
Memo : TMemo;
begin
Memo := TMemo.Create(Self);
with Memo do
begin
Parent := Self;
SetBounds(10,10,100,100);
Lines.Text := 'jakis text w memo';
end;
end;---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-