randomize;

    edit1.Text := IntToStr( random(1000));
    edit2.Text := IntToStr( random(1000));

// 1000 est le maximum que vous choisissez