Delphi’de Form’da ToolBar Kullanımı 

Merhaba arkadaşlar bu makalemizde Delphi’de Toolbar uygulamasını göreceğiz. İlk önce formumuza ToolBar ve ImageList ekleyelim. Eklediğimiz ImageList’e sağ tıklayıp ImageList Editor’e tıklayalım. Açılan ImageList penceresinde ToolBar’da gösterimini sağlayacağımız buttonların image larını Add butonuna tıklayarak ekleyeceğiz. 

Şekil 1

Şimdi ToolBar’a sağ tıklayıp, New Buton’a tıklayarak ToolBar’a buton ekleyeceğiz. Eklediğimiz butonu seçelim. Object Inspector kısmında ImageIndex kısmında ImageList’de eklenilen image numarasını seçelim. Buton üzerine gelince Tooltip yazısı çıkması için Hint kısmına ToolTip yazısını ekleyelim.

Şekil 2

unit toolbar_Unit1;

interface

uses

Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics

Vcl.Controls, Vcl.Forms, Vcl.Dialogs, System.ImageList, Vcl.ImgList,

Vcl.ToolWin, Vcl.ComCtrls;

type

TForm1 = class(TForm)

ToolBar1: TToolBar;

ImageList1: TImageList;

ToolButton1: TToolButton;

ToolButton2: TToolButton;

ToolButton3: TToolButton;

ToolButton4: TToolButton;

ToolButton5: TToolButton;

ToolButton6: TToolButton;

ToolButton7: TToolButton;

ToolButton8: TToolButton;

ToolButton9: TToolButton;

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

end.

Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN