C++代码转Delphi

Question

C++中定义 char* A[50];
我想在delphi 里应该就是 A:array [0..49] of pchar;
好像不对~！~，有人可以帮忙看看吗？

Answer 1

 A:array [0..49] of char;

Answer 2

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  a:PChar;
implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
   a := AllocMem(50);
   a := 'abc';
end;

Answer 3

A:array [0..49] of pchar; 
for i := 0 to 49 do
  GetMem(a[i],MAX_PATH);