“按下button,抓住这个caption”什么意思呀?

解决方案 »

  1.   

    对不起,我没讲清楚。
    “抓住label.caption"
     的意思是:
        var s:string;
        (不能直接用s:=label.caption,更不能s:='抓住我试试看') 想办法求出label.caption的值.
     使得 s=label.caption成立.
     应该明白我的意思了吧?   如果成功了,请进一步思考:
       从另外一个程序,抓住这个程序里的label.caption.
       有什么用,不说也明白了吧?
                  
      
      

  2.   

    var
      Len: Integer;
      PC: PChar;
    begin
      Len := Succ(GetWindowTextLength(Lable1.Handle));
      GetMem(PC, Len);
      GetWindowText(Lable1.Handle, PC, Len);
      S := Strpas(PC);
      FreeMem(PC, SizeOf(PC));
    end;
    //真的需要吗
    //真的需要你就说嘛
    //你不说,我们怎么知道你需要呢
    //你即使这样深情的望着显示器,你也是要说你需要的
    //你需要大家会告诉你
    //不会你不需要我们偏要回答你
    //大家总要讲点到理吧
      

  3.   

    2 zswang:
      呵呵,你没有试过吧?label是没有handle的。
      

  4.   

    确实没有handle的说. zswang想当然了一把, TStaticText才有Handle
      

  5.   

    Lable这种没有句柄的构件实际上是利用父构件的Handle来实现自己的。使用传统的API函数是没有办法的。在同一个程序中可以使用父WinContorl的ControlAtPos来找到这个构件。