anchor.diff:    pcEditor.Align := alClient;
   
     pnlClientArea.Realign;
  +
  +  SetupProjectTree;
  +  SetupFilesGrid;
   end;
   
   constructor TMainForm.Create(AOwner: TComponent);
  
positive.code: 
  uses
    SysUtils, Classes, fpg_base, fpg_main, fpg_form, fpg_menu, fpg_panel,
    fpg_button, fpg_splitter, fpg_tab, fpg_memo, fpg_label;
  
  type
  
  
negative.code:     AddMenuItem('About fpGUI IDE...', '', @miAboutIDE);
    end;
  
    tsMessages := TfpgTabSheet.Create(pnlWindow);
    with tsMessages do
    begin
      Name := 'tsMessages';
      SetPosition(3, 24, 258, 57);
      Text := 'Messages';
    end;
  
    tsScribble := TfpgTabSheet.Create(pnlWindow);
    with tsScribble do
    begin
      Name := 'tsScribble';
      SetPosition(3, 24, 258, 57);
      Text := 'Scribble';
    end;
  
    tsTerminal := TfpgTabSheet.Create(pnlWindow);
    with tsTerminal do
    begin
      Name := 'tsTerminal';
      SetPosition(3, 24, 258, 57);
      Text := 'Terminal';
    end;
  
    tsProject := TfpgTabSheet.Create(pnlTool);
    with tsProject do
    begin
      Name := 'tsProject';
      SetPosition(3, 24, 134, 109);
      Text := 'Project';
    end;
  
    tsFiles := TfpgTabSheet.Create(pnlTool);
    with tsFiles do
    begin
      Name := 'tsFiles';
      SetPosition(3, 24, 134, 109);
      Text := 'Files';
    end;
  
    tvProject := TfpgTreeView.Create(tsProject);
    with tvProject do
    begin
      Name := 'tvProject';
      SetPosition(1, 1, 132, 107);
      Anchors := [anLeft,anRight,anTop,anBottom];
      FontDesc := '#Label1';
      Hint := '';
      TabOrder := 1;
    end;
  
    grdFiles := TfpgFileGrid.Create(tsFiles);
    with grdFiles do
    begin
      Name := 'grdFiles';
      SetPosition(1, 1, 131, 106);
      Anchors := [anLeft,anRight,anTop,anBottom];
    end;
  
    grdMessages := TfpgStringGrid.Create(tsMessages);
    with grdMessages do
    begin
      Name := 'grdMessages';
      SetPosition(0, 4, 258, 52);
      Anchors := [anLeft,anRight,anTop,anBottom];
      AddColumn('New', 258, taLeftJustify);
      FontDesc := '#Grid';
      HeaderFontDesc := '#GridHeader';
      Hint := '';
      RowCount := 3;
      RowSelect := True;
      ShowHeader := False;
      TabOrder := 1;
    end;
  
    memScribble := TfpgMemo.Create(tsScribble);
    with memScribble do
    begin
      Name := 'memScribble';
      SetPosition(0, 4, 257, 52);
      Anchors := [anLeft,anRight,anTop,anBottom];
      Hint := '';
      Lines.Add('Make notes, use it as a clipboard');
      Lines.Add('or type whatever you want...');
      FontDesc := '#Edit2';
      TabOrder := 1;
    end;
  
    {@VFD_BODY_END: MainForm}
    {%endregion}
  
  