ایجاد ارتباط بین form و edit

[farshid_82]

سلام
دوستان می خواستم با یک form و editbutton چیزی مثل combo box درست کنم.
مثلا ما تو فرم اول یک editbutton داریم و هر وقت که کلیک شد فرم دوم رو زیر edit نمایش بدیم.یا حداقل اسم این کارو بگید تا بدونم دنبال چی بگردم لطفا راهنمائی کنید

[Mask]

به این کار میگن ، کامپوننت نویسی.
بهتره که پنل و ادیت رو به هم وصل کنی. البته یادمه چند وقت پیش یه همچین کامپوننتی رو بچه ها نوشته بودند. میتونی سرچ کنی و سورش رو مطالعه کنی.

[farshid_82]

راستش چون تو این فرم از اجزاء متصل به دیتابیس استفاده کردم و فقط تو این برنامه کاربرد داره نمی خوام کامپوننت کنم البته تو کامپوننت نویسی جستجو کردم مثلا تقویم پیدا کردم ولی چیز زیادی نفهمیدم

[MohsenB]

سلام

یه راه ساده :

شما تو رویداد کلیک اون بنویسید که فرم دوم بصورت Modal در محلی زیر اون ادیت نمایش داده بشه . یه چیزی مثل این :

with TForm2.Create(self) do begin
Left:= this.Left + Self.Left;
Top;= this.Top + Self.Top;
ShowModal;
Edit1.Text:= List1{in Form2}.Item.Strings[List1.ItemIndex];
Free;
end;

فقط تو اون فرم دوم که برا این مثال توش که لیست باکس هست ، مثلا تو رویداد دبل کلیک لیست اینجوری بنویسید :

ModalResult:= mrOK;

این کد رو میتونید خیلی گشترش بدید که زحمتش رو دوش خودتون ...

موفق باشید