Merhaba,
Öncelikle herkese iyi bayramlar (:
Aşağıdaki kod örneklerimizle Delphi’de metin dizisi oluşturmayı göreceğiz.
function RastgeleMetinDizisi:string; const Chars = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890'; var S: string; i, N: integer; begin Randomize; S := ''; for i := 1 to 5 do begin N := Random(Length(Chars)) + 1; S := S + Chars[N]; end; result := S; end;