已经编译的应用不可能知道的。
解决方案 »
- 长得很相似,求区别用法有什么不一样的。。。。。。。。。。。。
- 新人求助!delphi文件问题
- Boolean,这个一般在什么情况用这个变量类型?
- 怎么delphi对中文的支持这么差劲啊
- 控制台能嵌入窗体吗?大家来讨论!
- 在delphi中如何将数据库(paradox)进行压缩,如同fox中的pack?
- 几个人一个小组做一个任务,每个人具体一个模块,要把各个模块合并起来应该怎么处理
- 动态生成的tabsheet及richedit的问题!
- Format()用法是什么?请给出代码?一个具体的问题
- 在DELPHI 中小数问题如何处理
- 请问高手,一个关于Delphi和Access的问题,up有分
- 如何知道每个键的代码?
function EnumChildProc(hwnd: HWND; lParam: LPARAM): BOOL; stdcall; var
classname:array [0..254] of char;
begin
getclassname(hwnd,classname,sizeof(classname));
TMemo(lParam).Lines.Add(classname);
Result := True;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
var
p:tpoint;
handle:thandle;begin
getcursorpos(p);
handle:=WindowFromPoint(p);
if iswindow(handle) then
EnumChildWindows(handle ,
@EnumChildProc,
Integer(Memo1));end;