全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:871
推到 Plurk!
推到 Facebook!

放大縮小關閉的問題

答題得分者是:Miles
xw
一般會員


發表:21
回覆:7
積分:5
註冊:2004-01-30

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-02-04 18:31:37 IP:202.175.xxx.xxx 未訂閱
請問怎樣可以用delphi 控制放大縮小關閉的功能 例如﹕在delphi放三個按鈕而每個按鈕各控制放大縮小關閉的功能 唔該
Miles
尊榮會員


發表:27
回覆:662
積分:622
註冊:2002-07-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-02-04 18:35:15 IP:218.160.xxx.xxx 未訂閱
Hi xw try this :
procedure TForm1.Button1Click(Sender: TObject);
begin
   Form1.WindowState := wsMaximized;
end;    procedure TForm1.Button2Click(Sender: TObject);
begin
   Form1.WindowState := wsMinimized;
end;    procedure TForm1.Button3Click(Sender: TObject);
begin
   Close;
end;
我不是高手, 高手是正在銀幕前微笑的人.
------


我不是高手, 高手是正在銀幕前微笑的人.
xw
一般會員


發表:21
回覆:7
積分:5
註冊:2004-01-30

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-02-04 22:45:35 IP:202.175.xxx.xxx 未訂閱
唔該你 Miles 但我指的縮細 是指張form還原返未放大之前 這里是不是要自己寫程式 很多謝你
Miles
尊榮會員


發表:27
回覆:662
積分:622
註冊:2002-07-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-02-05 13:53:33 IP:218.160.xxx.xxx 未訂閱
引言: 唔該你 Miles 但我指的縮細 是指張form還原返未放大之前 這里是不是要自己寫程式 很多謝你
Hi xw: 抱歉,我不太懂你的意思, 上面的程式碼應該可以達到需求. 我不是高手, 高手是正在銀幕前微笑的人.
------


我不是高手, 高手是正在銀幕前微笑的人.
系統時間:2024-04-28 16:24:18
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!