anchor.diff:      edtInteger: TfpgEditInteger;
       edtFloat: TfpgEditFloat;
       btnQuit: TfpgButton;
  +    rbPoint: TfpgRadioButton;
  +    rbComma: TfpgRadioButton;
  +    lbNegativeColor: TfpgColorListBox;
  +    lblNegativeColor: TfpgLabel;
       {@VFD_HEAD_END: MainForm}
       procedure AfterCreate; override;
     end;
  
positive.code: {@VFD_NEWFORM_DECL}
  
  
  
  {@VFD_NEWFORM_IMPL}
  
  procedure TMainForm.btnQuitClicked(Sender: TObject);
  begin
    Close;
  end;
  
  procedure TMainForm.AfterCreate;
  begin
    {@VFD_BODY_BEGIN: MainForm}
    Name := 'MainForm';
    SetPosition(363, 198, 271, 234);
    WindowTitle := 'Edit components';
    WindowPosition := wpScreenCenter;
  
  
negative.code:   {$IFDEF UNIX}{$IFDEF UseCThreads}
    cthreads,
    {$ENDIF}{$ENDIF}
    Classes, fpgfx, gui_form, gui_label, gui_edit, gui_button, gui_radiobutton,
    gui_listbox, gfxbase;
  
  type
  
    { TMainForm }
  
    TMainForm = class(TfpgForm)
    private
      procedure btnQuitClicked(Sender: TObject);
      procedure rbClicked(Sender: TObject);
      procedure lbChange(Sender: TObject);
    public
      {@VFD_HEAD_BEGIN: MainForm}
      lblName1: TfpgLabel;
  