Cita:
|
Empezado por Delar
Este es el codigo al que llegue:
|
Ok, Algo es algo.
Una variante podría ser esta:
Código Delphi
[-]
for i:= 1 to 255 do begin
for j := 1 to 255 do begin
str[i] := Chr(i) + Chr(j);
end;
ShowMessage(str[i]);
end;
Prueba el código y amplíalo.
Además si no quieres los 255 caracteres (creo que sólo quieres letras) ajusta los for para que en lugar de comenzar por 1 comiencen por el número correspondiente a la "a".