Page 1 of 1

[patch_done] TZPostgreSQLResultSet.Open;

Posted: 28.11.2008, 23:49
by mariuszekpl
Is

Code: Select all

procedure TZPostgreSQLResultSet.Open;
...
      ColumnLabel := StrPas(FPlainDriver.GetFieldName(FQueryHandle, I));
Should be

Code: Select all

procedure TZPostgreSQLResultSet.Open;
...
    {$IFDEF ZEOS_FULL_UNICODE}
      ColumnLabel := UTF8ToUnicodeString(StrPas(FPlainDriver.GetFieldName(FQueryHandle, I)));
    {$ELSE}
      ColumnLabel := StrPas(FPlainDriver.GetFieldName(FQueryHandle, I));
    {$ENDIF}
In all databases with suport utf8 we can add UTF8ToUnicodeString function to decode Unicode field name

Posted: 03.12.2008, 11:47
by mdaems
SVN Rev. 533