I use following Testsource:

procedure TFrmTest.Button1Click(Sender: TObject);
var
IBOQuery1: TIBOQuery;

begin
IBOQuery1 := TIBOQuery.Create(Self);
with IBOQuery1 do
begin
Name := 'IBOQuery1';
IB_Connection:=DM2.IBOM2001;
RecordCountAccurate := True;
end;

with DataSource1 do
begin
AutoEdit := False;
DataSet := IBOQuery1;
end;

IBOQuery1.AssignSQLWithSearch(IB_QERSATZ);
IBOQuery1.Prepare;

[....free]

it works, but if i change the order of the columns from IB_QERSATZ with a
IB_Grid and there ist now a "Stringfield" on the position of a "Floatfield"
IB_Grid
[NAME1][NAME2][PRICE] -> [PRICE][NAME1][NAME2]

i get an Exception on "IBOQuery1.Prepare"; E_Unsupp_Col_Conversion =
'Nicht unterst�tze Spalten-Konvertierung'; //'Unsupported column
conversion';

if I change only the two Stringfields
AME1][NAME2][PRICE] ->[NAME2][NAME1][PRICE]
i get no Exception

IBO 3.6Di

Is there an other way to convert a IB_Query to a IBOQuery with Search,
FieldsIndex,FieldsDisplayFormat and FieldsDisplayWidth?


ru Gunther