Random Problem

[marabu]

Hallo PBiggi,

mach das besser so:

Delphi-Quellcode:

var
  iStart, iEnde, iRange: integer;
begin
  iStart := StrToInt(edVon); 
  iEnde := StrToInt(edBis);
  iRange := Succ(iEnde - iStart);
  Listbox1.Items.Add(IntToStr(Random(iRange) + iStart));
end;

Grüße vom marabu

Dass man mit Add() nur Zeichenketten verarbeiten kann, habt ihr alle gemerkt und keiner sagt mir was...