★★★用Spy++获得的窗体句柄是16进制的(如:0006011C)。如何用一个edit控件和一个button控件和showwindow函数来显示这个窗体(要求:

onlydelphiandi 2003-10-21 02:07:45
用Spy++获得的窗体句柄是16进制的(如:0006011C)。如何用一个edit控件和一个button控件和showwindow函数来显示这个窗体(要求:在edit控件中添入0006011C,按button控件来显示这个窗体)?

我知道在showwindow函数中可以直接使用$0006011C作为窗体的句柄,但是如何将edit控件中的0006011C字符串转换为showwindow函数要求的hwnd类型呢?我的意思是:不是将16进制数转换为10进制数,而是转换成$0006011C这种形式直接在showwindow函数中作为参数使用?
...全文
72 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
jeff 2003-10-23
  • 打赏
  • 举报
回复
var
i: Integer;
begin
i:=StrToInt('$001A');
showmessage(inttostr(i));
end;

运行结果: 显示 26
delphi5下运行通过。
onlydelphiandi 2003-10-23
  • 打赏
  • 举报
回复
我说的不是这个意思啊!
你的这个不行的。
yzykjh 2003-10-21
  • 打赏
  • 举报
回复
给个例子:
函数:
function fun1(h:thandle):integer;
var
WinControl: TWinControl;
begin
WinControl := FindControl(h);
if WinControl is tlabel then tlabel(WinControl).caption:='aaa';
if WinControl is tedit then tedit(WinControl).text:='aaa';
end;

调用:
fun1(label1.handle);
fun1(edit1.handle);

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧