Zitat von
Muetze1:
Moin!
Is ja nicht das Ding...
Delphi-Quellcode:
function change_resolution(Const AWidth, AHeight, ABpp : Word): boolean;
var
lpDevMode: TDeviceMode;
begin
lpDevMode.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT or DM_BITSPERPEL;
lpDevMode.dmPelsWidth := AWidth;
lpDevMode.dmPelsHeight := AHeight;
lpDevMode.dmBitsPerPel := ABpp;
Result := ( ChangeDisplaySettings(lpDevMode, CDS_UPDATEREGISTRY) = DISP_CHANGE_SUCCESSFUL );
end;
... snipp ...
MfG
Muetze1
Danke für den Tipp. Das ganze funktioniert richtig gut ... allerdings musste zu Beginn noch die Größe der Datenstruktur definieren ... sonst gibbets böse Falschmeldungen:
lpDevMode.dmSize := SizeOf(lpDevMode);
MfG
Gerald