Ver Mensaje Individual
  #2  
Antiguo 05-05-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola microbiano.

El problema supongo (ya que no indicas el tipo de la variable FCobroOk) pasa por que FCobroOk es de tipo Boolean y la estas comparando con el valor devuelto por un form modal que es de tipo TModalResult.

Creo que deberías hacer:
Código Delphi [-]
...
  with TPago.Create(Self) do
  try
    ShowModal
  finally
    FCobroOk:= ModalResult = mrOk; // FCobroOk=True si ModalResult = mrOk 
    if FCobroOk then
    // mejor sería: if ModalResult = mrOk then ...
       ...
    Free
  end;
 ...

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 05-05-2012 a las 04:58:01. Razón: agregar comentario
Responder Con Cita