كيف اقوم بتشغيل فورم اشأته برمجياً في كل مرة يعمل البرنامح بها
#1
السلآم عليكم ورحمة الله وبركاته ...

ماهي طريقة تشغيل فورم انشأته برمجياً بهذه الطريقة :

PHP كود :
var
  
i: integer;
  
F:TForm5;
begin
 F 
:= TForm5.Create(nil);
  
f.Name:='R'+se1.Text;
  
f.Sr1.Port:=se1.Value;
  
f.Sr1.ThreadCacheSize:=strToint(cbb1.Text);
  
f.Sr2.Port:=se1.Value+1;
  
f.Sr2.ThreadCacheSize:=strToint(cbb1.Text);
  
f.Sr3.Port:=se1.Value+2;
  
f.Sr3.ThreadCacheSize:=strToint(cbb1.Text);
  
f.n1.Port:=se1.Value+3;
  
f.n1.ThreadCacheSize:=strToint(cbb1.Text);
  
f.n2.Port:=se1.Value+4;
  
f.n2.ThreadCacheSize:=strToint(cbb1.Text);
  
f.Sr1.Active:=True;
  
f.Sr2.Active:=True;
  
f.Sr3.Active:=True;
  
f.n1.Active:=True;
  
f.n2.Active:=True;
  
f.ClE3.Text:=Edit1.Text;
  
f.cl2.Text:=Edit2.Text;
  
f.tsNt.Caption:=Ow1.Text;
  
f.Caption:=Ow1.Text;
  
f.Ow1.Text:='0';
  
f.Eedt1.Text:='<Center> Welcom To  Chat'+' - ' + Ow1.Text;
  
f.se1.Value:=se1.Value;
  
f.ClE2.Text:=cbb1.Text;
  
f.Show;
end; 

وادرجت له كود حفظ بصيغة Sav لكن المشكلة انه لايعمل عند اغلاق البرنامج وتشغيله مرة اخرى

فما الحل برأيكم ؟

اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت

فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم
الرد


الردود في هذا الموضوع
كيف اقوم بتشغيل فورم اشأته برمجياً في كل مرة يعمل البرنامح بها - بواسطة M_Mori2010 - 12-10-2012, 07:43 PM

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم