Динамическое создание компонентов Delphi 7

[Fotal]

Привет всем! Проблема вот в чем, нужно создать компонент и присвоить ему все свойства и события родителя. Точно не знаю как правильно выразиться. Если быть точным, то у меня на форме есть RichEdit, после определенного действия мне нужно создать точно такой же RichEdit со всеми свойствами.

Inc(n);
REdit := TRichEdit.Create(Form1.ScrollBox1);
REdit.Parent := Form1.ScrollBox1;
REdit.Left:= Form1.RichEdit1.Left;
REdit.Top:= Form1.RichEdit1.Top*n + Form1.RichEdit1.Height*(n-1);
REdit.Height:= Form1.RichEdit1.Height;;
REdit.Width:= Form1.RichEdit1.Width;

Пробовал через задания родителя, т.е REdit.Parent:= Form1.RichEdit1; , но компонент создается на RichEdit1 и значение REdit.Top не влияет ни на что. Помогите с проблемой.

[kropotkina-alice]

Клонирование объекта:
http://delphi.chertenok.ru/text/stat17.shtml
Тут это тоже обсуждалось:
http://www.programmersforum.ru/showthread.php?t=119280