20.06.2008, 17:56
|
|
Постоянный
Регистрация: 30.04.2008
Сообщений: 323
С нами:
9489537
Репутация:
136
|
|
Nightmarе
1.
Код:
for i:=0 to Memo1.Lines.Count-1 do
begin
if not deletefile(Memo1.Lines[i]) then continue; // к следующему файлу
end;
2.
Отрезай с помощью SetLength(), узнавая длину последние символы.
|
|
|