Subject | Further UTF problems |
---|---|
Author | Robert Martin |
Post date | 2013-07-17T22:07:09Z |
Hi
Further to may last post. I have just tested the following code...
UpdateQuery.SQL.Clear;
UpdateQuery.SQL.Add('UPDATE Self2 SET PopPSWD = :PopPSWD');
UpdateQuery.ParamByName('PopPSWD').AsString := Edit1.Text;
UpdateQuery.ExecSQL;
Self2Query.Refresh;
ShowMessage(Edit1.Text + ' -> ' +
UpdateQuery.ParamByName('PopPSWD').AsString + ' -> ' +
Self2Query.FieldByName('PopPSWD').AsString );
Which displays, with unicode Chinese symbols (which cant be shown in a
plain text email)
Correct Text -> Correct Text -> Garbage
This is very strange because before I began the upgrade process I am
sure my original testing of this sort of thing worked perfectly! The
only change I have made recently was changing the ib_session file to
'MaximumStringSize: Integer = 1020 ;' instead of 255. I then opened '
\ibo5_2_0_b6\packages\ibo5_dt_d2012.groupproj' and rebuilt all packages.
Suggestions ?
Thanks
Rob
Further to may last post. I have just tested the following code...
UpdateQuery.SQL.Clear;
UpdateQuery.SQL.Add('UPDATE Self2 SET PopPSWD = :PopPSWD');
UpdateQuery.ParamByName('PopPSWD').AsString := Edit1.Text;
UpdateQuery.ExecSQL;
Self2Query.Refresh;
ShowMessage(Edit1.Text + ' -> ' +
UpdateQuery.ParamByName('PopPSWD').AsString + ' -> ' +
Self2Query.FieldByName('PopPSWD').AsString );
Which displays, with unicode Chinese symbols (which cant be shown in a
plain text email)
Correct Text -> Correct Text -> Garbage
This is very strange because before I began the upgrade process I am
sure my original testing of this sort of thing worked perfectly! The
only change I have made recently was changing the ib_session file to
'MaximumStringSize: Integer = 1020 ;' instead of 255. I then opened '
\ibo5_2_0_b6\packages\ibo5_dt_d2012.groupproj' and rebuilt all packages.
Suggestions ?
Thanks
Rob