我想在delphi 6.0中使用setcapture函数,但是无法使用,我的OS是WIN2000,请问各位高手如何才能使用这个函数。
谢谢!!!!!!

解决方案 »

  1.   

    怎么可能无法使用,我也是Delphi6,用的上好
      

  2.   

    这是我的一段程序:
    procedure TForm1.RadioButton1MouseMove(Sender: TObject; Shift: TShiftState;
      X, Y: Integer);
      var
      mouseEnter: boolean;
      begin
        mouseEnter:=(0<=x) and (x< radiobutton1.Width-0) and (0<y) and (y< radiobutton1.Height-0);
        if  mouseEnter then
          begin
            radiobutton1.Color := rgb(0,255,255);
            setcaptuer(handle);
          end
        else
          begin
            radiobutton1.Color := clSkyBlue;
            releasecaptuer;
          end;
    end;
    -----------------------------------------
    目的是当我将鼠标移到RadioButton1控件上面时控件变色,我想用setcapture和releasecapture这两个函数获取鼠标信息,但是报错:
    [Error] Unit1.pas(117): Undeclared identifier: 'setcaptuer'
    [Error] Unit1.pas(122): Undeclared identifier: 'releasecaptuer'
      

  3.   

    补充一点,在Uses里面包含这些库:
    uses:
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls, jpeg, StdCtrls, Mask, Buttons, ComCtrls, Grids;
      

  4.   

    ?
    报错的代码,是你自己写的还是copy过来的?
    setcapture还是setcaptuer?