Lepuke,
Cita:
Empezado por Lepuke
...Crear array of char con valores predeterminados...
|
Revisa este código:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
ArrName : Array of Char;
Name : String;
AuxName : String;
i : Integer;
begin
Name := 'Nelson Garcia';
SetLength(ArrName,Length(Name));
StrPCopy(@ArrName[0],Name);
Showmessage('ArrName: ' + String(@ArrName[0]));
AuxName := String(@ArrName[0]);
Showmessage('AuxName: ' + AuxName);
AuxName := EmptyStr;
for i := Low(ArrName) to High(ArrName) do
AuxName := AuxName + ArrName[i];
Showmessage('AuxName: ' + AuxName);
Finalize(ArrName);
end;
El código anterior en Delphi 7 sobre Windows 7 Professional x32,
ejemplifica el uso de arreglos dinámicos de tipo Char.
Espero sea útil
Nelson.