Código Delphi [-] var test:string; begin test := 'test'; MessageBox(0, Pchar('test : ' + test), 'test',MB_ICONINFORMATION); end;
var test:string; begin test := 'test'; MessageBox(0, Pchar('test : ' + test), 'test',MB_ICONINFORMATION); end;