Subject | Re: [IBO] Inserting a new row on a TIB_Grid |
---|---|
Author | Andreas Pohl |
Post date | 2005-09-14T09:10:01Z |
Hello Roberto Freitas,
procedure TForm1.IB_DataSource1StateChanged(Sender: TIB_DataSource;
ADataset: TIB_Dataset);
begin
inherited;
if ADataset=ib_query1 then begin
IB_Grid1.AlwaysShowEditor:=sender.State<>dssBrowse;
if sender.State<>dssBrowse then begin
IB_Grid1.SetFocus;
IB_Grid1.Col:=0;
end;
end;
--
Andreas
> What I whant is, after obtaining a new inserted row on the grid, gomaybe this code sample helps:
> to a specific field on this row, and further, go to the end of this
> field, without having to click mouse twice.
procedure TForm1.IB_DataSource1StateChanged(Sender: TIB_DataSource;
ADataset: TIB_Dataset);
begin
inherited;
if ADataset=ib_query1 then begin
IB_Grid1.AlwaysShowEditor:=sender.State<>dssBrowse;
if sender.State<>dssBrowse then begin
IB_Grid1.SetFocus;
IB_Grid1.Col:=0;
end;
end;
--
Andreas