var
pt:pansichar;procedure TForm1.BitBtn1Click(Sender: TObject);
begin
getwindowtext(Handle,pt,10);
memo1.text:=pt^;
end;为什么出错呢,多谢memo1.text:=pt也不可以
pt:pansichar;procedure TForm1.BitBtn1Click(Sender: TObject);
begin
getwindowtext(Handle,pt,10);
memo1.text:=pt^;
end;为什么出错呢,多谢memo1.text:=pt也不可以
解决方案 »
- 数据集自动生成DML和自己书写DML方式,哪个效率更好一些?
- 问一个对系统操作的问题,是否有这样的API或控件?
- 快快帮忙,十分火急!!!谢谢各位!
- 请问在DELPHI里用调用存贮过程那个控件如何用!急急急
- dos 窗口
- 如何把DLL窗体中的数据,传回主程序?
- 在按钮中写.. 报不能插入mode,table1.fields[0].value:=table1.fields[1].value
- @@@@@诚招重庆籍DELPHI程序员,有意请联系[email protected]
- ADO操纵ACCESS,两种驱动接口有何区别?哪个更好些?发布更简单些?
- delphi bde+中文access如何在英文win98下正常工作
- 看了扫雷的程序,大概可以明白它的原理, 但不知道下面的数据他是怎么弄来的
- 显示listview中的图标
procedure TForm1.Button1Click(Sender: TObject);
var
pt : PAnsiChar;
begin
GetMem(pt, 11);
getwindowtext(Handle, pt, 10);
memo1.text:=String(pt);
FreeMem(pt);
end;
pt: pansichar;
begin
GetMem(pt,10);//分配内存
GetWindowText(Handle,pt,10);
memo1.text:=pt;
FreeMem(pt);
end;