| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
поможите пожалуюста , сам бы да примерчик засеял ... [D3, D4, D5, D6, Win95/98, WinME]
Pavel-ak © (2002-10-11 11:42:00)а задача следующая - открывается у нас окошко Виндовс и если заголовок окна = " окно 1" , то закрываем окно.
Спасибо всем.
Polox (2002-10-11 16:23:00) [1]Song& SVM ПРАВЫ
procedure TForm1.Button1Click(Sender: TObject);
VAr
WindowHandle: hwnd;
WndClass:TWndClass;
S:PChar;
begin
S:=PChar(Edit1.Text);
WindowHandle:=FindWindow(nil,S);
SendMessage(WindowHandle, WM_SYSCOMMAND, SC_CLOSE, 0);
End;
SVM (Perm) (2002-10-11 14:02:00) [2]Или WM_SYSCOMMAND,SC_CLOSE
Song (2002-10-11 13:20:00) [3]FindWindow() --> WM_CLOSE
| |
