5b39850f11
+ contrib/xhb/tests/dll.prg
+ dll call sample
* contrib/xhb/hbdll.ch
! several fixes to make it work in Harbour and MT apps
12 lines
211 B
Plaintext
12 lines
211 B
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
#include "hbdll.ch"
|
|
|
|
IMPORT STATIC MessageBox( hWnd, cMsg, cText, nFlags ) FROM user32.dll EXPORTED AS MessageBoxA
|
|
|
|
PROCEDURE Main()
|
|
? MessageBox( 0, "Hello world!", "Harbour sez" )
|
|
RETURN
|