Subject | Re: [IBO] RowSelect Event? |
---|---|
Author | Helen Borrie |
Post date | 2002-11-30T00:51:16Z |
At 04:15 PM 29-11-02 +0100, you wrote:
AfterScroll events of the query?
procedure TForm1.IB_Query1AfterScroll(IB_Dataset: TIB_Dataset);
begin
...
MyButton.Enabled := TIB_Query(Self).Selected [ IB_Dataset.RowNum];
end;
procedure TForm1.IB_Query1RowSelectedChanged(Sender: TObject;
ARow: Integer; ABookmark: String; IsSelected: Boolean);
begin
MyButton.Enabled := IsSelected;
end;
Helen
>What I want to achieve is to get some event to either enable or disable aWon't you want to respond to both the OnRowSelectedChanged and the
>button which is only supposed to work with selected rows, maybe there is
>another way to do that.
AfterScroll events of the query?
procedure TForm1.IB_Query1AfterScroll(IB_Dataset: TIB_Dataset);
begin
...
MyButton.Enabled := TIB_Query(Self).Selected [ IB_Dataset.RowNum];
end;
procedure TForm1.IB_Query1RowSelectedChanged(Sender: TObject;
ARow: Integer; ABookmark: String; IsSelected: Boolean);
begin
MyButton.Enabled := IsSelected;
end;
Helen