تغییر فرم اصلی

[sajioo]

دوستان عزیزم سلام
سوالم و اینطور طرح کنم که
برنامه من 3 فرم داره . فرم شماره 1 فرم اصلی هستش.
بعد از مدتی فرم شماره 1 مخفی میشه و فرم شماره 2 بالا میاد. چطور میتونم فرم شماره 2 رو فرم اصلی کنم. دلیل اینه که وقتی فرم شماره 2 را مینیمایز می کنم و دوباره ماکسیمایز میکنم فرم شماره 1 که مخفی شده بود باز نشون داده میشه.
کسی راهی بلده؟

[یوسف زالی]

فرم اول رو هاید می کنید بازم هم نشون داده می شه؟!!

[sajioo]

بله دقیقا هاید میکنم اما وقتی ماکزیمایز انجام میشه دوباره نشون داده میشه.راهی هست که این فرم در ماکزیمایز نشون داده نشه؟

[hosseint1360]

از منوي Project گزينه Options را انتخاب مي كنيم در برگه form و از ليست Main Form فرماز
۲ را انتخاب مي كنيم . از اين به بعد زماني كه برنامه اجرا مي شود فرم ۲ فرم اصلي ما خواهد شد.

[firststep]

به چه شکل از مینیمایز خارج می کنی فرم 2 رو

از منوي Project گزينه Options را انتخاب مي كنيم در برگه form و از ليست Main Form فرماز ۲ را انتخاب مي كنيم . از اين به بعد زماني كه برنامه اجرا مي شود فرم ۲ فرم اصلي ما خواهد شد. <<< این در حالت طراحی ایست باید در حالت اجرا تغییر داده شه

[diamond_guilan]

سلام دوست من، بفرما عزيز اينم راه حل:



procedure SetAsMainForm(aForm:TForm);
var
P:Pointer;
begin
P := @Application.Mainform;
Pointer(P^) := aForm;
end;


كافيه هر جا كه دلت خواست اين پروسيجر رو با اسم اون فرمي كه ميخواي فرم اصليت باشه فراخواني كني. بعد از اجراي اين پروسيجر فرم اصليت عوض ميشه...

يا حق