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

Вниз

Как выгрузить TMemoryStream в PChar?   Найти похожие ветки 

 
neteditor   (2004-05-01 22:20) [0]

Делаю так,

_MemoryStream.Position := 0;
SetLength(_ReadBuf, _MemoryStream.Size);
_MemoryStream.Read(_ReadBuf, _MemoryStream.Size);

и не работает :)


 
Jack128 ©   (2004-05-01 22:27) [1]


> и не работает :)
</> в заключается <не работает>?? память под _ReadBuf выделена???


 
Mim1 ©   (2004-05-02 08:27) [2]

with tstrintstream.create do
 try
   ms.position;
   copyfrom(ms);
   messagebox(handle,pchar(datastring),"mim",0);
 finally
   free;
 end;


 
AGin   (2004-05-02 13:18) [3]

SetLength не выделяет память для PChar, следует использовать GetMem.
Но можно использовать и строку _ReadBuf, но тогда обращение другое:

_MemoryStream.Position := 0;
SetLength(_ReadBuf, _MemoryStream.Size);
_MemoryStream.Read(_ReadBuf[1], _MemoryStream.Size);


 
NS   (2004-05-04 07:17) [4]

А зачем тебе выгружать в PChar?
Если надо обратиться к тексту в потоке используй MemoryStream.Memory - возвращает указатель на начало потока. Только не забудь добавить в поток завершающий ноль.



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

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

Наверх





Память: 0.45 MB
Время: 0.031 c
1-1082987982
Alex Bakulin
2004-04-26 17:59
2004.05.16
TXMLDocument


3-1082091545
Hooch
2004-04-16 08:59
2004.05.16
recordset to xml


9-1073263023
Чюня
2004-01-05 03:37
2004.05.16
OpenGL


1-1083310166
bon
2004-04-30 11:29
2004.05.16
PoolBar


14-1082801250
DoG
2004-04-24 14:07
2004.05.16
Обмен Сообщениями !





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