請問各位大大 該如何寫一個按鈕按三次以後自動隱藏起來

------
Xax

20052020 您好： 這個問題可以透過定義全域變數來解決。 在每次點按此按鈕時將該變數加一，直到達到您需要的次數時，再將按鈕的visible屬性設成false即可。 RichTop 敬上 =====***** 把數學當工具，可以解決問題；將數學變能力，能夠發現並解決問題！ =====#####

該如何寫 我試過不可以

------
Xax

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public iClickTimes: integer ; ////////////////////// { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject);///////////////// begin showmessage( 'iClickTimes = ' inttostr(iClickTimes) ); if iClickTimes = 2 then Form1.Button1.Visible := False else iClickTimes := iClickTimes 1; end; end.

感謝!!

------
Xax

在Button 的 Onclick 事件內寫下以下兩行即可

Inc((Sender As TButton).Tag);
(Sender As TButton).Visible := Not ((Sender As TButton).Tag >= 3);

善用 Tag 這個 屬性.....可以省略很多無謂的變數宣告~~~^^

------
叔叔有練過,初學者不要學。