الربط بين فورمين منفصلين

[jaws]

السلام عليكم

انا عندي فورم كنت مبرمجه من قبل والحين ابي اضيف الفورم القديم للجديد مثل عملية 1>>2

المشكلة انه الفورمين منفصلين يعني كل واحد تم تصميمه لوحده :confused:

[rama]

إذا كنت تقصد إضافة form إلى مجموع الفورمات المكونة لبرنامجك فالطريقة هي :
إذهب الى project ثم add to project ثم إبحث عن ال unit الخاصة بالفورم التي تريد إضافتها و أضفها.

[علي]

إذا كنت تقصد إضافة form إلى مجموع الفورمات المكونة لبرنامجك فالطريقة هي :
إذهب الى project ثم add to project ثم إبحث عن ال unit الخاصة بالفورم التي تريد إضافتها و أضفها.

كما قالت الأخت راما وأما لو قصدت الربط بين فورمين أي التعامل مع بعضهما مثل التحكم بعنصر في الفورم الثاني فيجب أنت تعرف الفورم الثاني بهذه الطريقة form2 ثم اضغط F9 و . فتظهر الخواص أما لو أردت التحكم ب edit تكتب form2.edit1.text:='jjjjjj';

[jaws]

اولا مشكورين على التفاعل

لكن المشكلة ليست كما ظننتم

المشكلة انني مثلا عندي مشروع يتكون من فورم واحد انهيت العمل عليه

وبعد مدة عملت مشروع ثاني يتكون هو الاخر من فورم واحد

الاشكالية = كيف اجعل المشروعين السابقين بمثابة مشروع واحد يتكون من فورمين هذا قصدي

[rama]

اولا مشكورين على التفاعل

لكن المشكلة ليست كما ظننتم

المشكلة انني مثلا عندي مشروع يتكون من فورم واحد انهيت العمل عليه

وبعد مدة عملت مشروع ثاني يتكون هو الاخر من فورم واحد

الاشكالية = كيف اجعل المشروعين السابقين بمثابة مشروع واحد يتكون من فورمين هذا قصدي

إذا كنت تقصد إضافة فورم المشروع الأول إلى المشروع الثاني ، أي جعل المشروع الثاني يتكون من فورمين : الفورم الخاص به و فورم المشروع القديم فالحل كما اوضحت لك سابقا.

[علي]

نعم أخي كما أوضحت الأخت سابقا
و سأعيد الخطوات:
من القائمة Project أختر الأمر Add To Project و حدد موقع الـ unit للمشروع الثاني أو الفورم التاني و بعدها ينضاف الفورم بس ملاحظ قبل ما تضيفه يجب نقله لمجلد المشروع الأساسي يعني اليونيت و الفورم و كل الملفات

[jaws]

شكرا جزيلا لكم وبالفعل فعلت كما قلتم لي لكن ظهر مشكل التشابه في اسماء Unit1 و Unit1
فقمت بتغيير اسم اليونيت 1 لكن اثناء تنفيذ المشروع يقول لي انه تعذر ايجاد اليونيت 1 مع العلم انها موجودة الاسم فقط هو الذي تغير ???

[rama]

شكرا جزيلا لكم وبالفعل فعلت كما قلتم لي لكن ظهر مشكل التشابه في اسماء Unit1 و Unit1
فقمت بتغيير اسم اليونيت 1 لكن اثناء تنفيذ المشروع يقول لي انه تعذر ايجاد اليونيت 1 مع العلم انها موجودة الاسم فقط هو الذي تغير ???

قم بتغيير الاسم في ال unit الخاص بالبرنامج ، كما في المثال التالي:

PHP كود :

program EXP;

uses
  Forms,
  Unit1 in '..\p1\Unit1.pas' {Form1},
  Unit2 in '..\p1\Unit2.pas';{Form2}

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.