Changeset 391 for trunk/Packages


Ignore:
Timestamp:
Jan 5, 2025, 9:08:52 PM (2 weeks ago)
Author:
chronos
Message:
  • Fixed: Add new players with different colors.
Location:
trunk/Packages/Common
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • trunk/Packages/Common/Forms/FormList.pas

    r373 r391  
    7272  SRemoveItems = 'Remove items';
    7373  SRemoveItemsQuery = 'Do you want to remove selected items?';
    74   SNew = 'New';
    7574
    7675{ TFormList }
    … …  
    129128  FormItem := TFormItem.Create(Self);
    130129  try
    131     TempEntry.Name := FList.GetNextAvailableName(SNew + ' ' + LowerCase(List.GetName));
     130    TempEntry.Name := FList.GetNextAvailableName(List.GetName);
    132131    FormItem.Item := TempEntry;
    133132    if FormItem.ShowModal = mrOk then begin

  • trunk/Packages/Common/ItemList.pas

    r359 r391  
    368368  NewName: string);
    369369begin
    370   NewName := Name;
     370  NewName := Name + ' 1';
    371371  while Assigned(FindByName(NewName)) do
    372372    NewName := IncrementName(NewName);

  • trunk/Packages/Common/Languages/FormList.cs.po

    r364 r391  
    1212"X-Generator: Poedit 3.5\n"
    1313
    14 #: formlist.snew
    15 msgid "New"
    16 msgstr "Nová"
    17 
    1814#: formlist.sremoveitems
    1915msgid "Remove items"

  • trunk/Packages/Common/Languages/FormList.pot

    r355 r391  
    11msgid ""
    22msgstr "Content-Type: text/plain; charset=UTF-8"
    3 
    4 #: formlist.snew
    5 msgid "New"
    6 msgstr ""
    73
    84#: formlist.sremoveitems
Note: See TracChangeset for help on using the changeset viewer.