Ignore:
Timestamp:
Mar 8, 2012, 7:51:16 AM (13 years ago)
Author:
chronos
Message:
  • Removed: Main tabbed view of opened lists.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        55chronis.exe
        66DebugLog.txt
         7chronis.lps

  • trunk/Forms/UItemList.pas

    r32 r36  
    8787    NewItemViewForm.SelectedItemId := Integer(ListView1.Selected.Data);
    8888    NewItemViewForm.Caption := NewItemViewForm.Caption + ' ' + SelectedObject.Name;
    89     MainForm.AddTabForm(NewItemViewForm);
     89    MainForm.SetMainPanelForm(NewItemViewForm);
    9090  end;
    9191end;
    … …  
    120120    NewItemEditForm.SelectedItemId := Integer(ListView1.Selected.Data);
    121121    NewItemEditForm.Caption := NewItemEditForm.Caption + ' ' + SelectedObject.Name;
    122     MainForm.AddTabForm(NewItemEditForm);
     122    MainForm.SetMainPanelForm(NewItemEditForm);
    123123  end;
    124124end;
    … …  
    132132  NewItemAddForm.SelectedItemId := Integer(ListView1.Selected.Data);
    133133  NewItemAddForm.Caption := NewItemAddForm.Caption + ' ' + SelectedObject.Name;
    134   MainForm.AddTabForm(NewItemAddForm);
     134  MainForm.SetMainPanelForm(NewItemAddForm);
    135135end;
    136136
Note: See TracChangeset for help on using the changeset viewer.