Delphi XE10, can't edit field values of an empty TQuery

Question

I have a dataset, TQuery object with property Requestlive=TRUE, Tdatasource and a TDBgrid, connected. When the query returns empty i face this problem : Trying to add the first record, i can't edit the fields of it. After saving this (empty) first record, i can continue normaly (adding, editing etc). What can i do to avoid this problem, please ?

Answer 1

I haven't found the reason that causes this problem but i did this workaround :

procedure TFormA.QueryNewRecord(DataSet: TDataSet);
begin
    case Query.RecordCount of
        0 : begin // if dataset is empty then append a fake record
                Query.fieldByname('aDate').AsDateTime := now;
                Query.fieldByname('fieldA').AsFloat := 0; // fieldA is a mantatory field 
                Query.Post;
            end;
        else Query.fieldByname('aDate').AsDateTime := now; 
    end;
end;

and in the onCloseForm event i add this :

Query.SQL.Text := 'DELETE FROM NOTES WHERE fieldA=0';
Query.ExecSQL;

to delete any fake record appended this way