Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@338 0c75b7a4-871f-7646-8a2f-f78d34cc349f

Browse Source
This commit is contained in:
David Arranz 2008-03-12 17:52:08 +00:00
parent 2668fd88cf
commit c2d041f7cc
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Source/Servidor/Utiles/uServerAppUtils.pas
View File

@ -15,6 +15,7 @@ uses
procedure ShowBalloonHint(const AMensaje: String; ABalloonIcon: TBalloonFlags); procedure ShowBalloonHint(const AMensaje: String; ABalloonIcon: TBalloonFlags);
begin begin
if Assigned(fServerForm) then
with fServerForm.TrayIcon1 do with fServerForm.TrayIcon1 do
begin begin
BalloonTitle := 'FactuGES (Servidor)'; BalloonTitle := 'FactuGES (Servidor)';