Source position: gtkwsmenus.pp line 70
protected class procedure TGtkWSPopupMenu.SetCallbacks(
const AGtkWidget: PGtkWidget;
const AWidgetInfo: PWidgetInfo
); virtual;