Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.12.21;
Скачать: [xml.tar.bz2];

Вниз

postmessage - Как послать сообщение?   Найти похожие ветки 

 
Rav4   (2008-11-10 13:00) [0]

Привет!

У меня такой вопрос.

В таймере с помощью FindWindow ищу имя папки.
Если папка найдена, то как правильно в мемо занести инфо о том, что папка была открыта?
У меня все время получается в цикле.
А нужно только один раз вывести строку.

т.е. примерно так:


12:00:23 - Новая папка. Открыта
12:24:19 - Мои документы. Открыта


 
Сергей М. ©   (2008-11-10 13:03) [1]


> У меня все время получается в цикле.
> А нужно только один


Убери цикл и будет один раз


 
Leonid Troyanovsky ©   (2008-11-10 13:10) [2]


> Rav4   (10.11.08 13:00)  

> В таймере с помощью FindWindow ищу имя папки.

Что значит "имя папки"?
Например, у меня в проводнике не установлено:
Display the full path in the title bar.
И что тогда правильно заносить?
И чего нужно  postmessage?

--
Regards, LVT.


 
sniknik ©   (2008-11-10 13:16) [3]

> И чего нужно  postmessage?
ну как чего... вот
http://delphimaster.net/view/2-1226041538/
> postmessage(findwindow(nil,pchar(st),),WM_CLOSE,0,0);


 
Rav4   (2008-11-10 13:40) [4]

Мастера, я с этой веткой согласен, что будут и тормоза и слезы.
Но иного пути я пока не знаю.


 for i:=0 to form1.ListBox1.Items.Count-1 do
 begin
     postmessage(findwindow(nil,"имя папки",),WM_CLOSE,0,0);
 end;


если в цикл занести
memo1.Lines.Add(datetostr(now)+" "+timetostr(now)+" " +st+" "+"папка была открыта");

то запись крутится каждую секунду.

Подскажите пожалуйста, что нужно сделать?


 
Сергей М. ©   (2008-11-10 13:45) [5]


> что нужно сделать?


Для начала нужны осознанные и вразумительные комментарии, что это за цикл и что ты делаешь в каждой его строчке...


 
brother ©   (2008-11-10 13:45) [6]

ты может всеж код весь покажешь?

> form1.ListBox1.Items.Count-1


> st

это что?

если нужно 1 раз, то если она уже была открыта ставь флаг и если флаг например true, то запись в мемо не выводи уже


 
Leonid Troyanovsky ©   (2008-11-10 13:49) [7]


> Rav4   (10.11.08 13:40) [4]

> Мастера, я с этой веткой согласен, что будут и тормоза и
> слезы.

Т.е., это, дейс-но, продолжение
http://delphimaster.net/view/2-1226041538/ ?

А что полезного извлечено из оного дидактического материала?

>      postmessage(findwindow(nil,"имя папки",),WM_CLOSE,0,
> 0);

Зачем нужно это аж Count-1 раз? Для несогласных?

> memo1.Lines.Add(datetostr(now)+" "+timetostr(now)+" " +st+"
> "+"папка была открыта");

Кто такой st.

--
Regards, LVT.


 
sniknik ©   (2008-11-10 13:50) [8]

> Для начала нужны осознанные и вразумительные комментарии, что это за цикл и что ты делаешь в каждой его строчке...
дежавю...



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

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

Наверх





Память: 0.46 MB
Время: 0.041 c
15-1224751183
int64
2008-10-23 12:39
2008.12.21
Эксперты для IDE Delphi2007


2-1226327058
Andrey_ka
2008-11-10 17:24
2008.12.21
работа с памятью


15-1223469271
Anton
2008-10-08 16:34
2008.12.21
Вопрос новичка. Тема про SQL.


15-1224514064
GrayFace
2008-10-20 18:47
2008.12.21
Как проследить, какие программы гоняют пакеты?


2-1226415188
Maksim
2008-11-11 17:53
2008.12.21
Изменение размера шрифта в поле Memo





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский