FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour GetPvProfA
Posts: 222
Joined: Mon Jun 04, 2012 12:00 PM
GetPvProfA
Posted: Fri Aug 24, 2012 08:41 PM

WHERE I CAN FOUND THIS FUNCTION PLEASE

Error: Unresolved external '_HB_FUN_GETPVPROFA' referenced from C:\WORK\ERRORI\TEST_INI\OBJ\TEST.OBJ

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: GetPvProfA
Posted: Sat Aug 25, 2012 11:30 AM

Silvio,

Please use GETPVPROFSTRING()

Its source code is available at FWH/source/winapi/profile.c

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 222
Joined: Mon Jun 04, 2012 12:00 PM
Re: GetPvProfA
Posted: Sat Aug 25, 2012 06:40 PM

ok but I have the problem also look it please viewtopic.php?f=3&t=24719

Posts: 274
Joined: Fri Apr 04, 2008 01:25 PM
Re: GetPvProfA
Posted: Wed Nov 11, 2015 02:59 PM
Found this function in C in my source code:

Code (fw): Select all Collapse
HB_FUNC( GETPVPROFA )
{
CHAR bBuffer[ 2048 ];
WORD wLen;
WORD anzahl;
WORD pos,i;

    wLen = GetPrivateProfileString( hb_parc( 1 ),     // Section
                              NULL,     // Entry
                           hb_parc( 3 ),     // Default
                           bBuffer,        // Destination Buffer
                           sizeof( bBuffer ) - 1,   // M x Len
                           hb_parc( 4 ) );   // INI File
    anzahl=0;
    for(pos=0;pos<wLen;pos++)
        {
        if(bBuffer[pos]==0)
            {
            anzahl++;
            if(bBuffer[pos+1]==0) break;
            }
        }
    if(anzahl==0) hb_ret();

    hb_reta(anzahl);
    pos=0;
    for(i=0;i<anzahl;i++)
        {
        hb_storc(bBuffer+pos, -1, i+1 ); // hb_storc, umgestellt auf fwh1502
        while(pos<wLen && bBuffer[pos]!=0) pos++;
        pos++;
        }
}
Best Regards,

Gilbert Kuhnert
CTO Software GmbH
http://www.ctosoftware.de

Continue the discussion