適用於螢幕解析度800X600及1024X768的程式 |
尚未結案
|
Anakin
一般會員 發表:5 回覆:9 積分:2 註冊:2004-11-17 發送簡訊給我 |
|
wameng
版主 發表:31 回覆:1336 積分:1188 註冊:2004-09-16 發送簡訊給我 |
|
pigbaby
初階會員 發表:2 回覆:84 積分:47 註冊:2002-09-02 發送簡訊給我 |
豬寶寶是這樣做的
開發環境是800*600
在form create時會自動調整form的大小
不過這樣寫法有一個小問題
假設螢幕為1024*768時,會放大成1.25倍
因為有些user會把windows下面的任務列改為自動隱藏
有些人沒有,沒有的人會變成 form會放不太下去
所以需看您自己的需求對 80,125這二個數字進行調整
procedure Tform1.FormCreate(Sender: TObject); begin case screen.width of 640:self.ScaleBy(80,100); 800:self.ScaleBy(100,100); 1024:self.ScaleBy(125,100); else self.ScaleBy(100,100); end; end; |
Anakin
一般會員 發表:5 回覆:9 積分:2 註冊:2004-11-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |