Cita:
Empezado por olivia88
¡perfecto!, es justo lo que estaba buscando, complementa perfectamente con el tip que dio ecfisa! Lord Delfos, te lo agradesco mil =)
|
De nada, un gusto poder ayudar.
Por cierto, hace un tiempo yo hice lo mismo que querés hacer vos...
Algunas ideas.
Código Delphi
[-]
procedure TfrmSentinela.MostrarTooltip;
var Info, Titulo: String;
begin
TrayIconData.cbSize:= SizeOf(TrayIconData); TrayIconData.uFlags:= NIF_INFO;
Info:= 'Este programa se está corriendo para poder avisarte de próximos eventos bla bla bla. Hacé click en el ícono para más opciones...';
StrPLCopy(TrayIconData.szInfo, Info, SizeOf(TrayIconData.szInfo) - 1);
TrayIconData.Nada.uTimeout:= 3000;
Titulo:= 'Este programa se está corriendo.';
StrPLCopy(TrayIconData.szInfoTitle, Titulo, SizeOf(TrayIconData.szInfoTitle) - 1);
TrayIconData.dwInfoFlags:= NIIF_INFO;
Shell_NotifyIcon(NIM_MODIFY, @TrayIconData);
TrayIconData.Nada.uVersion:= NOTIFYICON_VERSION;
Shell_NotifyIcon(NIM_SETVERSION, @TrayIconData);
end;
Lo de la ventanita tipo MSN popup es un poco más largo, cualquier cosa preguntá.
Cita:
Empezado por ecfisa
Así somos los Tresarroyenses...
|
Lo curioso sería que uno sea de la Tres Arroyos de Bs. As., Argentina, y otro fuera de otra...
Porque hay varias.