procedure TForm1.Timer1Timer(Sender: TObject);
var
WinTXT:Array[0..50] of char;
begin
GetWindowText(GetForeGroundWindow(),WinTXT,50);
MessageBox(0,WinTXT,0,0);
end;
активное приложение
подскажите как отловить активное приложение???
и сколько времении оно активно
и сколько времении оно активно
Цитата: Toxa-86
подскажите как отловить активное приложение???
и сколько времении оно активно
и сколько времении оно активно
GetActiveWindow() а скоко активно - токо если сам замереш(цикл с EventMessages и GetActiveWindow)
Цитата: Dstr
GetActiveWindow() а скоко активно - токо если сам замереш(цикл с EventMessages и GetActiveWindow)
тока не внутри проекта, а из списка в диспетчере задач, то есть в винде любого из запущеных приложений
Цитата: Toxa-86
тока не внутри проекта, а из списка в диспетчере задач, то есть в винде любого из запущеных приложений
ну тода GetForeGroundWindow для описателя и GetWindowText для получения заголовка из окна из описателя...
Цитата: Dstr
ну тода GetForeGroundWindow для описателя и GetWindowText для получения заголовка из окна из описателя...
а как перевести pansichar в string?
или есть другой вариант узнать текст заголовка активного окна?
Цитата: Toxa-86
а как перевести pansichar в string?
или есть другой вариант узнать текст заголовка активного окна?
или есть другой вариант узнать текст заголовка активного окна?
Блиа -
Код:
непонимаю зачем те String,?