hi... Happy new Year....
So finally after two year almost.. with so little time to code... i must say that game project is near to done...
It is writing in Lazarus using GLScene... and the next step before to give it to all... is to porting to linux...
I have a problem...
The function i use in win32 mode to set the screen resolution is the code above...
Code:
procedure SetScreen(bpp: byte; width, height, FR: integer);
var
D: TDevMode;
h: HWND;
begin
h := 0;
D.dmDeviceName[0] := 0;
D.dmBitsPerPel := BPP;
D.dmDisplayFrequency := FR;
D.dmPelsWidth := Width;
D.dmPelsHeight := Height;
D.dmFields := DM_BITSPERPEL + DM_PELSWIDTH + DM_PELSHEIGHT +
DM_DISPLAYFREQUENCY;
D.dmSize := SizeOf(D);
if ChangeDisplaySettings(D, CDS_TEST) =
DISP_CHANGE_SUCCESSFUL then
ChangeDisplaySettings(D, CDS_UPDATEREGISTRY)
end;
But the TDevMode uses the Window unit that does't work in linux...
So how can i make that to work in X11.... or any other graph mode...
Thank you ... and keep pascaling...
Bookmarks