PDA

View Full Version : پاک کردن اجزا فرم



majid2230
شنبه 24 بهمن 1388, 04:00 صبح
سلام
من یه فرمی رو با کد در زمان اجرا ایجاد کردم و parent اون رو یه پنل قرار دادم و بعد با کد یه سری آبجکت(عکس)روی اون قرار دادم .حالا سوال من اینه چه جوری می شه این اجزا رو پاک کرد(نام هر کدوم و نام فرم ایجاد شده به صورت رشته وجود دارد)
ممنون

Felony
شنبه 24 بهمن 1388, 06:16 صبح
اگر میخواین تمام اشیاء ساخته شده روی فرم مورد نظر رو آزاد کنید :


var
i: Integer;
begin
for i:= Form1.ComponentCount-1 downto 0 do
Form1.Components[i].Free;

اگر میخواین اشیاء روی پنل رو پاک کنید :


var
i: Integer;
begin
for i:= Panel1.ControlCount-1 downto 0 do
Panel1.Controls[i].Free;

اگر میخواین کامپوننت مورد نظرتون رو که نامش رو دارید آزاد کنید :


FindComponent('Component Name').Free;