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

Вниз

представление файла в байтовом виде   Найти похожие ветки 

 
defen2204   (2011-11-05 08:57) [0]

доброго времени суток. Вопрос вроде банальный, но ответ я так сам и не нашел. есть необходимость получить представление файла в виде последовательности байт. Открываю ч-з FileStream, считываю размер, имя и количество пакетов, на который он может быть разбит, а вот как получить именно тело файла я чет не догоняю
F.Seek(N * PackSize, soFromBeginning);
     if (F.Size - F.Position) < PackSize then
       PackSize := F.Size - F.Position;
     SetLength(Buf, PackSize);
     F.Read(Buf[1], PackSize);
     FEmpty := False;

но в переменной Buf много лишнего мусора.
помогите плиз....


 
MBo ©   (2011-11-05 09:13) [1]

Из периведенных данных ясно лишь, что Buf - строка.
Так что - не хватает деталей.

И за 17 строку рано или поздно приддётся отвечать ;)


 
defen2204   (2011-11-05 09:38) [2]

спасибо. разобрался. за какую строку?


 
MBo ©   (2011-11-05 09:53) [3]

>за какую строку?

http://www.delphimaster.net/view/15-1153734381/all

P.S. Вопросы начального уровня нужно задавать в форуме "Начинающим"


 
Inovet ©   (2011-11-05 09:53) [4]

> [2] defen2204   (05.11.11 09:38)
> за какую строку?

Ошибка в 17-й строке, т.е. в той, которая здесь не показана.


 
defen2204   (2011-11-05 10:09) [5]

понял. спасибо.



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

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

Наверх





Память: 0.45 MB
Время: 0.003 c
15-1319708929
Kerk
2011-10-27 13:48
2012.02.12
FireMonkey Webinar Announced


2-1320428134
tcjkjl
2011-11-04 20:35
2012.02.12
окружность колца


15-1319498590
Kerk
2011-10-25 03:23
2012.02.12
Умер John McCarthy


15-1319616809
OW
2011-10-26 12:13
2012.02.12
Подскажите с внешними командами с файлами к MSSQL(копировать)


15-1319518385
OW
2011-10-25 08:53
2012.02.12
Подскажите идею, алгоритм. Управление с запаздыванием.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский