Código Delphi [-]Query1.SQL.Text = 'select Last(campo) from tabla'; Query1.Open; Edit1.Text := Query1.Field[0].Asstring;
Query1.SQL.Text = 'select Last(campo) from tabla'; Query1.Open; Edit1.Text := Query1.Field[0].Asstring;
Código Delphi [-]Query1.SQL.Text = 'select Max(ID)from tabla'; Query1.Open; Edit1.Text := Query1.Field[0].Asstring;
Query1.SQL.Text = 'select Max(ID)from tabla'; Query1.Open; Edit1.Text := Query1.Field[0].Asstring;