child کردن یک شی یا یک فرم

[joooje]

سلام
آیا روشی وجود داره که بشه یک دکمه یا یک فرمی رو که بعد از اجرای برنامه میسازیم به غیر از راه parent کردن بچه یک فرم والد دیگه بکنیم؟
من نمیخوام از کد زیر استفاده بکنم



procedure TForm1.Button1Click(Sender: TObject);
var
Object1 : TForm1 ;
begin
Object1 := TForm1.Create(self);
Object1.Parent := FindControl(Form1.Handle);
Object1.Show ;
end;


چون وقتی از کامپوننتVCL Skin استفاده میکنم فرم ساخته شده (فرم جدیدی که ساخته میشه ) رو تغییر skin نمیده
انگار این کامپوننت با اشیا یا فرمهایی که تو فرم اصلی parent بشن سازگاری نداره، یا من بلد نیستم تنظیماتش رو چه کار کنم
ممنون میشم راهنمایی کنید

[Mahmood_M]

راستش منظورتون واضح نیست ! ، شما یک فرم می سازید و Parent اش رو خود فرم قرار میدید ؟!
هدفتون رو ذکر کنید تا راه حل ارایه بشه ...

[joooje]

بله
همینطور هست که فرمودید. میخوام یه فرم درون فرم اصلی ایجاد کنم بدون استفاده از دستورParent
یا مثلا کد می تونست اینطور باشه، چون هدفم تنها فرم نیست:


procedure TForm1.Button1Click(Sender: TObject);
var
Object1 : TButton ;
begin
Object1 := TButton.Create(self);
Object1.Parent := FindControl(Form1.Handle);
Object1.Show ;
end;
من میخوام که یه فرم یا یه شی رو بدون استفاده از دستور Parent ، بچه ی یه فرم والد کنم.