TGtkMenu

type TGtkMenu = record

  menu_shell: TGtkMenuShell;

  parent_menu_item: PGtkWidget;

  old_active_menu_item: PGtkWidget;

  accel_group: PGtkAccelGroup;

  position_func: TGtkMenuPositionFunc;

  position_func_data: gpointer;

  toplevel: PGtkWidget;

  tearoff_window: PGtkWidget;

  flag0: Word;

end;