Ver Mensaje Individual
  #2  
Antiguo 16-06-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 30
jachguate Va por buen camino
Algo asi:

Código Delphi [-]
if Copy(TablaCuenta.AsString, 1, 3) = '412' Then
  Variable := Variable + TablaDebito.AsFloat
else if Copy(TablaCuenta.AsString, 1, 3) = '422' Then
  Variable := Variable + TablaCredito.AsFloat;

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita