From a80f8fb123ef933a0cb6592ce68f7afbb76af6c7 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Tue, 10 Jun 2008 20:00:47 +0000 Subject: [PATCH] minor to test prg --- harbour/contrib/hbw32/tests/testdll.prg | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/harbour/contrib/hbw32/tests/testdll.prg b/harbour/contrib/hbw32/tests/testdll.prg index cbb638f822..eff1138e68 100644 --- a/harbour/contrib/hbw32/tests/testdll.prg +++ b/harbour/contrib/hbw32/tests/testdll.prg @@ -62,7 +62,7 @@ PROCEDURE Main() ? cData DllUnload( hDLL ) - DllCall( "user32.dll", NIL, "MessageBoxA", 0, "Hello world!", "Harbour sez", hb_bitOr( MB_OK, MB_ICONHAND ) ) + ? "MsgBox:", DllCall( "user32.dll", NIL, "MessageBoxA", 0, "Hello world!", "Harbour sez", hb_bitOr( MB_OK, MB_ICONEXCLAMATION, MB_OKCANCEL, MB_HELP ) ) IF File( "libcurl.dll" ) hDLL := DllLoad( "libcurl.dll" )