MapName: String;
idx: Integer;
begin
+ SelectMapForm.Caption := _lc[I_CAP_OPEN];
SelectMapForm.GetMaps(FileName);
if (FileName = OpenedWAD) and
if i > 0 then
begin
g_ProcessResourceStr(OpenedMap, @FileName, nil, nil);
+ SelectMapForm.Caption := _lc[I_CAP_SELECT];
SelectMapForm.GetMaps(FileName);
if SelectMapForm.ShowModal() = mrOK then
else if Key = _lc[I_PROP_TR_NEXT_MAP] then
begin // Выбор следующей карты:
g_ProcessResourceStr(OpenedMap, @FileName, nil, nil);
+ SelectMapForm.Caption := _lc[I_CAP_SELECT];
SelectMapForm.GetMaps(FileName);
if SelectMapForm.ShowModal() = mrOK then
MapList := WAD.GetResourcesList('');
+ SelectMapForm.Caption := _lc[I_CAP_REMOVE];
SelectMapForm.lbMapList.Items.Clear();
if MapList <> nil then
I_CAP_SAVE,
I_CAP_MINI,
I_CAP_SELECT,
-
+ I_CAP_OPEN,
+ I_CAP_REMOVE,
+
I_CTRL_PROP_KEY,
I_CTRL_PROP_VALUE,
I_CTRL_PANELS,
'Сохранить мини-карту'),
('CAP SELECT', 'Select Map',
'Выберите карту'),
+ ('CAP OPEN', 'Open Map',
+ 'Открыть карту'),
+ ('CAP REMOVE', 'Remove Map',
+ 'Удалить карту'),
('CTRL PROP KEY', 'Property',
'Свойство'),