anchor.diff:      Name := 'TextEdit';
       SetPosition(300, 172, 280, 235);
       Anchors := [anLeft,anRight,anTop,anBottom];
  -    Lines.Add('Memo Test0');
  -    Lines.Add('Memo Test1');
  -    Lines.Add('Memo Test2');
  -    Lines.Add('Memo Test3');
  -    Lines.Add('Memo Test4');
  +    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);
  
positive.code: 
  
  { TMainForm }
  
  procedure TMainForm.ShowGutterChanged(Sender: TObject);
  begin
  
negative.code:   typinfo,
    Sysutils,
    fpg_base, fpg_main, fpg_form, fpg_button, fpg_label,
    fpg_memo, fpg_dialogs, fpg_utils, fpg_stringutils, fpg_radiobutton,
    fpg_textedit, fpg_checkbox, fpg_panel;
    
  type
  