In the creation of the Automatic Procedure, double click on the component, Delphi XE8 and delphi-10 is having a strange reaction it mixes the new Procedure with one of the existing Procedure, causing their names to be wrong and I have to correct all . The new procedure starts with two "P" ex:
pprocedure and the existing procedure adds a "P" ex: rocedure
According to the code example below:
pprocedure TfrmCliente.cdsMasterBeforeCancel(DataSet: TDataSet);
begin
inherited;
end;
rocedure TfrmCliente.cdsMasterBeforePost(DataSet: TDataSet);
begin
inherited;
if (cdsMaster.State = dsInsert) then
cdsMaster.FieldByName('CODIGO').AsString := '000000';
end;