Losowanie litery

Losowanie litery
wasyl
WA
wasyl
WA
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 12 lat
  • Postów:501
0

Jak wylosowac litere (wielka lub mala)?? Zwracac moze char lub string...

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
MatroX
MatroX
MatroX
MatroX
  • Rejestracja:około 22 lata
  • Ostatnio:prawie 11 lat
0
Kopiuj
function Literka: Char;
var
 Litery: String;
begin

Litery := 'ABCDEFGHIJKLMNOPQRSTUVWXYZĄĆĘŁŃŚÓŻŹabcdefghijklmnopqrstuvwxyząćęłńśóżź';

  Result := Litery[Random(Length(Litery)-1) + 1];

end;
  • Randomize w OnCreate;
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Deti
Deti
Deti
Deti
  • Rejestracja:ponad 22 lata
  • Ostatnio:ponad 9 lat
0

Prościej przez CHR + F1

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
MatroX
MatroX
MatroX
MatroX
  • Rejestracja:około 22 lata
  • Ostatnio:prawie 11 lat
0

Chr() losuje nie tylko litery. Musiałbys określic kilka przedziałów z których miałby losować. Litery są w przedziałach: 65-90 (duże), 97-122 (małe), a do tego polskie znaki są porozrzucane w różnych miejscach.

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.

Utwórz konto