anchor.diff:    with bvlBody do
     begin
       Name := 'bvlBody';
  -    SetPosition(0, 31, 559, 308);
  +    SetPosition(0, 31, 653, 334);
       Anchors := [anLeft,anRight,anTop,anBottom];
       Shape := bsSpacer;
     end;
  
positive.code:   Files.Add(HelpFile);
  
    WindowTitle := cTitle + ' - ' + THelpFile( Files[ 0 ] ).Title;
  //  WindowTitle := cTitle + ' - ' + HelpFile.Title;
    fpgApplication.ProcessMessages;
  
    { TODO -oGraeme : Load previous notes here }
  
negative.code:   with btnGo do
    begin
      Name := 'btnGo';
      SetPosition(166, 4, 80, 24);
      Anchors := [anRight,anTop];
      Text := 'Go to';
      FontDesc := '#Label1';
      Hint := '';
      ImageName := '';
      TabOrder := 1;
      OnClick := @btnGoClicked;
    end;
  
    ListBox1 := TfpgListBox.Create(tsNotes);
    with ListBox1 do
    begin
      Name := 'ListBox1';
      SetPosition(4, 32, 242, 264);
      Anchors := [anLeft,anRight,anTop,anBottom];
      FontDesc := '#List';
      HotTrack := False;
      PopupFrame := False;
      TabOrder := 0;
    end;
  
    btnNotesAdd := TfpgButton.Create(tsNotes);
    with btnNotesAdd do
    begin
      Name := 'btnNotesAdd';
      SetPosition(4, 4, 24, 24);
      Text := '';
      FontDesc := '#Label1';
      Hint := '';
      ImageMargin := 0;
      ImageName := 'stdimg.add';
      TabOrder := 1;
    end;
  
    btnNotesEdit := TfpgButton.Create(tsNotes);
    with btnNotesEdit do
    begin
      Name := 'btnNotesEdit';
      SetPosition(32, 4, 24, 24);
      Text := '';
      FontDesc := '#Label1';
      Hint := '';
      ImageMargin := 0;
      ImageName := 'stdimg.edit';
      TabOrder := 2;
    end;
  
    btnNotesDel := TfpgButton.Create(tsNotes);
    with btnNotesDel do
    begin
      Name := 'btnNotesDel';
      SetPosition(60, 4, 24, 24);
      Text := '';
      FontDesc := '#Label1';
      Hint := '';
      ImageMargin := 0;
      ImageName := 'stdimg.remove';
      TabOrder := 3;
    end;
  
    btnNotesGoto := TfpgButton.Create(tsNotes);
    with btnNotesGoto do
    begin
      Name := 'btnNotesGoto';
      SetPosition(166, 4, 80, 24);
      Anchors := [anRight,anTop];
      Text := 'Go to';
      FontDesc := '#Label1';
      Hint := '';
      ImageName := '';
      TabOrder := 4;
    end;
  
    lbHistory := TfpgListBox.Create(tsHistory);
    with lbHistory do
    begin
      Name := 'lbHistory';
      SetPosition(4, 8, 242, 288);
      Anchors := [anLeft,anRight,anTop,anBottom];
      FontDesc := '#List';
      HotTrack := False;
      PopupFrame := False;
      TabOrder := 0;
    end;
  
    Label1 := TfpgLabel.Create(tsSearch);
    with Label1 do
    begin
      Name := 'Label1';
      SetPosition(4, 4, 120, 16);
      FontDesc := '#Label1';
      Hint := '';
      Text := 'Search for:';
    end;
  
    edSearchText := TfpgEdit.Create(tsSearch);
    with edSearchText do
    begin
      Name := 'edSearchText';
      SetPosition(4, 20, 242, 24);
      Anchors := [anLeft,anRight,anTop];
      TabOrder := 1;
      Text := '';
      FontDesc := '#Edit1';
    end;
  
    Label2 := TfpgLabel.Create(tsSearch);
    with Label2 do
    begin
      Name := 'Label2';
      SetPosition(4, 48, 172, 16);
      FontDesc := '#Label1';
      Hint := '';
      Text := 'Criteria:';
    end;
  
    RadioButton1 := TfpgRadioButton.Create(tsSearch);
    with RadioButton1 do
    begin
      Name := 'RadioButton1';
      SetPosition(12, 68, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 3;
      Text := 'This section';
    end;
  
    RadioButton2 := TfpgRadioButton.Create(tsSearch);
    with RadioButton2 do
    begin
      Name := 'RadioButton2';
      SetPosition(12, 88, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 4;
      Text := 'Marked sections';
    end;
  
    RadioButton3 := TfpgRadioButton.Create(tsSearch);
    with RadioButton3 do
    begin
      Name := 'RadioButton3';
      SetPosition(12, 108, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 5;
      Text := 'All sections';
    end;
  
    RadioButton4 := TfpgRadioButton.Create(tsSearch);
    with RadioButton4 do
    begin
      Name := 'RadioButton4';
      SetPosition(12, 128, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 6;
      Text := 'Index';
    end;
  
    RadioButton5 := TfpgRadioButton.Create(tsSearch);
    with RadioButton5 do
    begin
      Name := 'RadioButton5';
      SetPosition(12, 148, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 7;
      Text := 'Marked libraries';
    end;
  
    RadioButton6 := TfpgRadioButton.Create(tsSearch);
    with RadioButton6 do
    begin
      Name := 'RadioButton6';
      SetPosition(12, 168, 192, 20);
      FontDesc := '#Label1';
      GroupIndex := 0;
      TabOrder := 8;
      Text := 'All libraries';
    end;
  
    lbSearchResults := TfpgListBox.Create(tsSearch);
    with lbSearchResults do
    begin
      Name := 'lbSearchResults';
      SetPosition(4, 220, 242, 76);
      Anchors := [anLeft,anRight,anTop,anBottom];
      FontDesc := '#List';
      HotTrack := False;
      PopupFrame := False;
      TabOrder := 9;
    end;
  
    Label3 := TfpgLabel.Create(tsSearch);
    with Label3 do
    begin
      Name := 'Label3';
      SetPosition(4, 200, 196, 16);
      FontDesc := '#Label1';
      Hint := '';
      Text := 'Search results:';
    end;
  
    {@VFD_BODY_END: MainForm}
  