داشتن 2 تا Main From در برنامه

[aliasghar]

سلام
میخواهم برای برنامه ام 2 تا Main Form بگذارم که بر حسب رزولوشن انتخابی در ویندوز هرکدام باز شود مثلاً اگر رزولوشن 800*600 بود برنامه همیشه با main form 2 باز شود و اگر رزولوشن 1024*768 بود همیشه با mainform 1 باز شود
هر دو فرم یک کار انجام میدهند ولی از نظر style متفاوتند

میشه؟ چطوری؟

[Delphi Skyline]

به جای این کار باید برنامه تون رو طوری طراحی کنید که Multi Resoulotion باشد بوسیله Align ها .

[AhmadYousefi]

می توانید از panel ها و همجنین Anchor کردن اشیا روی فرم این کار را انجام دهید .

[aliasghar]

سلام
برنامه ای که دارم طراحی میکنم در رزولوشن های متفاوت مشکلی نداره یعنی
Multi Resoulotion هست ولی این کار هم را اگه بتونم انجام بدم خیلی بهتره

[Delphi Skyline]

فایل Project تت رو با کد زیر تغییر بده ::


program Project2;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.res}
begin
Application.Initialize;
if (Screen.Height = 600) and (Screen.Width = 800) then
begin
// First Form2
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm1, Form1);
end else
if (Screen.Height = 768) and (Screen.Width = 1024) then
begin
// First Form1
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
end;

Application.Run;
end.


امیدوارم موفق بشی

[aliasghar]

ممنون
تست میکنم