Hola
Hay muchas formas de hacerlo, creo que tendrias que ser un poco mas especifico, te aconsejo que revises el programa, lo trates de entender lo mejor posible y luego indiques aqui tus dudas, si no vamos a estar de un lado a otro y no llegaremos a mucho.
Para que te des una idea:
Código Delphi
[-]
Table1.close:
Table1.sql.text:= ' select max numero_recibo from caja_menor';
table1.open;
Edit1.Text:= Table1.Files[0].AsStrig;
Bueno asi de memoria, no me hagas mucho caso, ya estoy cansado.
Saludos