delphi4arab منتديات دلفي للعرب
كيف انقل مجموعة منteditالى form جديد - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف انقل مجموعة منteditالى form جديد (/showthread.php?tid=8242)



كيف انقل مجموعة منteditالى form جديد - jeanjamil - 20-11-2016

السلام عليكم
كيف انقل مجموعة منteditالى form جديد
واظهارها بطريقة متناسقة
وعند اغلاق النموذج الجديد اعيدها الى النموذج الاول
var
  i: integer;
begin
  for i := 0 to (ComponentCount - 1) do
    if (Components[i] is TEdit)and (components[i].Tag=1) then
      TEdit(Components[i]).parent := form2;
هذا الكود لا يظهرها متناسقة
ولا استطيع اعادتها الى ما كانت عليه
لا اعلم السبب


RE: كيف انقل مجموعة منteditالى form جديد - mobile - 20-11-2016

وعليكم السلام ورحمة الله
ضعهم كلهم في tpanel واكتفي بنقل البانل فقط
او في حالتك يجب في كل Tcomponents[i] تحديد top and Left للمكون