TGtkCalendar

type TGtkCalendar = object(TGtkWidget)

  priv1: PGtkCalendarPrivate;

  function new;

  procedure clear_marks;

  procedure get_date();

  function get_day_is_marked();

  function get_detail_height_rows;

  function get_detail_width_chars;

  function get_display_options;

  procedure mark_day();

  procedure select_day();

  procedure select_month();

  procedure set_detail_func();

  procedure set_detail_height_rows();

  procedure set_detail_width_chars();

  procedure set_display_options();

  procedure unmark_day();

  property detail_height_rows: gint; [rw]

  property detail_width_chars: gint; [rw]

end;

TGtkCalendar

TGtkWidget

TGInitiallyUnowned

TGObject