Select SQL on IBDataSet: 
select * from  "RoadLanesL" ;

Insert SQL:
insert into  "RoadLanesL" 
  ( "RoadLanesL" . "mBegin" ,  "RoadLanesL" . "mEnd" ,  "RoadLanesL" . "LaneCount" , 
    "RoadLanesL" . "LaneWidth" )
values
  (: "mBegin" , : "mEnd" , : "LaneCount" , : "LaneWidth" )

Refresh SQL:
Select 
   "RoadLanesL" . "idRoad" ,
   "RoadLanesL" . "id" ,
   "RoadLanesL" . "mBegin" ,
   "RoadLanesL" . "mEnd" ,
   "RoadLanesL" . "LaneCount" ,
   "RoadLanesL" . "LaneWidth" 
from  "RoadLanesL"  
where
   "RoadLanesL" . "id"  = : "id" 

Source:
IBDatasetId.Required := False;
IBDataset.CachedUpdates := False;

procedure TForm1.IBDataSet1BeforePost(DataSet: TDataSet);
begin
  DataSet.FieldByName('idRoad').AsInteger :=  1 ;
end;

Trigger metadata:
CREATE TRIGGER  "RoadLanesL_BI"  FOR  "RoadLanesL" 
ACTIVE BEFORE INSERT POSITION  0 
AS
BEGIN
  IF (NEW. "id"  IS NULL) THEN
    NEW. "id"  = GEN_ID(GENRLL, 1 );
END

Generator metadata:
CREATE GENERATOR GENRLL;
SET GENERATOR GENRLL TO  0 ;

IBDatabase.Active := True;
IBTransaction.Active := True;
IBDataset.Active := True;