Ver Mensaje Individual
  #2  
Antiguo 22-06-2016
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Reputación: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
No utilices el operador ++ con propiedades, evitarás problemas incomprensibles (las propiedades vienen de delphi)

Código:
void __fastcall TForm1::FormCreate(TObject *Sender) 
{ 
     F_cargo->Enabled     = true; 
     Button1->Enabled     = false; 
    // GroupBox1->Visible   = false; 
     RadioGroup1->Enabled = false; 

     F_cargo->MinDate = Date(); 
     F_cargo->MaxDate = F_cargo->MinDate; 

     while (F_cargo->MinDate.DayOfWeek() == 1 || F_cargo->MinDate.DayOfWeek() == 7) 
          F_cargo->MinDate = F_cargo->MinDate + 1; 

     int nItem = 0; 
     F_cargo->Date    = F_cargo->MinDate; 
     F_cargo->MaxDate = F_cargo->MinDate; 
     while (nItem < 3) 
     { 
          F_cargo->MaxDate = F_cargo->MaxDate + 1; 
          if (F_cargo->MaxDate.DayOfWeek() == 1 || F_cargo->MaxDate.DayOfWeek() == 7) 
               continue; 

          nItem ++; 
     } 
}

Saludos.
Responder Con Cita