Delphi Can

Orjinalini görmek için tıklayınız: StatusBar nasıl resim ekliyebilirim?
Şu anda (Arşiv) modunu görüntülemektesiniz. Orjinal Sürümü Görüntüle internal link
StatusBar resim eklemek için ne yapmalıyım.Teşekkürler
(02-04-2019, Saat: 23:59)burak Adlı Kullanıcıdan Alıntı: [ -> ]StatusBar resim eklemek için ne yapmalıyım.Teşekkürler

StatusBar'a bir adet panel ekleyin ve eklediğiniz panel'in Style özelliğini psOwnerDraw yapın, ardından StatusBar'ın OnDrawPanel olay yöneticisinde;

StatusBar.Canvas.Draw(1, 1, Image1.Picture.Graphic);

gibi bir kod kullanabilirsiniz.
Merhaba
Söylediklerini uyguladım ancak StatusBar.Canvas.Draw(1, 1,); burdan sonrasını anlıyamadım.Cevap için teşekkürler.
sayın @Tuğrul HELVACI  beyin izniyle

formdaki status bara  panel ekleyin 
eklediğiniz paneli secin 
properties / style  seceneğinden
psownerdraw  secin

sonra formdaki statusbar secin 
events  ondrawpanel çift tıklayın.

procedure TForm1.FormShow(Sender: TObject);
begin
StatusBar1.Panels[1].Text:= ' Merbaba delphican ';
end;

procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar; Panel: TStatusPanel; const Rect: TRect);
begin
statusbar1.Canvas.Draw( Rect.Left, Rect.Top, image1.Picture.Graphic );  //  image1.Picture.Graphic status bara eklenecek resim
End;
Tüm bunlardan önce forma bir timage koyup içine bir resim çekin ki canvas a çizebilsin yoksa image1 undefined veya undeclare gibi bir hata verip durur.
Teşekkürler
(12-04-2019, Saat: 16:48)burak Adlı Kullanıcıdan Alıntı: [ -> ]Teşekkürler

Teşekkürü ayrıca puan vererek de yaparsanız güzel olur  Idea
İnanın puan vermek, soru sormaktan kolay  Wink