Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

удаление строки из массива строкового типа [D5, WinME]


Вал ©   (2002-11-20 16:48:00) 

Может кто-нибудь поможет решить задачу, я никак не могу понять как данным способом удалить строку из массива:
Дан массив строкового типа (пусть это b[i]), нужно удалить строку (например b[4])посредством вызова из основной программы процедуры, которая собственно и удаляет строку. Не ясно не то, как вызвать процедуру, а как удаляется строка в цикле:

procedure del( );
var i : integer;
begin
for i := 1 to m do
a[ ] := a[ ];
m := ;
end;
То есть имеется практически весь код, осталось вставить недостающие значения, но вот никак не могу понять, как же всё таки в цикле удаляется строка? Номер строки известен!


KoluChi   (2002-11-20 16:54:00) [1]

Лучше пользоваться TStrings - Delete().
Но если все-таки массив:
mas[i] := ""; //пустая строка
можно со сдвигом, но для обычных массивов не вижу в этом смысла
(размерность все равно не меняется)
for I := index to High(mas) do
mas[I] := mas[I+1];
mas[High(mas)] := ""; //все равно остается пустая строка

Если открытый массив, то поменять размерность.


han_malign   (2002-11-20 16:53:00) [2]

если a - открытый массив
for i:=m to High(a)-1 do a[i]:=a[i+1];
SetLength(a,length(a)-1);
или
for i:=m to N-2 do a[i]:=a[i+1];
dec(N);
где m- номер удаляемой строки, N- размер массива


Наверх

Титульная страница Поиск, карта сайта Написать письмо