FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
reiniciar campo auto incremento
nesecito hayuda para reiniciar un campo de auto incremento de paradox
|
#2
|
||||
|
||||
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
|||
|
|||
sigo con un problema
gracias pero tengo un problema con lo del auto incremento me mas¿rca un error en :setautoinc
procedure TForm1.Button1Click(Sender: TObject); begin Table1.Close; SetAutoInc('C:\Delphi\Prueba.db',StrtoInt(edit1.text)); Table1.Open; end; Procedure SetAutoInc(filename : string; Value : Longint); var mystream : tfilestream; begin mystream := tfilestream.create(filename, fmOpenWrite + fmShareExclusive); try mystream.Seek(73, soFromBeginning); mystream.Writebuffer(Value, SizeOf(Value)); finally mystream.Free; end; end; |
#4
|
||||
|
||||
Cita:
Por eso no es bueno copiar y pegar a ciegas los ejemplos que nos ponen // Saludos |
#5
|
|||
|
|||
Estoy Perdido Ayuda
Definitivamente No Entiendo Nececito Que Me Expliquen Como Hacerlo Paso A Paso Soy Nuevo No Programo Mucho Pero Quiero Aprender Como Se Declara Expliquenme Las Partes Algo Porfavor Gracias
|
#6
|
||||
|
||||
Creo que estas un poco espeso, igual cuando te despejes ya lo solucionas, pero bueno.... ahí vá
|
#7
|
|||
|
|||
no entiendo todavia bien
me marca un error en el public
Procedure SetAutoInc(filename : string; Value : Longint); el errror dice: [Error] MAIN.pas(21): Unsatisfied forward or external declaration: 'TForm1.SetAutoInc' gracias. |
#8
|
||||
|
||||
Pon una tabla Paradox, en una carpeta la que sea, en mi ejemplo la tabla se llama Prueba.Db y está en la carpeta D:\Pruebas del disco duro Letra D: Introduce algunos registros a mano, suponemos que tiene un campo autoincremento, borra todos los registros, todo esto desde el DatabaseDesktop, ahora introduce uno nuevo verás que el autoincremento sigue como iba por ejemplo con el número 20. Ahora con el código que te he puesto si lo ejecutas, verás que la tabla cuando introduzcas nuevos registros empieza otra vez por 1. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
|
|
|