Windowsa mesaj ekranı verme

[brs]

Selam normalde delphi içinde Label1.Caption := 'Program kapatılıyor!'; gibi label ile mesaj veriyoruz program minimize edildiğinde label görünmediğinden bu mesajı windows ile verme imkanı var mı?

Örnek:

[G.Arkas]

Bahsettiğiniz işlemin adı Balloon Hint'tir.

http://www.swissdelphicenter.ch/torry/s ... hp?id=1164

[brs]

Balloon biliyordum,sadece programda kullanabilir sanıyordum

[brs]

Çözümü buldum, forma bir TrayIcon ekliyoruz ve sonrasında kodları kendinize göre uyarlıyoruz...

Kod: Tümünü seç

procedure TForm3.TrayIcon1Click(Sender: TObject);
begin
  TrayIcon1.Visible := False;
  Show();
  WindowState := wsNormal;
  Application.BringToFront();
end;

procedure TForm3.FormResize(Sender: TObject);
begin
  if WindowState = wsMinimized then
  begin
    TrayIcon1.Visible := True;
    TrayIcon1.BalloonHint := 'Form Minimeze Edildi!';
    TrayIcon1.BalloonFlags := bfInfo;
    TrayIcon1.ShowBalloonHint();
  end;
end;