Source position: gadtools.pas line 440
procedure DrawBevelBoxA(
RPort: PRastPort;
Left: LongInt;
Top: LongInt;
Width: LongInt;
Height: LongInt;
const TagList: PTagItem
);