PDA

Ver la Versión Completa : Como usar una dll hecha en VB


ingel
29-07-2004, 01:17:55
HOla .tengo codigo VB para imprimir etiquetas en una ELtron 2642 , el cual no logro hacer funcionar en delphi, con los metodos tradicionales de impresion,.. ya me tiene seco... usa EPL y necesita los parametros entre comillas , como opcion un amigo me hizo una DLL con esas funciones para que las utilice desde delphi .. , ya registre la dll ahora .. la pregunta es como declaro/donde en delphi y como hago las llamadas a esa dll
Gracias a todos.

defcon1_es
13-09-2004, 19:02:26
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:

function MultiplicarDll(Parametro1, Parametro2: Real): Real;


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. ;)

delphi.com.ar
13-09-2004, 19:06:37
Hola, debes cargar esa dll y acceder a las funciones que contiene.
Mmmmm... VB no es capaz de compilar DLL´s Win32, solo compila DLL´s COM. Para usar estas DLL´s, tendrías que importar la librería, desde el menú: "Project \ Import Type Library" y utilizar el archivo creado por esta utilidad como interface para "hablar" con la DLL.