anchor.diff:    typinfo,
     Sysutils,
     fpg_base, fpg_main, fpg_form, fpg_button, fpg_label,
  -  fpg_memo, fpg_dialogs, fpg_utils, fpg_radiobutton,
  +  fpg_memo, fpg_dialogs, fpg_utils, fpg_stringutils, fpg_radiobutton,
     fpg_textedit, fpg_checkbox, fpg_panel;
     
   type
  
positive.code: 
  
  { TMainForm }
  
  procedure TMainForm.ShowGutterChanged(Sender: TObject);
  begin
  
negative.code:     Name := 'TextEdit';
      SetPosition(300, 172, 280, 235);
      Anchors := [anLeft,anRight,anTop,anBottom];
      Lines.Add('program Test1;');
      Lines.Add('{$mode objfpc}{$H+}');
      Lines.Add('uses');
      Lines.Add('  classes;');
      Lines.Add('var');
      Lines.Add('  i: integer;');
      Lines.Add('begin');
      Lines.Add('  writeln(i);');
      Lines.Add('end.');
      Lines.Add('');
      //    FontDesc := '#Edit1';
      FontDesc := 'Bitstream Vera Sans Mono-10';
      //    Lines.Insert(1,'0 Beforje 1 after');
      ParentShowHint := True;
      OnDrawLine := @TextEditDrawLine;
    end;
  
    btnLoad := TfpgButton.Create(self);
  