Форум: "WinAPI";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

Как работает Ctrl-Alt-Del ? Список процессов.   Найти похожие ветки 

← →
StAL   (2001-11-26 20:28) [5]

Поставь на форму ListBox и кнопку и напиши следующую функцию:
function EnumProc (Wd: HWnd; Param: LongInt): Boolean; stdcall; // Обязательно stdcall !!!
Var
Nm: Array[0..255] of Char; // буфер для имени Begin
GetWindowText(Wd,Nm,255); // считываем текст заголовка окна
ListBox1.Items.Add( String(Nm)); // Добавляем название окна и класс в список
EnumProc := TRUE; // продолжать искать окна…
end;

И по кнопке

Procedure TForm1.Button1Click(Sender: TObject);
Begin
ListBox1.Items.Clear; // Очистим список перед началом поисков
EnumWindows (@EnumProc, 0); // и скажем - искать
End;

---

Страницы: 1 вся ветка

Форум: "WinAPI";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.004 c