[__cadetill]

Bueno, exactamente no se por qué, pero si haces la asignación del resultado... compila sin problemas

var
  x:integer;
begin
x := Round(random * 255);
end;