Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Прога типа аськи... [D6, WinME]


sany ©   (2002-03-13 21:14:00) 

народ, может кто знает как сделать в проге типо icq чтобы когда прога свёрнута в трей и пришло сообщения появлялась табличка "пришло сообщение". Пример кода пожалуйста.


Pat   (2002-03-14 00:08:00) [1]

А что конкретно не получается?
Просил пример, лови...примерно так, если че - подправишь

procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
var h:hwnd;
begin
h:=GetForegroundWindow;
messagebox(h,"Вам пришло сообщение","My_ICQ",mb_ok);

//А лучше просто иконку в трее менять... :-))
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо