TCHMWindow

type TCHMWindow = class

  window_type: string;

  Title_bar_text: string;

  Toc_file: string;

  index_file: string;

  Default_File: string;

  Home_button_file: string;

  Jumpbutton_1_File: string;

  Jumpbutton_1_Text: string;

  Jumpbutton_2_File: string;

  Jumpbutton_2_Text: string;

  nav_style: Integer;

  navpanewidth: Integer;

  buttons: Integer;

  left: Integer;

  top: Integer;

  right: Integer;

  bottom: Integer;

  styleflags: Integer;

  xtdstyleflags: Integer;

  window_show_state: Integer;

  navpane_initially_closed: Integer;

  navpane_default: Integer;

  navpane_location: Integer;

  wm_notify_id: Integer;

  flags: TValidWindowFields;

  constructor create();

  procedure load_from_ini();

  procedure SaveToIni();

  procedure savetoxml();

  procedure loadfromxml();

  procedure assign();

end;

TCHMWindow

TObject