كيف انقل مجموعة منteditالى form جديد
#1
السلام عليكم
كيف انقل مجموعة من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;
هذا الكود لا يظهرها متناسقة
ولا استطيع اعادتها الى ما كانت عليه
لا اعلم السبب
الرد
#2
وعليكم السلام ورحمة الله
ضعهم كلهم في tpanel واكتفي بنقل البانل فقط
او في حالتك يجب في كل Tcomponents[i] تحديد top and Left للمكون
لأستهلنّ الصعب أو أدرك المنى    فما انقادت الآمال إلاّ لصابر
الرد


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


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