Source position: bcsamples.pas line 179
procedure DrawWindows7ToolBar(
ABitmap: TBGRABitmap;
ADir: TAlign;
Smooth: Boolean = False
);