[DUG] Dbase File Data Update

lbisman lbisman at clear.net.nz
Tue Oct 28 11:08:17 NZDT 2008


I agree... The problem is that if they ever go bad and they
are used as a key to another table, all the dependent
records get lost. Better to create your own 'autoinc' during
an event like before or after post (IMHO).

Laurie Bisman..

----- Original Message Follows -----
> AutoInc fields are evil in a multi-user situation (at
> least for paradox  - not sure about dbase)
> 
> Alister Christie
> Computers for People
> Ph: 04 471 1849 Fax: 04 471 1266
> http://www.salespartner.co.nz
> PO Box 13085
> Johnsonville
> Wellington 
> 
> 
> 
> Jeremy Coulter wrote:
> > Another thought would be to make the "JobNo" field an
> > auto  incrementing field? I have to admit I cant
> > remember too much about  DBase but I am sure it has auto
> > incrementing fields. This would save  you needing to
> >  calculate the job number. 
> > Jeremy
> >
> ----------------------------------------------------------
> > -------------- *From:* delphi-bounces at delphi.org.nz 
> > [mailto:delphi-bounces at delphi.org.nz] *On Behalf Of
> > *Marshland Engineering *Sent:* 27 October 2008 18:35
> > *To:* delphi at delphi.org.nz
> > *Subject:* [DUG] Dbase File Data Update
> >
> > I am trying to increase a value in a dbaseIII file. When
> > I press the  Inc button, the referenced dbEdit field
> >  increases with each click. 
> > However on exiting the program, the tblData['Jobno'] 
> > does not reflect  the new value.
> >  
> >  
> > From data module.
> >  
> > begin
> >    tblData.open;
> > end;
> > ------------------------------------
> >  
> > procedure TForm1.bIncClick(Sender: TObject);
> >  
> > var iCurrJobno:integer;
> >  
> > begin
> >     iCurrJobno:=dm.tblData['Jobno'];
> >     iCurrJobno:= iCurrJobno+1;
> >     dm.tblData.edit;
> >     dm.tblData['Jobno'] := iCurrJobno;
> > end;
> >  
> >  
> > There are probably other ways of doing this, but I would
> > like to know  why this does not work.
> >  
> > Thanks Wallace
> >
> ----------------------------------------------------------
> -------------- >
> > _______________________________________________
> > NZ Borland Developers Group - Delphi mailing list
> > Post: delphi at delphi.org.nz
> > Admin: http://delphi.org.nz/mailman/listinfo/delphi
> > Unsubscribe: send an email to
> delphi-request at delphi.org.nz with Subject: unsubscribe
> 
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at delphi.org.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at delphi.org.nz
> with Subject: unsubscribe

Laurie..


More information about the Delphi mailing list