fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2014-10-04 21:25 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* contrib/gtqtc/gtqtc1.cpp
    + added support for decoded image data passed to HB_GTI_DISPIMAGE like
      in GTXWC. Supported formats are RGB32, RGB16 and MONO bitmap.
      Unlike GTXWC GTQTC rescales bitmap to passed cords.

  * src/rdd/wafunc.c
    ! fixed very bad bug introduced in previous modification - in fact
      potential problem existed from the beginning anyhow recent modification
      allow to exploit it in all complex index expressions.
This commit is contained in:
Przemysław Czerpak
2014-10-04 21:25:28 +02:00
parent 4dfd5150a3
commit 748cd589e1
3 changed files with 103 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
src/rdd/wafunc.c
View File

@@ -212,19 +212,33 @@ HB_USHORT hb_rddFieldIndex( AREAP pArea, const char * szName )
if( *szName )
{
PHB_DYNS pDynSym = hb_dynsymFindName( szName );
HB_SIZE nLen = strlen( szName );
if( pDynSym )
while( HB_ISSPACE( szName[ nLen - 1 ] ) )
--nLen;
if( nLen <= HB_SYMBOL_NAME_LEN )
{
LPFIELD pField = pArea->lpFields;
HB_USHORT uiCount = 0;
char szFieldName[ HB_SYMBOL_NAME_LEN + 1 ];
PHB_DYNS pDynSym;
while( pField )
szFieldName[ nLen ] = '\0';
while( nLen-- )
szFieldName[ nLen ] = HB_TOUPPER( szName[ nLen ] );
pDynSym = hb_dynsymFind( szFieldName );
if( pDynSym )
{
++uiCount;
if( pDynSym == ( PHB_DYNS ) pField->sym )
return uiCount;
pField = pField->lpfNext;
LPFIELD pField = pArea->lpFields;
HB_USHORT uiCount = 0;
while( pField )
{
++uiCount;
if( pDynSym == ( PHB_DYNS ) pField->sym )
return uiCount;
pField = pField->lpfNext;
}
}
}
}