Ver Mensaje Individual
  #9  
Antiguo 29-01-2019
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Reputación: 29
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Solucionada la consulta de ASEP, me pregunto por qué usar una variable numérica en lugar de Boolean (True/False), estimado oscarac.

Cita:
Empezado por oscarac Ver Mensaje
tengo una variable que forma un bucle
Código Delphi [-]
  p_opcion := 0;
  While p_opcion = 0 do
  Begin
      CdsDetalle.Append
      frmIngresoComprobantesVariosD := TfrmIngresoComprobantesVariosD.Create(nil);
      frmIngresoComprobantesVariosD.FormStyle := fsNormal;
      frmIngresoComprobantesVariosD.Visible := False;
      frmIngresoComprobantesVariosD.ShowModal;
  End;

//..

procedure TfrmIngresoComprobantesVariosD.BtnCancelClick(Sender: TObject);
begin
  frmIngresoComprobantesVarios.p_opcion := -1;
  frmIngresoComprobantesVarios.CdsDetalle.Cancel;
  Close;
end;
Responder Con Cita