有以下几个问题,分不够可以加 1、如何将STRING写到TmemorySTREAM,2、如何将Tmemorystream写成二进制数据3、如何将如何将二进制数据写成文件? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 >>1、如何将STRING写到TmemorySTREAM,var ms:TmemorySTREAM; s1, s2: string; i: integer;begin s1 := DateTimeToStr(now); showMessage(s1); ms := TMemoryStream.Create; ms.Write(s1[1], length(s1)); setLength(s2, ms.Size); ms.Position := 0; ms.read(s2[1], ms.Size); showMessage(s2); ms.Free;end; >>2、如何将Tmemorystream写成二进制数据修改上面的 string 為 byte 數組就可>>3、如何将如何将二进制数据写成文件?TMemoryStream 直接保存就是了有個 SaveToFile UPaiirii说的已经很全了。 装个ehlib装到崩溃老少爷们帮忙看看吧 高分请教关于控件继承 有word开发经验者请进,分你就拿定了!!! 简单问题,就是不知道怎么做。 谁有dbisam和crack? 请问SameText()函数具体含义是什么? 请问OpenDialog控件怎么使用 学delphi还有前途吗? 请问用Delphi+ADO开发管理软件是,怎样用代码来实现数据库的备份?? Delphi中庸ODAC的query给所有记录的blob字段赋值为什么会出错 VclSkin控件问题,为什么窗口中有的控件不变肤呢? :[菜鸟问题]我用IntraWeb做了一个小软件,连接的用户超过10个就特别慢,15个就提示资源忙
s1, s2: string;
i: integer;
begin
s1 := DateTimeToStr(now);
showMessage(s1);
ms := TMemoryStream.Create;
ms.Write(s1[1], length(s1));
setLength(s2, ms.Size);
ms.Position := 0;
ms.read(s2[1], ms.Size);
showMessage(s2);
ms.Free;
end;
修改上面的 string 為 byte 數組就可>>3、如何将如何将二进制数据写成文件?
TMemoryStream 直接保存就是了
有個 SaveToFile
aiirii
说的已经很全了。