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