Поиск окна

← →
Первокласник Вася (2007-07-08 13:20) [0]

Всем привет!

С праздником - дня рыбака!
Вот моя идея, но ничего не получается :(
Хочу написать прогу, которая следит какие папки открыты
в данный момент времени с указанием времени открытия.
Например, открыта папка "Новая папка" в 12:00:29, спустя какое-то
время открыта папка "мр3", например в 13:22:40 и т.д.

Пытался с помощью FindWindow(nil,nil) - ноль что получается, правда
если указать второй параметр (имя) то нормально.
Только вот минус один хочу использовать таймер для поиска окна каждую
секунду. Но к имени найденного окна постоянно прибавляется текущее время.

Короче, я хочу чтобы в Listbox заносилось имя открытой папки + время ее открытия...

Ребята, не судите строго. Начинающий. И если вопрос сформулирован не
граматно (наверняка) - подскажите пожалуйста!

С Уважением!

← →
Dib@zol © (2007-07-08 13:32) [1]

Тут скорее всего надо использовать GetWindowList. У окна папки, если не ошибаюсь, должен быть особый класс окна. Если кто знает пусть подскажет. А я пока попробую написать простой екзампл.

← →
Первокласник Вася (2007-07-08 13:36) [2]

Спасибо что ответил и хоть что-то посоветовал!
Я с большим удовольствием взгляну на твой пример!

← →
Первокласник Вася (2007-07-08 14:06) [3]

Господа, в доолнение к вопросу кусок моего кода.
Эта кнопка сидит на таймере.

procedure TForm1.Button1Click(Sender: TObject); begin for i:=0 to List1.Count-1 do if findwindow("CabinetWClass",pchar(list1.Strings[i]))<>0 then begin List2.AddStrings(List1); Listbox1.Clear; Listbox1.Items.Add("Запущен: "+" "+List2.Strings[i]+ timetostr(now)); end; end;

← →
Dib@zol[banned] (2007-07-08 14:30) [4]

Удалено модератором
Примечание: Нарушение режима RO

Поиск окна Найти похожие ветки