Autoincrement en Interbase

[XCool]

Soy nuevo con Interbase, mi caso es que hice una BD en interbase, luego hice un alias en el BDE que se conecta al servidor de Interbase que antes cree.

Con el Database Desktop trato de crear las tablas y necesito en una de ellas tener un campo Autoincrement como se hace en paradox, el caso es que Interbase al parecer no tiene en el Database Desktop el tipo de dato Autoincrement.

El siguiente código en cierto modo funciona, pero al momento de que varios usuarios esten insertando al mismo tiempo habrá problemas, vean el código:

var
VarCodigoSiguiente : Integer;

begin
Table1.Last;
VarCodigoSiguiente := Table1Codigo.Integer + 1;
Table1.Insert;
Table1Cóodigo.Value := VarCodigoSiguiente;
end;


Cual es la mejor forma de hacer el autoincrement en interbase, sin que cause problemas con las concurrencias?

Es urgente, gracias anteladas.