Hallo,
Ich habe da ein Problem mit den schleifen und zwar:
Ich muss für die schule einen Taschenrechner schreiben(soweit so gut) nur dieser muss noch eine Funktion erhalten die mir die ASCII-Codes von 0 bis 255 in einer Listbox ausgibt.
Hier der Quelltext zu dem Button:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure TForm1.BtASCIIClick(Sender: TObject);
var
i: integer;
z: integer;
begin
for z := 0 to 255 do
for i := 0 to 255 do
begin
LxAusgabe.Items.Add(inttostr(Longint(z))+ ' : ' + chr(i));
end;
end; |
Ich führe das Programm aus und Drücke auf den Button. Die ASCII-Codes werden ausgegeben, aber ich so wie ich das möchte.
Es wird 255 mal die zahl 0 angezeigt die den dazugehörigen ASCII-Code von 0- 255 anzeigt.
Diese passiert auch mit der 1,2... bis zur 255.
Im Anhang ist die .Exe-Datei des Taschenrechners.
Freue mich auf Antworten.
Sry, wenn es so einen Thread schon gibt, aber ich habe einen bei google noch hier im Forum mit der SuFu gefunden.
Ps.: ich muss das Programm morgen bis 17 Uhr abgegeben haben.
Moderiert von 
Martok: Delphi-Tags gesetzt
