Jump to content

rcaspers

Members
  • Content Count

    1
  • Joined

  • Last visited

Community Reputation

0 Neutral
  1. rcaspers

    Control TDataSet strings encoding (auto encode to utf-8)

    maybe you can override a TStringField and tell your program to use that as the default. i, on the other hand am very curious for the solution you seem to have found René TUnicodeStringField = class(TStringField) protected function GetAsString: string; override; procedure SetAsString(const Value: string); override; end; implementation { TUnicodeStringField } function TUnicodeStringField.GetAsString: string; begin // your solution here end; procedure TUnicodeStringField.SetAsString(const Value: string); begin inherited; // your solution here end; DefaultFieldClasses[ftString] := TUnicodeStringField;
×