Thema: Delphi Kontrast per API ...

Einzelnen Beitrag anzeigen

Benutzerbild von Darty
Darty

Registriert seit: 8. Jun 2002
Ort: Kronau
731 Beiträge
 
#6
  Alt 17. Jun 2002, 16:24
Hmmm langsam kommt Licht hier rein oder auch nicht ....
Also dass heisst dann ...
  • dmICMIntent ist ein Member (Variable) von dmFields ??
  • dmICMIntent sind mehrere Werte gespeichert. Und eine davon ist DMICM_CONTRAST ?
Wenn dass wirklich so ist, wie rufe ich dann die Werte aus dem dmICMIntent bzw wie übergebe ich dann die Werte ?
Code:
function change_contrast(contrast: word): boolean;
var lpDevMode: TDeviceMode;
begin
  Result := EnumDisplaySettings(nil, 0, lpDevMode);
  if Result then begin
    lpDevMode.dmFields := dmICMIntent;

// Hier fehlt etwas ??? Oder kann man da schon dmICM_Contrast aufrufen ??
// Wenn ja kannst es an einem Beispiel zeigen ??

    Result := ChangeDisplaySettings(lpDevMode, CDS_UPDATEREGISTRY) = DISP_CHANGE_SUCCESSFUL;
  end;
end;
Dsas ist der fast gleiche Code wie oben ... Nur fehlt dazwischen etwas Wüsste da jemand etwas ?? Du Luckie ?
Matthias Knebel
Mfg M. Knebel [-Darty-]
- Gehörlose Delphianer gibt es selten -
www.team-knebel.de
  Mit Zitat antworten Zitat