[[BlueSteel]]

Hola

por que no tratas mejor con la propiedad ItemIdex.... asi te quedaria algo así

Código Delphi [-]
if (Combo1.ItemIdex = 0) or (Combo1.ItemIndex = 1)then    begin
      // Por que aquí preguntas lo mismo pero con otro combo ???
      if (Combo2.ItemIdex = 0) or (Combo2.ItemIndex = 1)    then      begin        Combo1.Text := 'No Disponible';        cad := 'La propiedad esta marcada en Venta, si quiere colocarla';        cad := cad + ' también en Alquiler debe ingresar nuevamente la Propieda o ';        cad := cad + 'desactive la sección de Venta';        ShowMessage(cad);      end;    end;

Salu2