Ver Mensaje Individual
  #2  
Antiguo 22-01-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Reputación: 25
__cadetill Va por buen camino
Esta definición
Cita:
Empezado por Aztaroth
int fRegresaExistencias(char *aProducto, char *aAlmacen, char *aAnio, char *aMes, char *aDia, char *aExist);
traducida a Delphi quedaría más o menos:

Código:
function fRegresaExistencias(aProducto, aAlmacen, aAnio, aMes, aDia, aExist : PChar) : integer;
Por lo que la llamada, creo, debería ser algo así

Código:
var
  MiVar : integer;
begin
  MiVar := fRegresaExistencias(aProducto, aAlmacen, aAnio, aMes, aDia, aExist);
Siendo lo sparámetros del tipo pertinente, claro
Responder Con Cita