Código Delphi [-] procedure TForm1.Button1Click(Sender: TObject); var A1 : Array[0..49999, 0..5] of String[10]; begin FillChar(A1, SizeOf(A1),' '); end;
procedure TForm1.Button1Click(Sender: TObject); var A1 : Array[0..49999, 0..5] of String[10]; begin FillChar(A1, SizeOf(A1),' '); end;