菜单和按钮的功能区别 |
尚未結案
|
zhouying82
高階會員 發表:150 回覆:272 積分:189 註冊:2004-03-16 發送簡訊給我 |
把一个toolbutton设为check状态,代码如下,执行正常,但放在菜单里面,区不能让其隐藏状态栏上面的图标。就其原因,是form2的.Createparams(var Params: TCreateParams); 想知道,怎么样才可以放在事件里面呢?
[code delphi] procedure TForm1.ToolButton1Click(Sender: TObject); begin if ToolButton1.Down then begin form2:=TForm2.Create(self); with form2 do begin top:=20 ; left:=Screen.Width -form2.Width ; FormStyle:=fsStayOnTop; Show; Timer1.Enabled :=true; end; PopupMenu2.Items[1].Caption :='关闭每日提醒'; end else begin form2.Close ; PopupMenu2.Items[1].Caption :='显示每日提醒'; end; end; procedure TForm2.Createparams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.ExStyle := Params.ExStyle or WS_EX_TOOLWINDOW; Params.WndParent := GetDeskTopWindow; end; [/code]
------
断断续续的学了几年,还是一个初学者,永远支持Delphi ! |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |