内存流的使用

//用字符指针读取流中的内容 
var 
 pc: PChar; 
begin 
 pc := mStream.Memory;
{
把字符指针指向内存流
}

 ShowMeage(pc[0]);

 

//从流读入到缓冲区 
var 
 buffer: array[0..2] of Char;
{
定义个字符缓冲区
}

begin 
 mStream.Seek(0, soFromBegiing); 
 mStream.Read(buffer, SizeOf(buffer)); 
 ShowMeage(buffer);

 

{关于 Seek 函数: 
 参数1: Offset 是偏移量; 
 参数2: Origin 是指针的基准位置, 有三个选值: soFromBegiing、soFromCurrent、soFromEnd 
 soFromBegiing: 以开始为基准, 此时参数 Offset 要 >= 0; 
 soFromCurrent: 以当前位置为基准; 
 soFromEnd: 以结束为基准; 此时参数 Offset 要 <= 0; 
 返回: 指针新位置 
}

你可能感兴趣的:(内存)