Delphi XE2 Typ pola zestawu danych TStringField nie obsługuje standardu Unicode?

Question

Przeglądałem klasę TDataset i jej pola tekstowe w Delphi XE2 i zauważyłem, że AsWideString zwraca typ UnicodeString. Jednak pobiera wartość z funkcji TField.AsString: String, która z kolei wywołuje TFIeld.AsAnsiString: AnsiString. Dlatego wszystkie znaki unicode zostaną utracone? Również bufor przekazywany do TDataset.GetFieldData jest zadeklarowany jako tablica AnsiChar.

Czy rozumiem to poprawnie?

Answer 1

Nie, powinieneś badać klasę TWideStringField dla pól Unicode i klasy TStringField dla łańcuchów innych niż Unicode. TField to tylko klasa podstawowa, a TField.GetAsWideString to metoda wirtualna z implementacją wycofania, która jest nadpisywana przez potomków, którzy są świadomi Unicode.

Answer 2

TAK, zrozumiałeś to poprawnie. To jest VCL i jego dokumentacja, które są zepsute. Twoje zamieszanie ma sens!

W 2009+ realizacji Delphi, trzeba użyć AsString nieruchomość za AnsiString i AsWideString dla string=UnicodeString.

W rzeczywistości, właściwości As*String są zdefiniowane jako takie:

property AsString: string read GetAsString write SetAsString; 
property AsWideString: UnicodeString read GetAsWideString write SetAsWideString; 
property AsAnsiString: AnsiString read GetAsAnsiString write SetAsAnsiString; 

Jak na ziemi, być może będziemy mogli dowiedzieć się, że AsString zwraca AnsiString? To po prostu nie ma sensu, w porównaniu do reszty VCL/RTL.

Implementacja, która używa klasy TStringField dla AnsiString i TWideStringField dla string=UnicodeString jest zepsuta.

Ponadto documentation is also broken:

Data.DB.TField.AsString

reprezentuje wartość pola jako łańcuch (Delphi) lub AnsiString (C++).

nie stanowią string w Delphi, ale AnsiString! Fakt, że nieruchomość posługuje się zwykłym typem string=UnicodeString, jest całkowicie zwodniczy.

Z punktu widzenia bazy danych, do sterownika DB należy obsługa Unicode lub praca z określonym zestawem znaków. Ale z punktu widzenia VCL, w Delphi 2009+ powinieneś wiedzieć tylko o typie string i mieć pewność, że użycie AsString: String będzie gotowe do obsługi Unicode.