Statusbar + Image?

[Micha]

Hallo zusammen,

ich möchte in einer Statuszeile noch ein kleines Image mit einbinden, wie man es vom InternetExplorer her kennt.

Gibt es eine Möglichkeit dies zu realisieren?

[neolithos]

Mal des Panel doch selber. Setze es auf psOwnerDraw und fülle OnDrawPanel mit Code.

[Micha]

Aja, schon mal gut. Danke.

Kannst du mir dann bitte noch kurz erläutern, wie der Code dafür aussehen soll?!
Brauch ich dann dazu eine Image-Objekt?

[neolithos]

z.B.

Delphi-Quellcode:

    if Panel := StatusBar.Panels[1] then // richtige Panel
      ImageList1.Draw(StatusBar.Canvas, Rect.Left, Rect.Right, 0);

Der rest ist deine Sache...

[Micha]

Yes, thanks.

[Luckie]

So geht es einfachher:

Delphi-Quellcode:

hIcon := LoadImage(hInstance, MAKEINTRESOURCE(4), IMAGE_ICON, 16, 16, LR_DEFAULTCOLOR);
SendMessage(hStatusBar, SB_SETICON, 0, hIcon);

Icon aus einer Ressource laden (LoadImage) und mit SB_SETICON einfügen. Der dritte Parameter von Sendmesssage gibt das Panel an, hier das erste.