Mi programa de facturación paso a paso

[[Caral]]

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