Вниз
Скачать: CL | DM;

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

 
Первокласник Вася   (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



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
15-1184145951
zdm77
2007-07-11 13:25
2007.08.05
Прокси


15-1183640663
MOO
2007-07-05 17:04
2007.08.05
Защита приложения


1-1180360269
timonissimo
2007-05-28 17:51
2007.08.05
TMainMenu :чтобы меню разместилось на всех формах


15-1183540463
Alkid
2007-07-04 13:14
2007.08.05
Орешник?


2-1183923865
nali
2007-07-08 23:44
2007.08.05
virtual или dynamic metods




   Наверх