Форум: "Начинающим";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];
Вниз
Корректный Mini_Archiver Найти похожие ветки
← →
kyn66 (2008-03-26 10:42) [0]Может кто знает такую утилиту - САБЖ. Нашел на http://www.delphisources.ru/pages/sources/system/2008-year/mini-archiver.html Заинтересовала тем, что хотелось разобраться самому, как пишутся архиваторы. Но в самом начале были получены огорчения... Если задать архиву коммент, русскими буквами, то при попытке открытия выдается ошибка Access violation. Я так полагаю, что ошибка кроется в описании коммента в записи
type
TArchiveHead=packed record
Signature:array[0..2] of char;
Version:String[4];
Author:array[0..11] of char;
Comment:String;
CountFiles:longint;
PasswordProtect:Boolean;
end;
А хоть и ангельскими буквами ввести - показывает некий кракозябрик, правда зато не вылетает при открытии архива. Что скажут мастера по этому поводу?
← →
tesseract © (2008-03-26 10:47) [1]А ты этот Comment не сама ввела ?
string не может быть в packed record, обявляй как String[255].
← →
kyn66 (2008-03-26 11:00) [2]Коммент ессно сам ввожу. Вот насчет String я и имею ввиду/ Так вроде нельзя.
← →
tesseract © (2008-03-26 11:15) [3]
> Вот насчет String я и имею ввиду/ Так вроде нельзя.
String тебе длину даст в 4 байта в записи. Это ссылка. Поэтому работать не будет.
>> Author:array[0..11] of char;
не зря тут не string применяеться, ой не зря :-) Задай Comment:array [0..255]of char и всё начнёт работать.
← →
kyn66 (2008-03-26 15:11) [4]Заработало, уже проверил, Сенькс за легбез(хотя и не я автор этой проги ;-))
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.039 c
