Easy way to use a DLL (v4)
Posted: Thu Feb 09, 2006 1:36 am
Take this code and save it somewhere as PureToLib.pb
Compile it as a DLL (PureToLib.dll)
Now run this code (change the path!):
Any thoughts?
An easy way to use dlls!
Edit: Don't change or remove the DLL!
Edit again: Changed the title (tailbite -v- DLL) which was for another thread! Sorry!
Code: Select all
Global inst.l
ProcedureDLL AttachProcess(Instance)
inst = Instance
EndProcedure
ProcedureDLL GetDLLinstance()
ProcedureReturn inst
EndProcedure
ProcedureDLL Get27()
ProcedureReturn 27
EndProcedure
ProcedureDLL alert(t.s,m.s,f = 0)
MessageRequester(t,m,f)
EndProcedureNow run this code (change the path!):
Code: Select all
Import "Path\To\Where\You\compiled\the\above\PureToLib.lib"
GetInstance.l() As "_GetDLLinstance@0"
GetThreeNines.l() As "_Get27@0"
Mbox.l(ptrT.l,ptrM.l,f.l) As "_alert@12"
EndImport
Debug GetInstance()
Debug GetThreeNines()
t.s="Title"
m.s="Message"
f=0
mBox(@t,@m,f)
mBox(@"WoooHooo",@"Love this!",#MB_ICONEXCLAMATION)An easy way to use dlls!
Edit: Don't change or remove the DLL!
Edit again: Changed the title (tailbite -v- DLL) which was for another thread! Sorry!