Hola
Cuando se necesita saber el numero de folio que sigue tanto de entradas como de salidas se hace asi:
usando el mismo combobox:
Código Delphi
[-]
var A : String;
begin
If combobox.text = 'Entrada' then
begin
A:= 'E';
end
else begin
A:= 'S';
end;
query.Close;
query.SQL.Text:='SELECT max(folio) FROM entradas where tipo = '+A;
query.Open;
folio.text := IntToStr(query.FieldByName('folio').asInteger +1) ;
Como ves simplemente se saca el dato del folio dependiendo de si es entrada o salida en el campo que creaste.
saludos