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
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;
|