Perfecto Caral, gracias.
Una cosa menos en la que pensar
He aplicado la segunda forma, sin sql, he intentado lo primero que pero no me sacaba el max ni queriendo, algo estaba haciendo mal con total seguridad pero no he querido insitir. Siempre me ponía el valor a sumar, por ej. 1 , lo cambié a 2 para ver que hacía y me ponía 2, por lo que llego a la conclusión que sacaba el valor 0 del campo num-albaran.
Lo tengo solucionado con la otra forma, me sirve por ahora, aunque he tenido que meter antes una orden para ordenar la tabla por ese numero, asi me aseguro que es el mas alto antes de sumarle 1. y ademas muevo el puntero de la tabla al final;
Código Delphi
[-]
Var
a,b: Integer;
begin
dtmgesatrans.TAlbaranes.sort := 'Num_Albaran';
dtmgesatrans.TAlbaranes.Last;
a:= 1;
b:= (StrToInt(DBEdit1.Text) + a);
dtmgesatrans.TAlbaranes.append;
DBEdit1.Enabled := True;
DBEdit1.Text:= IntToStr(b);
...
Mañana mas, buenas noches