Subject | SV: [IBO] Search In Depth |
---|---|
Author | Magnus Johansson |
Post date | 2004-01-24T15:26:32Z |
Hi James.
if (IB_Query.State = dssSearch) then
begin
SearchStrLst := TStringList.Create;
try
SearchStrLst.Add('CTL.MyForm.MyEdit=' + MyValue);
IB_Query.ReadSearch(SearchStrLst);
IB_Query.Post;
finally
SearchStrLst.Free;
end;
end;
/Magnus
> ib_query.fieldby('name').asstring:='borland' in search, but it is not.Look at TIB_DataSet.ReadSearch method.
> So how do I do it by code.
if (IB_Query.State = dssSearch) then
begin
SearchStrLst := TStringList.Create;
try
SearchStrLst.Add('CTL.MyForm.MyEdit=' + MyValue);
IB_Query.ReadSearch(SearchStrLst);
IB_Query.Post;
finally
SearchStrLst.Free;
end;
end;
/Magnus