Zufälligen Buchstaben anzeigen

[Sharky]

Hast Du noch andere Komponenten auf der Form?

Hier mal ein anderer Code um Buchstaben (A..Z,a..z) zu erzeugen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  buchstabe : String;
begin
  buchstabe := Chr((Random (26) + 65));
  if (Boolean(Random(2))) then
  begin
    buchstabe  :=LowerCase (buchstabe);
  end;
  Edit1.Text := Edit1.Text + buchstabe;
end;