[patch_done] TZPostgreSQLResultSet.Open;
Posted: 28.11.2008, 23:49
Is
Should be
In all databases with suport utf8 we can add UTF8ToUnicodeString function to decode Unicode field name
Code: Select all
procedure TZPostgreSQLResultSet.Open;
...
ColumnLabel := StrPas(FPlainDriver.GetFieldName(FQueryHandle, I));
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}