Subject Unicode 2
Author Robert martin
Hi

I have a component (TadvStringGrid) from Tms software that is Unicode
capable. I have put some Arabic into it and try to save it my database
using the following test code

with zBookingsDM.UpdateQuery do begin
SQl.Clear;
SQL.Add('INSERT INTO Pi_Fel_Wording (PhraseRef, Other) Values
(1, :Test)');
Prepare;

ParamByName('Test').AsWideString := AdvStringGrid1.WideCells[1,1];
ExecSQL;
end;


When I try reading it back out using the following

with zBookingsDM.UpdateQuery do begin
SQl.Clear;
SQL.Add('SELECT Other FROM Pi_Fel_Wording WHERE PhraseRef = 1');
Prepare;

Active := True;
AdvStringGrid1.WideCells[2,2] := FieldByName('Other').AsWideString;
Active := False;
end;

I get ???????? in the cell.

The 'Other' field is defined as Other VarChar(254) CHARACTER SET
UNICODE_FSS.


Can anybody see what I am doing wrong?

--
Rob Martin
Software Engineer

phone +64 03 377 0495
fax +64 03 377 0496
web www.chreos.com

Wild Software Ltd