我用delphi調用計算器,但我怎樣在程序中取得該結果呢。

ggltechggl 2004-11-11 10:24:27
我用這個語句調用計算器 shellexecute(0,'open','calc.exe',nil,nil,SW_Normal);但是我怎樣在delphi程序中取得該計算器的結果呢。(我想做一個按鈕,點擊按鈕即可以取得該計算器結果,而不用手輸入)

謝謝各位!
...全文
63 6 打赏 收藏 举报
写回复
6 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ICMGDCHN 2004-11-11
  • 打赏
  • 举报
回复
好像没接口,不过可以用取窗口内容的方法实现.

var
calcHwnd:Hwnd;
childHwnd:Hwnd;
buff:pchar;
begin
calcHwnd:=FindWindow(nil,'计算器');
childHwnd:=FindWindowEx(calcHwnd,0,'static',nil);

GetMem(buff,256);
GetWindowText(childHwnd,buff,256);
showmessage(buff);
freeMem(buff);
end;


lamshy 2004-11-11
  • 打赏
  • 举报
回复
DevExpress QuantumGrid 内就有一个现成的计算器控件。
zhangzhihui528 2004-11-11
  • 打赏
  • 举报
回复
那要看有没有接口了
mastersky 2004-11-11
  • 打赏
  • 举报
回复
自己做个计算器
hellolongbin 2004-11-11
  • 打赏
  • 举报
回复
强,学习
ggltechggl 2004-11-11
  • 打赏
  • 举报
回复
謝謝ICMGDCHN(广东人在广州->喜欢明月) ,已結貼.
相关推荐
发帖
Windows SDK/API

1177

社区成员

Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
帖子事件
创建了帖子
2004-11-11 10:24
社区公告
暂无公告