So?
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
a : Array[1..8] of Integer;
i : Integer;
s: string;
begin
s := '';
for i:=1 to 8 do
begin
a[i]:= Random(9);
s := s + IntToStr(a[i]);
end;
ShowMessage(s);
end;
Oder als eigene Funktion:
Delphi-Quellcode:
function IntArrayToStr(const Ints: array of integer): string;
var
i: integer;
begin
Result := '';
for i := Low(Ints) to High(Ints) do
Result := Result + IntToStr(Ints[i]);
end;
Das ist wirklich genial und genau nach sowas habe ich gesucht. Vielen Dank.
in VBA und Python kann man die Arrays direkt ausgeben. Das fehlt mir in Delphi.
Viele Grüße
rainer