либо брать коды символов с '0' до '9' (это коды 48-57), либо можно сделать специальный Mas: array[43] of char = ['a'..'z', '0'..'9'] и брать значения из него. то есть берем букву вот так - Mas[random(36)] (36 - это 26 латинских букв плюс 10 цифр)
Я, правда, не уверен, что паскаль правильно подхватит такое объявление. Если не получится, то придется объявлять посимвольно 'a', 'b', 'c'... и так далее.
В итоге должно получится что-то вроде
Код:
var Mas: array[36] of char = ['a'..'z', '0'..'9'];
procedure Button1Click(Sender: TObject);
begin
Randomize;
Edit1.Text:='';
count:=Random(N); // Сюда макс количество
for i:=0 to count do
Edit1.Text:=Edit1.Text + Mas[random(36)];
end;
Писал с работы, могут быть описки -_- Но в общем алгоритм, думаю, понятен.
Вообще, на будущее. Есть уже готовые ansi-таблицы, из которых можно брать символы - например,
вот для win-1251 кодировки.