使用了同一个windowpro
procedure windowproc(hwnd,msg,wparam,lparam:longint);stdcall;
begin
if msg=wm_rbuttonup then postquitmessage(0);//全部关闭!
//sendmessage(hwnd,wm_close,0,0);//这一句只能关闭当前窗口
if msg=wm_destroy then begin postquitmessage(0);exit;end;
defwindowproc(hwnd,msg,wparam,lparam);
end;appname1和appname2是用的同一个windowproc,当你给appname2
sendmessage(hand1,wm_close,0,0);时,windowproc将会执行
if msg=wm_destroy then begin postquitmessage(0);
而postquitmessage(0);会关闭这两个窗体,而用sendmessage(hwnd,wm_close,0,0);只会关闭hwnd指定的窗体