請教一下小弟正在以 NotePad 為範本做練習,本文輸入ㄉ地方以 memo 來做,有什麼方法可以直接把 memo 最大化嗎?就是...form 變大ㄉ時候,memo 一樣會跟著展開到最大,請指導... ps.就像 NotePad ㄉ功能 問題2.小弟之前做ㄌㄧ個計算機程式,不過輸入ㄉ部分是用滑鼠點 button,有什麼方法可以讓鍵盤也可以同時輸入嗎?或者...是直接 focus edit.text 嗎 =.=?

memo1.Align :=alClient; 或者在 procedure TForm1.FormResize(Sender: TObject); begin //自己计算memo1的宽、高、left、top end;

那...像上下都有東西ㄉ話,要怎麼去判斷 Memo ㄉ寬、高? 譬如 NotePad 上面ㄉ檔案、編輯...下面ㄉ狀態列

第一個問題如 sos_admin 兄答覆.    第二個問題, 可以使用 Form 的 KeyPreview 屬性設為 true 就可以在觸發 active control 之前, 觸發 form 的 keyboard 按鍵, 如:    

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  showmessage(key);
end;

引言: 第一個問題如 sos_admin 兄答覆. 第二個問題, 可以使用 Form 的 KeyPreview 屬性設為 true 就可以在觸發 active control 之前, 觸發 form 的 keyboard 按鍵, 如:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  showmessage(key);
end;

感恩,不過第一個問題我做ㄌ兩個部份 上面ㄉ比較好解決,因為我對齊左上... 下面ㄉ部份還要考慮到 > 本來想說有沒有那種最大化的函數

呃...我把問題說清楚一點,譬如...NotePad 有個狀態列ㄉ功能 當狀態列沒打開ㄉ時候,Memo ㄉ邊界 = Form ㄉ邊界 可是,如果打開ㄌ,要怎樣把邊界設定到狀態列上面 

sos_admin 已經說了 當設定 memo1.Align :=alClient; 若再設 StatusBar1.Visible := false; 後，memo1會自動充滿整個Form 來補上StatusBar1所佔的空間 先了解 Align 的用法吧…多試試看！

感謝,我看ㄉ那本書沒有介紹這個  呃...順便請問有什麼比較好ㄉ書可以推薦ㄉ嗎 發表人 -