Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 13-09-2004
Avatar de defcon1_es
defcon1_es defcon1_es is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuenca - España
Posts: 533
Poder: 23
defcon1_es Va por buen camino
Wink

Hola, debes cargar esa dll y acceder a las funciones que contiene.

Ejp:
Tenemos definida en la dll "Libreria.dll" una funcion de este estilo:
Código:
  function MultiplicarDll(Parametro1, Parametro2: Real): Real;
Código Delphi [-]
type
  TMultiplicarDll  = function(Parametro1, Parametro2: Real): Real;  register; 
 
...
...
 
 
function MultiplicarDll(N1, N2: Real): Real;
var Handle : Integer;
     Mul : TMultiplicarDll;
begin
  Result := False;
  Handle := LoadLibrary('Libreria.DLL');
  try
    if (Handle <> 0)
    then begin
      @Mul := GetProcAddress(Handle, 'MultiplicarDll');
      if (@Mul <> nil)
      then result := Mul(N1, N2);
    end;
  finally
    FreeLibrary(Handle);
  end;
end;
Espero que te sirva.
Responder Con Cita
 



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 09:42:38.


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