Hola Delphitest
No se porque razon no funciona bien, seguro que algun maestro lo indica, pero ya te lo hice funcionar con sql, solo pon un edit y ya.
No hace falta poner la tabla en last, ni nada.
Prueba asi:
Código Delphi
[-]
QTemp.SQL.Text := 'Select Max(Num_Albaran ) From Albaranes';
QTemp.Open;
Edit1.Text := IntToStr(QTemp.Fields[0].AsInteger+1);
DBEdit1.Text:= Edit1.Text;
Como ves al final le doy el valor del edit al dbedit, asi te va a funcionar.
Saludos