جلوگیری از Active شدن فرم

[mehran2000_544]

سلام.
فرض کنید در دلفی7 دو تا فرم ایجاد کرده ایم و می خواهیم در صورتی که فرم دوم روی فرم اول باز شد، با کلیک کردن روی فرم اول، این فرم (فرم اول)، Active نشود. این کار به این دلیل است که نمی خواهیم تا زمانی که فرم دوم باز است با کلیک روی فرم اول، فرم دوم ناپدید شود و زیر فرم اول برود.
برای این کار شاید بهترین راه حل این باشد که در رویداد OnClick فرم اول با تعیین شرایطی بنویسیم: Form1.Active:=False; اما مشکل اینجاست که متد Active با اینکه از نوع Boolean است اما هیچ کدام از مقادیر True و False را نمی پذیرد.
شما چه راه حلی پیشنهاد می کنید؟

[جواد ملاولی]

سلام. برای نشان دادن فرم 2، به جای دستور Show از دستور ShowModal استفاده کنید.

Form2.ShowModal;

[majid_ramak]

Form2:= TForm2.Create(Application);
try
Form2.ShowModal;
finally
Form2.Free;
end;