Subject | Re: [IBO] TIB_LookupCombo: Indicating search is fail in incremental searching mode. |
---|---|
Author | Hie Joen |
Post date | 2002-01-28T13:16:50Z |
> What do you want to happen?My TIB_LookupCombo is embed into TIB_Grid.
In OnNotInList event I show a message if not found and after that I want
back to my TIB_LookupCombo component. It can't back to previous column by
set TIB_Grid.Col = <SomeValue>; it will no effect in OnNotInList event.
TIB_LookupCombo.SetFocus is not effect also because the Visible property is
set to False. Finally I set TIB_Grid.OnColExit event with some kind of these
code:
procedure TfrmSalesOrder.grdSOItemsColExit(Sender: TObject);
begin
if grdSOItems.Col = 1 then
if lcProduct.Text = '' then
Abort;
end;
grdSOItems is TIB_Grid
lcProduct is TIB_LookupCombo embed to grdSOItems
Above code is not work. lcProduct.Text always filled by a value (the nearest
found if SearchText's value is not in list) on exit.
And I replace the line if lcProduct.Text with qrSOItems.['PRODUCT_PK'] also
not work.
And then I try to set SearchKeyByKey to False, it's work but w/o
incrementall capability. So I check the documentation about this (I quoting
in may previous e-mail).
I also try to checked TIB_LookupCombo.SearchText property without luck.
I know I can have a logical variable and give it some value in OnNotInList
event and check it in TIB_Grid.OnColExit but I just want to know if there is
another way.
TIA
Regards,
HJ