Vamos a ver amigo Carlos,
Cita:
|
Empezado por Caral
7- indica una condicion, si es de contado entonces revisa los bancos de lo contrario, sigue.
Aqui es donde esta el asunto, si es de contado y no esta en los bancos entonces envia un mensaje.
|
Pero no dices cual es el problema, pero de entrada te puedo decir que en esa porción de código debes de hacer if anidados porque según tu código, solo si es
San Jose dolares te funciona como quieres, pero en las otras dos opciones te manda tambien el segundo mensaje
'El recibo no esta en ningun banco, REVISE'.
Checalo así.
Código Delphi
[-]
if Edit9.Text = 'Contado' then begin
if Edit10.Text = BN.Fields[0].AsString then begin
ShowMessage('esta en el banco nacional');
end
else If Edit10.Text = BSJC.Fields[0].AsString then begin
ShowMessage('esta en el banco San Jose Colones');
end
else if Edit10.Text = BSJD.Fields[0].AsString then begin
ShowMessage('esta en el banco San Jose dolares');
end
else MessageDlg('El recibo no esta en ningun banco, REVISE',mtError,[mbOK],0);
end
Salud OS