Fórum Numerar registro #31207

Olá amigos estou mudando para MySQL agora e estou com uma dúvida.

Uso este código com componentes Table para numerar o registro no evento BeforePost.
Veja verifico o estado do DataSet e uso uma query para localizar o útlimo registro.
Assim gero o Número pegando este valor +1.

procedure TDM_VWork.ZTbOrcaBeforePost(DataSet: TDataSet);
begin
if DSOrca.State = dsInsert then
begin
ZQOrca.Active := False;
ZQOrca.Active := True;
with ZQOrca.Fields[0] do
if IsNull then
ZTbOrcaCodi.Value := 1
else
ZTbOrcaCodi.Value := AsInteger + 1;
end;



O banco de dados está na internet e estou usando componente query para incluir, editar, alterar e deletar os registro.

//


ZQuery1.Active := False;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Add(´insert into Orca(Nome) values (´+´´´´+edit1.Text+´´´´+´) ´);
ZQuery1.ExecSQL;

Agora pergunto estou com posso colocar um código para numerar o banco de Dados enviando o código com ExecSQL, pois se eu abrir todo o banco o sistema vai ficar muito lento ?