Læse dll fra en anden mappe

Intet problem. Hvis du loader dynamisk (LoadLibrary) angiver du bare stien. Ved statisk load angiver du dll-filen til sidst. Angiv den med en sti og du er kørende.

Hmm, jeg har bare angivet dem i min USES?

- jeg bruger bass.dll (www.un4seen.com), og der tilføjer jeg blot bass i uses. Det er nok - er det så stadig muligt at få .dll-filerne til at ligge i en anden mappe?

Det bliver lidt sværere når nu det er en pakke med eget API. API'et pakker blot ovenstående ind i en Delphi-unit og så afhænger det af den enkelte udvikler hvor meget der kan konfigureres.

Hvorfor skal det ind i et andet katalog? Man plejer at placere DLL hos exe-filen eller i DLL-hell (windows\System32), evt. registreret med RegSvr32.

Er det en god komponent?

Ja, jeg synes det er et fedt komponent - det kan en masse, og der følger en masse gode eksempler med.

Ang. hvorfor, så er det mere for syns skyld - jeg kunne godt tænke mig at samle alle programmets "indstillings-filer" og lign. i en mappe.

Hvad kan jeg så gøre? Er der evt. noget litteratur på nettet, der beskriver hvorledes man gør? Og hvad hedder det helt præcist, det som jeg vil gøre (således det bliver nemmere at søge efter det på google)?

Det afhænger om du har købt koden med til BASS eller bare de binære filer. Har du koden kan du let se (og evt. rette) hvor komponenten kigger efter DLL'et. Har du købt licensen uden VCL-kode er det sværere. Du kan evt. tilføje stieen til din PATH. Så vil programmet kigge der.

Jeg har ikke købt noget - jeg har hentet det ganske gratis (og lovligt!).

Jeg kan rette i bass.pas - her er et udsnit:

const
  bassdll = 'bass.dll';

function BASS_SetConfig(option, value: DWORD): DWORD; stdcall; external bassdll;

Jeg tænkte på at rette bassdll til:

bassdll = IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)))+'\settings\bass.dll'; - ville dette give mening?

- faktisk har jeg prøvet:

const
  bassdll = teststreng;

function BASS_SetConfig(option, value: DWORD): DWORD; stdcall; external bassdll;

initialization:
hej = IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)))+'\settings\bass.dll';

- men jeg får ikke lov til at erklære en streng ved navn teststreng noget sted i løbet af bass.pas.

Nej. Det vil det nok ikke.

Der er i øvrigt fejl i ovenstående. Når du bruger IncludeTrailingBackslash skal du ikke sætte et yderligere. Grimt, men korrekt ser det sådan ud:

hej := IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0)))+'settings')+'bass.dll';

.. men kønt er det sgu ikke.

Hvis du skal rette en const kan det vistnok kregles sådan her: const bassdll: string[255] = ''.

Hvis du stadik ikke kan få det til at virke kan du bare hooke Windows API kaldet LoadLibrary ,,,

Således at i koden til bas.dlll står der LoadLibrary(bassdll), som der hele tiden har gjort ...

Men i stedet for at kalde en funktion nede i windows.pas kalder den i stederfor din egen LoadLibrary ..

Så kan du jo bare sætte den ønskede path på ...

Skriv om du har fundet ud af noget.

Jens Borrisholt

Hmmn ... Jeg poster lige løsningen alligevel ... Det kunne jo være der vaar nogen der ville vide hvordan man gjorde : http://borrisholt.dk/Eksperten/APIHOOK.zip

Jens Borrisholt

hclarsen>> Fik du det til at virke

hclarsen>> Fik du det til at virke

Jeg fik det til at virke :-)

Smid gerne et svar, begge to.

Var det så API hooking løsningen du valgte ?

Jens B

Faktisk var det en løsning, der fulgte med som eksempel når man henter BASS-biblioteket.

Måske du bare for nar- stregernes skyld gidder at prøve med API hooking ? Om ikke andet fordi så har du den løsning i din værktøjskasse til en anden god gang ..

Jens Borrisholt

Jeg kan ikke helt få det til at virke. Såvidt jeg kan se, er der to units, men jeg ved ikke, hvad jeg skal stille op med dem.

Dog tænkte jeg på: Er det ikke muligt blot at loade ens DLL's dynamisk? Efter at have søgt på nettet, virker det som en nem løsning.