关于vb和delphi中两个变量的问题。

Question

vb 6.0 部分代码
Private Sub OKButton_Click()
Dim a1, a2, a3 As String
Dim a As String      a1 = Chr(&HD6)
      a2 = Chr(&H2F)
      a3 = Chr(&H3B)
      
      a = a1 & a2 & a3
delphi 5.0部分代码如下procedure TForm1.Button1Click(Sender: TObject);
var
   a : PChar;
begin
          getMem(a,3);
          a[0] := chr($D6);
          a[1] := chr($2F);
          a[2] := chr($3B);
          ...
          ...
          freemem(a);
end;请问，这两段代码所得到的a的值有什么不同吗？
如果在内存中我分别从两个a的起始地址开始读取3个字节。得到的结果不一样吗？
如果不一样，我想得到与vb代码中a相同的值，在Delphi 5.0中应该如何写代码？
谢谢各位高手，节日快乐！

Answer 1

关键是vb存储数据（哪怕是简单数据类型）方式很复杂，和delphi大不一样。

Answer 2

var
   a : array[0..2]of char;
begin          a[0] := chr(65);
          a[1] := chr(65);
          a[2] := chr(65);