Hur skapar man DLL-filer till de egna programmen? Och hur gör man sedan för att använda dessa i programmet? Det finns en artikel du kan läsa som jag skrivit om detta i vb-sektionen Hej Provade göra som i din artikel men det fungerade inte, den hittar inte DLL-filen vid körning. Det jag vill att min DLL ska göra är att leta efter en fil på hårddisken. Så detta har jag skrivit i min Class1:Skapa egna DLL:er?
//AndersSv: Skapa egna DLL:er?
/PelleSv: Skapa egna DLL:er?
Dll :er som skall användas av VB ,gör du bäst i
ett annat program.Det är ganska meningslöst att göra
dll :er i Vb. C , C++ och Delphi TurboPascal är de bästa verktygen för
att bygga Stand Alone Dll :er.
En mycket bra Dll generator är PowerBasic DLL Compiler PB/Dll 6.0.
http://www.powerbasic.com
Hur man anropar och använder dem kan du se om du kollar
in några Windows API :er som är gjorda i C .
mvh
SvenSv: Skapa egna DLL:er?
<code>
Private Declare Function SearchTreeForFile Lib "imagehlp.dll" _
(ByVal sRootPath As String, _
ByVal InputPathName As String, _
ByVal OutputPathBuffer As String) As Boolean
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Const MAX_PATH = 260
Public Function GetFileLocation(sDrive2Scan As String, sFile2Find As String) As String
'API returns True if found, or False otherwise.
'If True, sResult holds the full path
Dim sResult As String
sResult = Space(MAX_PATH)
If SearchTreeForFile(sDrive2Scan, sFile2Find, sResult) Then
GetFileLocation = Left(sResult, InStr(sResult, vbNullChar) - 1)
Else: GetFileLocation = "-1"
End If
End Function
</code>
Detta är dock bara för att öva på att skapa en DLL. Hur gör jag då om jag vill använda den. Jag har skrivit detta i Form1:
<code>
Private Declare Function GetFileLocationA Lib "CreateDLL.dll" Alias "GetFileLocation" (ByVal sDrive2Scan As String, ByVal sFile2Find As String) As String
</code>
Men den hittar som sagt inte DLL:en vid körning trots att jag har lagt till den som referens. Vad är fel?