Zerar uma chave primária auto increment.
Dae galera, alguem ai sabe como obter um valor nulo numa chave primaria auto increment??
qualquer ajuda será bem vinda.
qualquer ajuda será bem vinda.
Rolemes
Curtidas 0
Respostas
Luineumann
14/01/2004
por definição chave primária não pode ser valor nulo
se o que vc quer é reinicializar o campo auto-incremento use
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.
se o que vc quer é reinicializar o campo auto-incremento use
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.
GOSTEI 0
Rolemes
14/01/2004
valeu amigo!!!
fico muito grato!!!
fico muito grato!!!
GOSTEI 0
Gigatel
14/01/2004
e como usar esta função ?...
GOSTEI 0