Hello,
GetCurDir() is missing.
Thanks
HB_FUNC( GETCURDIR )
{
DWORD dwLen = GetCurrentDirectory( 0, NULL );
if( dwLen )
{
char * pBuffer = ( char * ) hb_xgrab( dwLen );
GetCurrentDirectory( dwLen, pBuffer );
hb_retc( pBuffer );
hb_xfree( pBuffer );
}
else
hb_retc( "" );
}
#include "FiveWin.ch"
function Main()
local oDlg, cItem
DEFINE DIALOG oDlg
@ 1, 1 COMBOBOX cItem ITEMS { "One", "Two", "Three" }
@ 3, 3 BUTTON "Ok" ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED
return nil
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 92 guests