Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.06;
Скачать: [xml.tar.bz2];

Вниз

МАСТЕРА! Как записывать и считывать из файла длинные строки?   Найти похожие ветки 

 
WinSetup   (2002-12-23 18:14) [0]

МАСТЕРА! Как записывать и считывать из файла длинные строки (более 255 символов)?


 
MBo   (2002-12-23 18:24) [1]

объявить их просто как string без указания длины (по умолчанию это AnsiString - длина практически не ограничена)


 
WinSetup   (2002-12-23 18:36) [2]

Спасибо за ответ!
Этот способ будет работать для текстовых файлов. А как работать с нетипиризированными файлами (block/write/read)?


 
MBo   (2002-12-23 18:46) [3]

в blockwrite указываешь s[1] и length(s), а при чтении сначала setlength делаешь (длину строки перед ней, конечно, придется писать)


 
WinSetup   (2002-12-23 18:52) [4]

Спасибо! Попробую


 
gsu   (2002-12-23 18:53) [5]

Можешь вначале сохранить заголовок с размерностью


 
WinSetup   (2002-12-23 19:04) [6]

var
f:file;
s:string;
begin
s:="qwerty";
assignfile(f,"c:\1.txt");
rewrite(f);
blockwrite(f,s[1],length(s[1]));
closefile(f);
end;

При выполнении в файл записывается 128 байт (а если - length(s), то 768), можно ли записать столько байт, сколько символов содержится в строке?


 
Skier   (2002-12-23 19:18) [7]

blockwrite(f,s[1], length(s));
И смотри внимательней...тебе уже MBo всё сказал...


 
WinSetup   (2002-12-23 19:22) [8]

>>Skier
Я же указал, что если использовать length(s), то в файл записывается 768 байт


 
gsu   (2002-12-23 19:24) [9]

А причем здесь s[1] ?


 
ZrenBy   (2002-12-23 19:27) [10]

Rewrite(f, 1); { Record size = 1 }

The entire block transferred occupies at most Count * RecSize bytes. RecSize is the record size specified when the file was opened (or 128 if the record size was unspecified).


 
WinSetup   (2002-12-23 19:30) [11]

>>ZrenBy
Спасибо!!!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.036 c
1-15085
dkDimon
2002-12-21 19:13
2003.01.06
Иконка приложения


1-15010
viper
2002-12-24 12:39
2003.01.06
dbgrid


8-15181
lak_b
2002-09-07 15:34
2003.01.06
таймер с милисекуддами


1-15092
Masya2001
2002-12-21 21:20
2003.01.06
помогите как осущиствить?


4-15345
Cosmic
2002-11-17 13:03
2003.01.06
Как иконку свернуть в трей?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский