speedbutton中没有SetFocus属性
 可是我要在edit1中的onexit事件中取得speedbutton的焦点怎么办? 顺便问一下bitbtn中没有flat 属性啊。我不想让那个按钮突出来啊。又怎么办啊?

解决方案 »

  1.   

    speedbutton不是窗体,自然无法获得焦点要完全符合自己要求的按钮控件自己写
      

  2.   

    bitbtn 中有啊,
    speedbutton同样是按钮啊!bitbtn 真的也不能不突出来?
      

  3.   

    speedbutton 没有 default  属性   可以自己写,直接继承speedbutton 加上 定义这个属性
    bitbtn 也一样
      

  4.   

    procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
    begin
      with SpeedButton1 do
        begin
             if key=#13 then
               begin
                 Key:=#0;
                 Perform(WM_NEXTDLGCTL,0,0);           //焦点下一个控件
                 SpeedButton1.OnClick(application);
                 end;
    end;
    end;
      

  5.   

    to ehom(?!) 
      bitbtn是窗体 speedbutton不是窗体 这怎么理解啊,我不明白啊。我只知道他们都是控件,可以说清楚点吗?不胜感激。to bnabinge(狂欢) 
      不那不是把SpeedButton1.OnClick(application);直接就执行了吗?都还没让用户确认是否要执行就onclick了啊
      

  6.   

    bitbtn是窗体 speedbutton不是窗体
    ---------------------------------
    tbitbtn继承自twincontrol,tspeedbutton继承自TGraphicControl,所以有上述说法,其实大概讲就是twincontrol的子类都分配有handle,可以获得焦点。
      

  7.   

    Twincontrol   TGraphicControl? 我知道我菜所以我耐心学。
     别骂我啊,早知道这么多要学我就多下点分拉。
      

  8.   

    Twincontrol  是窗体
    TGraphicControl 是制图类的,不属于窗体对吗?是这样理解吗 ?