Source position: gtkwscontrols.pp line 90
published class procedure TGtkWSWinControl.SetShape(
const AWinControl: TWinControl;
const AShape: HBITMAP
); override;