Çözünürlük Ayarı

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
şahmeran
Üye
Mesajlar: 17
Kayıt: 06 Ağu 2003 09:37
Konum: İstanbul

Çözünürlük Ayarı

Mesaj gönderen şahmeran »

S.A

Arkadaşlar programın sabit bir çözünürlükte çalısmasını istiyorum bunun için nasıl bir ayar yapmam lazım?

(Mesela 1024*768 e göre ayarlamak istiyorum.)

İyi çalışmalar
Kullanıcı avatarı
mussimsek
Admin
Mesajlar: 7603
Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:

Mesaj gönderen mussimsek »

Merhaba,

o zaman ekran çözünürlüğünü 1024 x 768'e getirip öyle tasarlayın formları. Ama ben 800x600 tasarlayım, diğer çözünürlüklerde de düzgün gözüksün diyorsan şu mesajı oku :

viewtopic.php?t=650

Kolay gelsin.
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

Ben uygulamalarimi eskinde 800*600'e gore hazirlardim. Ama artik 1024*768 cözünürlüğe göre tasarlıyorum. Nadiren ekran çöznürlüğü daha düşük olan müşterilerde de sorun çıkmaması için program açılırken gerekli kontorlü yaparak eğer daha düşük bir çözünürlükte ise 1024*768 çözünürlüğe yükseltiyorum.

Bunun için çöyle iki fonksiyon kullaniyorum.

Kod: Tümünü seç

function SetScreenResolution(Width, Height: integer): Longint;
var
  DeviceMode: TDeviceMode;
begin
  with DeviceMode do begin
    dmSize := SizeOf(TDeviceMode);
    dmPelsWidth := Width;
    dmPelsHeight := Height;
    dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
  end;
  Result := ChangeDisplaySettings(DeviceMode, CDS_UPDATEREGISTRY);
end;

Kod: Tümünü seç

procedure EkranCozunurlugunuAyarla(VAR_WIDTH, VAR_HEIGHT: integer);
var
  VAR_OLD_WIDTH, VAR_OLD_HEIGHT: integer;
begin
  VAR_OLD_WIDTH := GetSystemMetrics(SM_CXSCREEN);
  VAR_OLD_HEIGHT := GetSystemMetrics(SM_CYSCREEN);
  if VAR_OLD_WIDTH<VAR_WIDTH then
    SetScreenResolution(VAR_WIDTH, VAR_HEIGHT);
end;
MDI forumunun onshow'unda

Kod: Tümünü seç

EkranCozunurlugunuAyarla(1024,768)
şeklinde bir çağırım yaparak bu işi hallediyorum...
gercek_16
Üye
Mesajlar: 108
Kayıt: 19 Haz 2005 02:42
Konum: mersin

Mesaj gönderen gercek_16 »

merhabalar
Ama artik 1024*768 cözünürlüğe göre tasarlıyorum. Nadiren ekran çöznürlüğü daha düşük olan müşterilerde de sorun çıkmaması için program açılırken gerekli kontorlü yaparak eğer daha düşük bir çözünürlükte ise 1024*768 çözünürlüğe yükseltiyorum.
bu kodu kullandığımız makina eğer bu çözünürlüğü desteklemiyor ise
problem çıkmıyormu :?:

teşekkürler
Kullanıcı avatarı
selman
Üye
Mesajlar: 664
Kayıt: 04 Ara 2003 12:06
Konum: İzmir

Mesaj gönderen selman »

selam
15.inç ve üstü zaten 1024*758 çözünürlüğünü destekliyor.zaten 15" dende aşağı pek de piyasada monitor yok gibi.bence 1024/768 çözünürlük o kadar problem olucağını sanmıyom..Kolay gelsin.
Cevapla