Registriert seit: 6. Jan 2005
Ort: Lübbecke
575 Beiträge
Turbo C++
|
Re: Zufälligen Buchstaben anzeigen
23. Feb 2005, 18:18
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const
s: String = 'abcdefghijklmnopqrstuvwxyz';
begin
Randomize;
Edit1.Text := s[Random(Length(s) + 1)]
end;
Chuck Norris has counted to infinity ... twice!
|