Question

不同之处

因此:

SourceString :=  I am doing just fine! ;     
MemoryStream.ReadBuffer(Pointer(SourceString)^, xxx);

(此处可查的全源代码:http://edn.embarcadero.com/article/26416 )

以及这一法典(地雷):

SetLength(SourceString, xxx);
MemoryStream.ReadBuffer(SourceString[1], xxx);

Do I really have to use Pointer(SourceString)^ or SourceString[1] is ok also?
The code (both of them) will work with Delphi 2010 (unicode)?

Answer 1

1 <代码>SourceString***版本更易读。我宁愿在点人完全需要时不要与他们合作。

2 本法典将与统法协会合作not。页: 1 (这将与Delphi的大学前和后版本同时进行。) 但是,除非你重新大力使用非安西的果园,否则这将成为大量浪费空间。我想做的是:

procedure TStreamEx.WriteString(const data: string);
var
  len: cardinal;
  oString: UTF8String;
begin
  oString := UTF8String(data);
  len := length(oString);
  self.WriteBuffer(len, 4);
  if len > 0 then
    self.WriteBuffer(oString[1], len);
end;

procedure TStreamEx.ReadString(const data: string);
var
  len: cardinal;
  iString: UTF8String;
begin
  self.ReadBuffer(len, 4);
  if len > 0 then
  begin
    SetLength(iString, len);
    self.ReadBuffer(iString[1], len);
    result := string(iString);
  end
  else result :=   ;
end;

(这是<代码>级辅助器,用于TStream。) 我写道,阅读和书写从流到和流出的各种东西非常容易。但是,如果你不喜欢班级助手,那么把基本想法改为另一种形式就太困难了。

Answer 2

在生成的网上编码中:

pointer(aString)^ will pass the string address directly to the procedure/function/method;
aString[1] will call UniqueString then pass the string address to the procedure/function/method.

因此,如果你重新读取数据,则将使用<>点(aString)。

如果你要修改所谓的功能,将使用<>String >。

实际上,我使用的是pointer(aString)^,该标准产生了更有效的编码。

请注意,这一暗含的<>UniqueString并不十分缓慢:如果目前援引该示例为1,(这意味着使用该示意图的法文本中仅有一部分可能),则立即返回。但是,在<>UniqueString上,有一处LOCK的顶板用于检查参考值,而使用LOCK的树像并不多为友好。因此,我试图避免在Im编码时使用aString?。

附加说明:如果aString,pointer(aString)将返回nil。

友情链接