Random в Delphi

[Kostia]

const s='qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM0123456789';
...
var
  i: integer;
begin
  Edit1.Text:='';//очистим edit или можно было Edit1.Clear;
  for i:=1 to 5 do
    Edit1.Text:=Edit1.Text+s[1+random(63)];
end;

[SweetOpium]

Огромное всем спасибо, все получилось

Кому не сложно, можете еще решить 5 задачек по массивам(Pascal)(в институт надо), буду вообще безгранично рад

1. Найти сумму элементов А(7) с 5-го по 7-ой.
2. Найти сумму отрицательных элементов В(7)
3. Найти количество отрицательных элементов В(6)
4. Найти количество положительных элементов С(8)
8. Найти отдельно сумму и произведение всех элементов А(9)

[SweetOpium]

И еще как сделать в делфи, чтобы нельзя было менять размер формы(растягивать, съужать)? Или как вообще убрать синию рамку винды=))

[Stilet]

чтобы нельзя было менять размер формы(растягивать, съужать)?

BorderStyle:=bsSingle;

Или как вообще убрать синию рамку винды=))

Какую еще рамку? Синий экран смерти что ли?

[SweetOpium]

Сообщение от Stilet

BorderStyle:=bsSingle;

Какую еще рамку? Синий экран смерти что ли?

Все уже разобрался с этим