Ayuda en If Then Else

[JosepGA]

hola,

pienso como Calogero, si te hemos entendido bien, por que si nom ¿ Te refieres a la evaluación de los IF o te refieres a la asignación de valores ? Ya que el tema de AND u OR es para comparaciones, es decir, en tu caso:

Código Delphi [-]
If ( (qryPagosIdTipPag2.Value = 1) Or (qryPagosIdTipPag2.Value = 2) ) Then
                   qrPro0.memReportePagos.Value   := StrToFloat(lo_s)
else If (qryPagosIdTipPag2.Value = 3)  Then
  qrPro0.memReportePagos3.Value   := StrToFloat(lo_s)
            else If (qryPagosIdTipPag2.Value = 4)  Then
  qrPro0.memReportePagos4.Value   := StrToFloat(lo_s)
            else If (qryPagosIdTipPag2.Value = 5)  Then
  qrPro0.memReporteServFac.Value  := StrToFloat(lo_s);

end;  ¿ ESTE END SOBRA ?
            
qrPro0.memReporte.Post;

Un saludo