Hola
Con sql, es muy facil, no le tengas miedo:
En un query temporal pones esto:
Código Delphi
[-]
QTemp.SQL.Text := 'Select Max(Num_Albaran ) From Albaranes';
QTemp.Open;
DBEdit1.Text := IntToStr(QTemp.Fields[0].AsInteger+1);
Leera la tabla, el valor maximo y le sumara 1.
Si lo quieres sin sql, en el caso que el valor sea tipo integer, es asi:
Con una variable:
Código Delphi
[-]
Var
a,b: Integer;
begin
a:= 1;
b:= (StrToInt(DBEdit1.Text) + a);
DBEdit1.Text:= IntToStr(b);
Con esto al dbedit1 se le sumara el valor de (a) y lo optendra (b).
Bueno mas o menos es una explicacion simple, para que te guies.
Saludos