![]() |
![]() |
nagim |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 7 Пол: Мужской Репутация: ![]() ![]() ![]() |
Народ! У кого есть какой-нибудь продвинутый компилятор с поддержкой длинных имен файлов и русских символов в названиях файлов - просьба: перекомпильте мне этот исходник, шоб я мог его юзать и с русскими файлами (исходник на TP):
program big_del;
var
file1,file2:file; f1,f2:string; m1,m2:longint;
begin
f1:=ParamStr(1);
f2:=ParamStr(2);
Assign(file1, f1);
Reset(file1);
Assign(file2, f2);
Reset(file2);
m1:=filesize(file1);
m2:=filesize(file2);
close(file1);
close(file2);
if m1<=m2 then Erase(file2) else Erase(file1);
end.
Если что: прога берет названия фалов из двух параметров и удаляет тот из них, размер которого больше. То бишь "big_del.exe -notepad.exe -winxp.iso" - уйдет есс-но второй ![]() Жду здесь: <...> Заранее спасибо. Читаем правила... Ты пришел на форум - общайся на форуме... -- Админ, ты мыло от url'а отличаешь? Сообщение отредактировано: nagim - 24.03.2007 13:53 |
![]() ![]() |
![]() |
Текстовая версия | 28.07.2025 6:33 |