DGL • Thema anzeigen - Auflösungen und Frequenzen des Monitors auslesen?

Auflösungen und Frequenzen des Monitors auslesen?

Moderator: DGL-Team

Seite 1 von 1

[ 8 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

KSM

Betreff des Beitrags: Auflösungen und Frequenzen des Monitors auslesen?

Verfasst: So Aug 09, 2009 13:14

DGL Member

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30

Hey

!

Da mein na ja "Spiel" so langsam an Größe gewinnt, würde ich auch gerne Einstellungen hinzufügen. Wie man die Auflösung ändert, weiß ich, nur würde ich gerne auslesen, WELCHE Auflösungen überhaupt vom Monitor unterstützt werden.

Könnt ihr mir helfen?
Danke!

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!

Nach oben

Markus

Betreff des Beitrags:

Verfasst: So Aug 09, 2009 15:44

DGL Member

Registriert: Fr Mär 30, 2007 18:35
Beiträge: 331

Da gibt es verschiedene Möglichkeiten. Die einfachste ist sicher - wenn du die VCL nutzt - Screen.Width und Screen.Height. Müsste in der Forms.pas sein.

Eine zweite Variante ist EnumDisplaySettings().

Nach oben

KSM

Betreff des Beitrags:

Verfasst: So Aug 09, 2009 16:42

DGL Member

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30

Gut, mit Screen.Width und Screen.Height krieg ich aber nur die aktuelle Auflösung raus, allerdings würd ich gerne alle möglichen anzeigen lassen, damit der Benutzer auswählen kann.

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!

Nach oben

Slave

Betreff des Beitrags:

Verfasst: So Aug 09, 2009 20:05

DGL Member

Registriert: Sa Nov 29, 2008 22:31
Beiträge: 18

Hi
Das hab ich glaub ich mal irgendwo auf ner Seite gefunden.

Code:

 
 
procedure TForm1.Button1Click(Sender: TObject);
 
var
  DC: THandle;        // display context
  Bits: Integer;      // bits per pixel
  HRes: Integer;      // horizontal resolution
  VRes: Integer;      // vertical resolution
  DM: TDevMode;       // to Save EnumDisplaySettings
  ModeNum: Longint;   // video mode number
  Ok: Bool;
  fre: Integer;      // refresh rate
begin
  DC := GetDC(Handle);
  Bits := GetDeviceCaps(DC, BITSPIXEL);
  HRes := GetDeviceCaps(DC, HORZRES);
  VRes := GetDeviceCaps(DC, VERTRES);
  fre := GetDeviceCaps(DC, VREFRESH);
  // Show Current Resolution
  Edit1.Text := Format('%d bit, %d x %d', [Bits, HRes, VRes]);
  ReleaseDC(Handle, DC); // Show all modes available ModeNum := 0;  // The 1st one
  ModeNum := 0;
  EnumDisplaySettings(nil, ModeNum, DM);
  ListBox1.Items.Add(Format('%d bit, %d x %d bei %d Hz', [DM.dmBitsPerPel,
    DM.dmPelsWidth, DM.dmPelsHeight, Dm.dmDisplayFrequency]));
  Ok := True;
  while Ok do
  begin
    Inc(ModeNum); // Get next one
    Ok := EnumDisplaySettings(nil, ModeNum, DM);
    ListBox1.Items.Add(Format('%d bit, %d x %d bei %d Hz', [DM.dmBitsPerPel,
    DM.dmPelsWidth, DM.dmPelsHeight, Dm.dmDisplayFrequency]));
  end;
end;
 
 

Hoffe es hilft dir.

Nach oben

KSM

Betreff des Beitrags:

Verfasst: So Aug 09, 2009 21:16

DGL Member

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30

Hey, super! Genau das habe ich gesucht! Vielen Dank :lol:

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!

Nach oben

Flash

Betreff des Beitrags:

Verfasst: So Aug 09, 2009 21:43

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Ich hängs mal ins Wiki.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Markus

Betreff des Beitrags:

Verfasst: Mo Aug 10, 2009 09:09

DGL Member

Registriert: Fr Mär 30, 2007 18:35
Beiträge: 331

Naja, genau die Funktion habe ich doch verlinkt :?:

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Mo Aug 10, 2009 15:18

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Manchmal ist es der Code ringsrum der einem weiterbringt.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Seite 1 von 1

[ 8 Beiträge ]

Foren-Übersicht » Programmierung » Allgemein

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 7 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.