Ayuda con random
Publicado por Jose Luis (10 intervenciones) el 24/03/2007 10:43:27
En qué me he equivocado?
var
Form1: TForm1;
X: array[1..100] of byte;
implementation
{$R *.dfm}
procedure TForm1.Label1Click(Sender: TObject);
begin
Label1.caption:=X[Round(random(100))];
end;
en el error pone:
E2010 Incompatible types: 'string' and ' byte'
Un saludo a todos. Espero que me respondais pronto que es que voi de error en error :'(
var
Form1: TForm1;
X: array[1..100] of byte;
implementation
{$R *.dfm}
procedure TForm1.Label1Click(Sender: TObject);
begin
Label1.caption:=X[Round(random(100))];
end;
en el error pone:
E2010 Incompatible types: 'string' and ' byte'
Un saludo a todos. Espero que me respondais pronto que es que voi de error en error :'(
Valora esta pregunta


0