[marcoszorrilla]

He recibido de alemania unas instrucciones que me eran necesarias para conectarme con un dispositivo me lo mandan en D7, código justo debajo, intentando hacerlo funcionar en D5 he perdido más de 1 hora, por la tontería que pongo en negrita, la verdad que podía haberlo dejado en D7, pero me empeñe y he logrado perder 1 hora, Brrrrrrrrrrrr.

Código Delphi [-]
//D7
procedure TForm1.FormCreate(Sender: TObject);
var
  nb_of_ports : longint;
begin

  nb_of_ports :=  check_com_port;
  if ((nb_of_ports and $20) = 0 )then
    RadioGroup1.Buttons[5].Enabled := false
  else begin
    ComPort := 6;


//D5
procedure TForm1.FormCreate(Sender: TObject);
var
  nb_of_ports : longint;
begin

  nb_of_ports :=  check_com_port;
  if ((nb_of_ports and $20) = 0 )then
    RadioGroup1.Controls[5].Enabled := false
  else begin
    ComPort := 6;

Un Saludo.

Nota: Esto me pasa por querer ir hacia atrás.