Source position: bgrasamples.pas line 69
procedure DrawWin7ToolBar(
ABitmap: TBGRABitmap;
ADir: TAlign;
Smooth: Boolean = False
);