Source position: bcsamples.pas line 151
procedure StyleButtonsFocusSample(
AControl: TControl;
AStyle: TBCSampleStyle
);