Zahl in Text umwandln nur wie?

[himitsu]

Zitat von Maik:

procedure Zahlenvergleich;
begin

If Lottozahl1=Zahlwert1, Lottozahl2=Zahlwert2, Lottozahl3=Zahlwert3,
Lottozahl4=Zahlwert4, Lottozahl5=Zahlwert5, Lottozahl6=Zahlwert6 then ShowMessage('Gewonnen!!! Sie haben 6 Richtige');
end;

Delphi-Quellcode:

Procedure Zahlenvergleich;
  Begin
   If (Lottozahl1 = Zahlwert1) and (Lottozahl2 = Zahlwert2) and (Lottozahl3 = Zahlwert3) and ( Lottozahl4 = Zahlwert4) and (Lottozahl5 = Zahlwert5) and (Lottozahl6 = Zahlwert6 Then ShowMessage('Gewonnen!!! Sie haben 6 Richtige');
  End;

Ach ja, Für Quellcodes gibt es diesen netten [Delphi]-Tag:

Zitat:

[delphi]Der QuellCode[/delphi]