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

Прога типа аськи...   Найти похожие ветки 

← →
sany ©   (2002-03-13 21:14) [0]

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

---

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

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

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

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



---

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

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



Память: 0.44 MB
Время: 0.014 c