Страница 63 из 127
Какая на программа активна
// Для того что бы узнать какая программа активна кинте на форму таймер Timer1 и метку Label1 напишите следующий код:
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
HANDLE hWnd;
hWnd = GetForegroundWindow();
char szTitle[41] = {0};
GetWindowText(hWnd,szTitle,40);
Label1->Caption = AnsiString(szTitle);
}