Einem Array A-Z u. a-z u. 0-9 zuweisen!

[Kidix]

Hi,


wie kann ich am einfachsten einem Array A-Z a-z und 0-9 zuweisen!

Kidix

[DGL-luke]

na mit drei for schleifen z.b.

[Kidix]

ja und wie am einfachsten? 0-9 ist klar, aber a-z nicht!

[Matze]

Schau dir mal Chr und Ord an.

[malo]

Zitat von DGL-luke:

na mit drei for schleifen z.b.

Eine reicht vollkommen aus

[Kidix]

habs jetzt so gemacht, zahlen werden aber nicht richtig angezeigt...

Was mache ich falsch?

Delphi-Quellcode:

var
alpha: array [0..58] of Char;
x: integer;
begin
for x := 0 to 9 do
begin
alpha[x] := char(x);
end;
for x:= 0 to 24 do
begin
   alpha[x + 10] := chr(x+65);
end;
for x:= 0 to 24 do
begin
   alpha[x + 34] := chr(x+97);
end;

Kidix

[malo]

Die Zahlen musst du natürlich Mit IntToStr darstellen. Chr(1) ist beispielsweise ein Steuerzeichen, das man nicht sieht

[DGL-luke]

wieso bitte inttostr????

einfach die ascii-tabelle anschauen(OH!!)

[alcaeus]

Euch ist hoffentlich klar dass man das noch einfacher machen koennte:

Delphi-Quellcode:

var c: Char;
begin
  for c := 'A' to 'Z' do //...
end;

Das erspart euch das dumme chr-Gefummel.
@DGL_Luke:

Delphi-Quellcode:

var i: Integer;
begin
  for i := 0 to 9 do
    alpha[x] := IntToStr(i)[1];
end;

Chr und Ord werden bei solchen Aufgaben gar nicht benoetigt.

Greetz
alcaeus