Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-09-2008
liser liser is offline
Miembro
 
Registrado: feb 2006
Ubicación: torrejon(madrid)
Posts: 19
Poder: 0
liser Va por buen camino
Bueno, después de mucho probar, cambiando en el compilador de c las opciones de linkado (eso es lo que me han dicho), funciono la dichosa librería, ahora me encuentro con otro problema.

La función que tomo de la librería

Código Delphi [-]
function monitorNotificarMensaje(Buffer: Array  of Byte ;
                                   nBytes: Word     ): integer;cdecl;
Cuando la llamo y le paso un valor (en este caso 2)

Código Delphi [-]
Numero:= monitorNotificarMensaje (MiArray,2);

Me devuelve siempre como si nBytes tuviera el valor 1.

También probé cambiado Word por Longword , integer, a ver si entendía algo.

¿Alguna ayuda?
Responder Con Cita
  #2  
Antiguo 24-09-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 22
cHackAll Va por buen camino
Habiendo seguido el hilo solo puedo asegurar que estas haciendo las cosas a ciegas, el que te dio la libreria deberia haberte dado tambien las declaraciones de los métodos exportados para que sepas como exportar dichos metodos de la forma correcta, me resulta muy heterodoxo que iteres en dichas declaraciones, asi no conseguiras grandes resultados.

Tambien deberias subir la nueva DLL compilada o lo que tengas pues asi como la dejaste en un anterior post no puedemos ayudarte facilmente.

Saludos
__________________
RTFM > STFW > Foro > Truco > Post > cHackAll > KeBugCheckEx
Responder Con Cita
  #3  
Antiguo 24-09-2008
liser liser is offline
Miembro
 
Registrado: feb 2006
Ubicación: torrejon(madrid)
Posts: 19
Poder: 0
liser Va por buen camino
Pues he cambiado 'directiva de alineaióni' a {$A1} y me ha funcionado, pero no se realmente lo que he hecho. ¿Alguien me puede decir donde encontrar informacion sobre esto? No encuentro nada en el foro.

Gracias por todo
Responder Con Cita
  #4  
Antiguo 25-09-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 22
cHackAll Va por buen camino
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
 {$A1}if LoadLibrary('MonitorLib.dll') = 0 then
  MessageBox(0, 'Cómo ayudar si ni carga???', nil, 0);
end;
__________________
RTFM > STFW > Foro > Truco > Post > cHackAll > KeBugCheckEx
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 03:28:39.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi