Código Delphi [-] if FAjustandoDatosRel Then exit; If TaTareasPorcentajeAvance.Value = 100 Then Begin FAjustandoDatosRel := True; try TaTareasFechaSolucion.Value := Date (); TaTareasEjecutando.Value := 0; finally FAjustandoDatosRel := False; end; End;
if FAjustandoDatosRel Then exit; If TaTareasPorcentajeAvance.Value = 100 Then Begin FAjustandoDatosRel := True; try TaTareasFechaSolucion.Value := Date (); TaTareasEjecutando.Value := 0; finally FAjustandoDatosRel := False; end; End;
Código Delphi [-] if TaTareasPorcentajeAvance.Value < 100 Then taTareasPorcentajeAvance.Value := 100;
if TaTareasPorcentajeAvance.Value < 100 Then taTareasPorcentajeAvance.Value := 100;