Как динамически добавить Мемо на форму? Динамическое создание компонентов!

[werser]

Как динамически добавить Мемо на форму??

begin
inc(x);
with TMemo.Create(Self) do
begin
Name:='Memo'+inttostr(x);
Parent:=form1;
top:=50+30*x;
left:=100;
end;

Возле переменной Self выдаёт ошибку [Error] Unit1.pas(42): Undeclared identifier: 'Self'

Помогите пожалуйста!! Как создать Мемо динамически???
Этим способом создаю Button, label, Edit а Мемо не создаётся!!!

[werser]

Всё разобрался сам!