我是在正常螢幕(4:3)下開發程式
但拿到寬螢幕(16:9)的環境下顯示時
程式介面會被壓扁
因為不論寬螢幕或正常螢幕的解析度都一樣
所以用ScaleBy(MV,MD)也無效
爬過許多網路上的文章
也沒找到解決的方式
希望在這能遇到貴人相助^^

可能要用api或用登錄機碼，
來偵測使用的螢幕，
用型號來分辨是一般或寬螢幕。

感謝版大的意見
分辨螢幕類型還好處理
我是假設可讓使用者輸入
所使用的是一般螢幕或寬螢幕
但再來又該如何解決界面變形的問題?
不知版大有什麼想法嗎?
===================引 用 阿信 文 章===================
可能要用api或用登錄機碼，
來偵測使用的螢幕，
用型號來分辨是一般或寬螢幕。

Screen->Height與Screen->Width是螢幕的高寬，
W:寬螢幕旗標
//對螢幕上所顯示的表單、按鈕、圖片等做調整
if (W) {
Form1->Width=Form1->Width*0.75
...//
}

感謝板大的回應
但是這方法只能改變FORM的形狀
總不能把各元件都叫出來改吧? QQ
===================引 用 阿信 文 章===================
Screen->Height與Screen->Width是螢幕的高寬，
W:寬螢幕旗標
//對螢幕上所顯示的表單、按鈕、圖片等做調整
if (W) {
Form1->Width=Form1->Width*0.75
...//
}

我的確是這麼想的

或許可參考這一篇
http://delphi.ktop.com.tw/board.php?cid=168&fid=923&tid=44862

===================引 用 esju0000 文 章===================

感謝板大的回應
但是這方法只能改變FORM的形狀
總不能把各元件都叫出來改吧? QQ
===================引 用 阿信 文 章===================
Screen->Height與Screen->Width是螢幕的高寬，
W:寬螢幕旗標
//對螢幕上所顯示的表單、按鈕、圖片等做調整
if (W) {
Form1->Width=Form1->Width*0.75
...//
}

看了這麼多文章後~
我發現
從程式著手的話似乎沒有簡單的解決方法
看來不如換成寬螢幕 修改可能比較簡單
感謝版大多日來的鼎力相助
真是人間處處有溫情阿^^
===================引 用 阿信 文 章===================
我的確是這麼想的

或許可參考這一篇
http://delphi.ktop.com.tw/board.php?cid=168&fid=923&tid=44862