Source position: bgrasamples.pas line 116
procedure DrawSilverBodyButtonSquared(
AButton: TBGRAButton
);