Entwickler-Ecke

Open Source Units - Growl


matze - Sa 01.03.08 15:02
Titel: Growl
Hallo liebe Community,

Im Zuge eines Projektes, an dem ich beschäftigt war, stand ich vor der Aufgabe von meinem Server, der unter Windows läuft eine Benachrichtigung über bestimmte Ereignisse an die Rechner im Netzwerk zu senden. Leider war diese Firma eine Design-Agentur. Also nur MACs im Büro. Nachdem mit E-Mails zu unspektakulär waren, bin ich auf Growl gestoßen.
Growl ist ein Notification-Client für Mac OS. Praktischerweise bringt Growl [http://growl.info] ein UDP Protokoll mit, womit man Benachrichtigungen senden kann.

Hier stelle ich nun also die Klasse vor, mit der man diese Nachrichten versenden kann.

Die Bedienung ist denkbar einfach:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
var
  Growl: TGrowlNotification;
begin
  growl := TGrowlNotification.Create('Name meines Programmes');
  try
    try
      growl.adress := '192.168.1.1';
      growl.RegisterApplication;
      growl.SendNotification('Überschrift','Text');
    except
    end;
  finally
    growl.Free;
  end;
end;


auf dem Mac sieht das dann z.b. so aus:

user defined image

Hinweise:

An dieser Stelle möchte ich mich ganz Herzlich bei user profile iconNarses bedanken und bei allen anderen, die mir bei der Programmierung geholfen haben.
Diese Klasse entstand größtenteils in diesem Topic: http://www.delphi-forum.de/viewtopic.php?t=81164
Ausserdem gibt eine kleine Website, auf der ich das Projekt vorstelle: http://growl.matf.de

Viel Spass damit !
Matze