Главная страница
    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.051 c
2-1226476773
leonidus
2008-11-12 10:59
2008.12.21
Непонятки с TStringGrid


2-1226161946
Надуев Алексей
2008-11-08 19:32
2008.12.21
WebBrowser


15-1224211471
Slider007
2008-10-17 06:44
2008.12.21
С днем рождения ! 17 октября 2008 пятница


9-1176310237
Evgraf
2007-04-11 20:50
2008.12.21
Что такое DXUT?


2-1224144320
lewka
2008-10-16 12:05
2008.12.21
Форма по верх всех окон





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский