Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.16;
Скачать: CL | DM;

Вниз

поток данных в виде TextFile...   Найти похожие ветки 

 
Secam   (2004-12-26 16:17) [0]

Уважаеме Мастера,

Есть такая проблема. В одном компоненте, не мной написаном есть набор функций, реализующий обмен данными через сокет.
Сокет привязан к манипулятору типа TextFile.
А проблема вот в чем:
Во первых "\r\n" если во входных данных конец строки обозначается просто "\n" то функция ReadLn(f,str); вообще ничего читать из манипулятора не хочет.
Во вторых, Признак EOF естесственно не работает, т.к. это не
файл а поток данных. Я знаю длину в байтах, сколько нужно прочитать. Если я выйду за границу то readln застрянет в ожидании новых данных, которые никогда не придут.
Есть ли какой-то способ прочитать из TextFile без read и readLn,
т.к. очень не хочется привязываться к "\r\n" и накладывать ограничение, чтобы в конце данных обязательно была пустая строка.


 
Просто Джо ©   (2004-12-27 00:39) [1]

Есть ли какой-то способ прочитать из TextFile без read и readLn


var
 FileVar: file;

или

 FileStream: TFileStream


Да мало ли...


 
Fay ©   (2004-12-27 04:06) [2]

CreateFile/SetFilePointer/ReadFile/CloseHandle


 
Secam   (2004-12-27 09:36) [3]

Нет, я не про то,
Если я поменяю в объявлении класса

var
FileVar: Textfile;

на

var
FileVar: file;

тогда, как я уже говорил, компонент даст несоответствие типов, это было первое, что пришло мне в голову. Вся проблема в том, что манипулятор надо оставить типа TextFile (ну или как-то может преобразовать тип ...)

А с ReadFile Сейчас попробую что-нибудь придумать ...


 
Secam   (2004-12-27 09:57) [4]

Нет, ReadFile тоже дает несоответствие типов ...
Не работает он с ReadFile



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

Текущий архив: 2005.01.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.059 c
9-1095626075
Darthman
2004-09-20 00:34
2005.01.16
Незнаю зачем я ее делал... но вообщем кому интересно гляньте


4-1101412703
dimonka
2004-11-25 22:58
2005.01.16
Загрузка имен файлов в Combobox


9-1096752441
Anybody
2004-10-03 01:27
2005.01.16
Вопрос про LagCount


10-1080216496
Comwad
2004-03-25 15:08
2005.01.16
Два SmartAgent-a в одной подсети.


4-1101492834
VDevel
2004-11-26 21:13
2005.01.16
Адрес DNS