关于TMemoryStream,这段代码中的Write()怎么用?
procedure TForm1.SaveCtrls(Stream: TMemoryStream);
const
EditorFlag =$10000;
var
Flag:LongInt;
Ctrl:TControl;
begin
for i:=0 to ControlCount-1 do
begin
Ctrl:=Controls[i];
if(Ctrl is TEditor)then
begin
Flag:=EditorFlag+Ord(TEditor(Ctrl).CtrlType);
Stream.Write(Flag,sizeof(LongInt));
TEditor(Ctrl).SaveToStream(Stream);
end;
end;
Flag:= 0;
Stream.Write(Flag,sizeof(LongInt));
end;
这里面的Stream.Write()怎么用,
这句话Stream.Write(Flag,sizeof(LongInt));起什么作用,我看了帮助,它说第一个参数为将要写入数据的缓冲区
,但是这里把什么写到里面了呢
急急解决马上结贴