Tem como zerar campo codigo type (autoincrement)

Question

Seguinte:Uso paradox tenho na minha tabela um campo codigo type + (autoincrement) fa�o varias inclus�es na tabela em laboratorio. O que eu queria era quando passar o projeto para o cliente zerar esse ...

Debug · Answer

function ResetAutoInc(FileName: TFileName; Base: Longint): Boolean;
begin
with TFileStream.Create(FileName, fmOpenReadWrite) do
Result := (Seek($49, soFromBeginning) = $49) and (Write(Base, 4) = 4);
end;
O par�metro FileName � o nome da tabela, incluindo o caminho. E o par�metro Base � o valor inicial para o contador do AutoIncremento.

Dbergkamps · Answer

va ate o paradox e exclua todos os registros existentes;
depois va ate o campo auto-increment e mude ele para outro tipo (alpha talvez);
Clique em SAve.
Feche e Abra o data base desktop de novo
Abre a tabela e mude novamente o campo para Auto Increment.

Wagner · Answer

[b:c9218c2a57]bergkamps[/b:c9218c2a57] - Desculpe-me mais o type do campo deve ser esse mesmo (autoincrement), so quero uma maneira de zera-lo

[b:c9218c2a57]Debug[/b:c9218c2a57] - Colega pode me explicar melhor esse codigo?

[color=blue:c9218c2a57]function ResetAutoInc(FileName: TFileName; Base: Longint): Boolean;
begin
with TFileStream.Create(FileName, fmOpenReadWrite) do
Result := (Seek($49, soFromBeginning) = $49) and (Write(Base, 4) = 4);
end; [/color:c9218c2a57]

Obrigado

Aroldo Zanela · Answer

[quote:a808cd03eb=�Wagner�][b:a808cd03eb]bergkamps[/b:a808cd03eb] - Desculpe-me mais o type do campo deve ser esse mesmo (autoincrement), so quero uma maneira de zera-lo[b:a808cd03eb]Debug[/b:a808cd03eb] - Colega pode me explicar melhor esse codigo?[color=blue:a808cd03eb]function ResetAutoInc(FileName: TFileName; Base: Longint): Boolean; begin with TFileStream.Create(FileName, fmOpenReadWrite) do Result := (Seek($49, soFromBeginning) = $49) and (Write(Base, 4) = 4); end; [/color:a808cd03eb]Obrigado[/quote:a808cd03eb]Wagner,Ambas as dicas s�o para inicializar o seu campo auto-incremento....

Wagner · Answer

[quote:c541fd7f56=�bergkamps�]Feche e Abra o data base desktop de novoAbre a tabela e mude novamente o campo para Auto Increment.[/quote:c541fd7f56]Desculpe colega n�o tinha lido sua dica toda :lol:  obrigado  :lol:...

F�rum Tem como zerar campo codigo type (autoincrement) #226698