Changeset 32 for trunk/Forms/UItemView.pas

Timestamp:

Nov 24, 2011, 10:31:04 AM (13 years ago)

Author:

chronos

Message:

• Modified: Better form addition to tab list. Better tab titles.

File:

• trunk/Forms/UItemView.pas (modified) (1 diff)

trunk/Forms/UItemView.pas

@@ -110 +110 @@
   NewItemEditForm.SelectedObject.Assign(SelectedObject);
   NewItemEditForm.SelectedItemId := SelectedItemId;
+  NewItemEditForm.Caption := NewItemEditForm.Caption + ' ' + SelectedObject.Name;
   MainForm.AddTabForm(NewItemEditForm);
 end;