Código Delphi [-] procedure TForm1.Table1CalcFields(DataSet: TDataSet); begin DataSet['NombreCompleto'] := DataSet['Nombres'] + ' ' + DataSet['Apellido1'] + ' ' + DataSet['Apellido2']; end;
procedure TForm1.Table1CalcFields(DataSet: TDataSet); begin DataSet['NombreCompleto'] := DataSet['Nombres'] + ' ' + DataSet['Apellido1'] + ' ' + DataSet['Apellido2']; end;