wm_close [D6, NT4]
бобёр © (2002-12-24 11:07:00)
В следующей конструкции дельфи ругается на undeclared
identifier wm_close. Шо не так?
program Project1;
uses
Forms,windows,
Unit1 in "Unit1.pas" {Form1},
login in "login.pas" {password},
Unit2 in "Unit2.pas" {Form2},
tools in "tools.pas" {Form3};
{$R *.res}
var wnd:hWnd;
begin
Wnd:=Findwindow("TfrmMain","Project1");
if Wnd<>0 then PostMessage(Wnd,WM_CLOSE,0,0);
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(Tpassword, password);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Application.Run;
end.
ZrenBy (2002-12-24 11:09:00) [1]
uses Messages
Наверх 
ЧАТ |
Орешник |
|
