hpwDllCall reposted

[HPW]

Since the first topic is locked:

http://www.neosoftware.com/forum/viewtopic.php?t=9877

Just released a new hpwDllCall 1.02

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

NBR/NBP-modul for neobook 5
Command wizard for hpwDllCall

[HPW]

Just released a new hpwDllCall 1.03:

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

Bugfix for TaskBarClickAndRestoreOnTop for About-dialog and command wizards

[HPW]

Just released a new hpwDllCall 1.04:

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

The command wizard show the exact command in the wizards dialog caption.
The command wizard show the command, plugin-name and the command-hint similar to neobook's native commands.
The plugin now has a hpwDllCall.ini similar to the other plugins.

[HPW]

Just released a new hpwDllCall 1.05:

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

Changed compiler to delphi 7
Wizards now compatibel look with neobook 5.6

[HPW]

Just released a new hpwDllCall 1.06:

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

Changed the used runtime-packer for a better vista and IE8-compatibility.

[HPW]

Just released a new hpwDllCall 1.07:

http://www.hpwsoft.de/anmeldung/html1/n ... book6.html

Recompiled without Win32.Induc delphi virus

[HPW]

Hello,

After revisiting the purebasic compiler, I noticed that the demo-PB from hpwDllCall no longer works with the current PureBasic 5.62 version.
Since PureBasic has moved to Unicode it is now incompatible with the old demo.

So here a version which compiles to a working DLL:

Code: Select all

;
; ------------------------------------------------------------
;
;   PureBasic - DLL example file for hpwDllCall
;
;   2018 - H.P.Wickern
;
; ------------------------------------------------------------
;
; This example is a skeleton to build easely a DLL using PureBasic
; The dll is created in the 'Compilers' directory, under the
; 'purebasic.dll' name. An associated '.lib' is generated to use
; with LccWin32 or VisualC++.
;
;
; Rules to follow:
;   - Never write code outside a procedure, except for variables
;   or structure declaration.
;   
;   - DirectX Init routines must not be initialized in the the
;   AttachProcess() procedure
;   
;   - There is 4 procedures automatically called: AttachProcess(),
;   DetachProcess(), AttachThread() and DetachThread(). If you don't
;   need them, just remove them.
;


  ; This procedure is called once, when the program loads the library
  ; for the first time. All init stuffs can be done here (but not DirectX init)
  ;
  ProcedureDLL AttachProcess(Instance)
  EndProcedure


  ; Called when the program release (free) the DLL
  ;
  ProcedureDLL DetachProcess(Instance)
  EndProcedure


  ; Both are called when a thread in a program call or release (free) the DLL
  ;
  ProcedureDLL AttachThread(Instance)
  EndProcedure

  ProcedureDLL DetachThread(Instance)
  EndProcedure

  Global *DllResult

  ; Real code start here..
  
  ProcedureDLL NeoFunc1(*String1.Ascii)
    theString.s = PeekS(*String1,-1,#PB_Ascii)
;    MessageRequester("EasyRequester !", theString.s , #MB_ICONINFORMATION)
  EndProcedure

  ProcedureDLL NeoFunc2(*String1.Ascii)
   theString.s = PeekS(*String1,-1,#PB_Ascii)
   Back.s = theString.s + " Purebasic Returnstring"
;   MessageRequester("EasyRequester !", Back.s , #MB_ICONINFORMATION)
   *DllResult = Ascii(Back.s)
   ProcedureReturn *DllResult
  EndProcedure
  
 ProcedureDLL FreeMem()
   FreeMemory(*DllResult)
;   MessageRequester("FreeMem !", "Speicher freigegeben" , #MB_ICONINFORMATION)
 EndProcedure

  
; ExecutableFormat=Shared Dll
; Executable=C:\Programme\NeoBook\PlugIns\hpwDllCall\puredemo.dll.exe
; EOF
; IDE Options = PureBasic 5.62 (Windows - x86)
; ExecutableFormat = Shared dll
; CursorPosition = 59
; FirstLine = 17
; Folding = --
; EnableXP
; Executable = pure.dll

Regards