Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
type TFuncion = function( <<los parámetros>> ): <<tipo>>
var H1 : THandle; MiFuncion : TFuncion; begin H1 := LoadLibrary(PChar('NETAPI32.DLL')); // Puedes probar sin el PChar if H1 > 32 then begin @MiFuncion := GetProcAddress(H1, 'NetServerEnum'); if Assigned(MiFuncion) then MiFuncion(<<tus parámetros>>); // lo puedes asignar auna var de <<tipo>> end; FreeLibrary(H1); end;
Valora esta respuesta
0
Comentar
Query con ClientDataSet?
dbexpca400 para AS/400 y procedimientos almacenado