تغییر Resolution صفحه نمایش

سلام
چطور میتونم resoltion را به 640*480 تنظیم کنم! یعنی هر وقت برنامم اجرا شه تغییر rESOLTIO بدم
ممنون


عنوان این بحث توسط کاربر DELPHIAREA تغییر داده شد.

SetResolution(x,y);

باید چه چیزی رو use کنیم تا این دستور کار کنه
در کدوم دلفی ها کار میکنه؟

برای این کار میتونی از ChangeDisplaySettings استفاده کنی
توی Help دلفی کامل توضیح داده
ارادتمند مشاطان

با سلام
من تو دلفی 5 با اون کد کار می کنم .یونیتی هم لازم به یوزز کردن نبود.

اینم جواب :lol:
procedure TForm1.Button1Click(Sender: TObject);
Var DM : DEVMODE;
begin
DM.dmSize := Sizeof(DEVMODE);
DM.dmPelsWidth := 640;
DM.dmPelsHeight := 480;
DM.dmBitsPerPel := 16;
DM.dmDisplayFlags := DM_PELSHEIGHT Or DM_PELSWIDTH Or DM_BITSPERPEL;
ChangeDisplaySettings(DM,CDS_FULLSCREEN Or CDS_UPDATEREGISTRY Or CDS_RESET);
end;


ولی آقا امید منکه تو delphi 7 نتونستم اون دستوریو که گفتی اجرا کنم!! اگه کسی تونست به منم بگه!!!
:twisted: :P :shock: :D :lol: