23-03-2018, Saat: 09:08
Buradaki günlük kullandığım uygulamam,
Uzak Masaüstü Bağlantısı – Remote Desktop Connection Uygulaması
ikinci monitor bağlandığında sapıtıyordu,
Sebebi ise,
DesktopHeight birinci monitorun yüksekliğini, DesktopWidth ise iki monitorun toplam genişliğini veriyordu..
Screen.Width ve Screen.Height doğru çözünürlükleri veriyor fakat sadece primary monitorun.
Bu sorunu ortadan kaldırmak için,
Ek olarak uygulamada kullanılan mesaj kutuları (ben form kullanıyorum) hangi ekranda olursa olsun , primary ekranın en solunda çıkıyordu, poScreenCenter'da bu işimi çözdü.
Bu da minicik bir bilgi olarak dursun, daha mantıklı önerileriniz var ise konu altında paylaşırsanız sevinirim.
Uzak Masaüstü Bağlantısı – Remote Desktop Connection Uygulaması
ikinci monitor bağlandığında sapıtıyordu,
Sebebi ise,
DesktopHeight birinci monitorun yüksekliğini, DesktopWidth ise iki monitorun toplam genişliğini veriyordu..
RDP.DesktopWidth := Screen.DesktopWidth; //3280 RDP.DesktopHeight := Screen.DesktopHeight; //1080
Screen.Width ve Screen.Height doğru çözünürlükleri veriyor fakat sadece primary monitorun.
Bu sorunu ortadan kaldırmak için,
var Monitor: TMonitor; begin //Öncelikle ilgili uygulamamın hangi monitorde olduğunu buldum (fare pozisyonundan), Monitor := Screen.MonitorFromPoint(Mouse.CursorPos); // Monitor.MonitorNum farenin hangi monitor üserinde bulunduğu integer olarak veriyor. // Screen.Monitors[-integer-] ile de ilgili monitor özelliklerine erişilebiliyor. RDP.DesktopWidth := Screen.Monitors[Monitor.MonitorNum].Width; RDP.DesktopHeight := Screen.Monitors[Monitor.MonitorNum].Height; end;
Ek olarak uygulamada kullanılan mesaj kutuları (ben form kullanıyorum) hangi ekranda olursa olsun , primary ekranın en solunda çıkıyordu, poScreenCenter'da bu işimi çözdü.
Bu da minicik bir bilgi olarak dursun, daha mantıklı önerileriniz var ise konu altında paylaşırsanız sevinirim.