Einzelnen Beitrag anzeigen

SMALLID

Registriert seit: 10. Aug 2004
78 Beiträge
 
#5

Re: TClientDataSet: AutoInc auch wirklich automatisch inc-en

  Alt 2. Jan 2007, 01:44
Hi nochmal. Ok vllt. habe ich dann doch was falsch verstanden. 2 Zeilen wären ja schon super! Ich setze aber am Anfang für jede Tabelle erstmal den funiqueid wert, indem ich durchiteriere mit

Delphi-Quellcode:
  //autoinc werte für UMTable und ArmTable initialisieren
  fUMPosID := 1;
  UMTable.First;
  for i := 1 to UMTable.RecordCount do
  begin
    if UMTable.FieldByName('Pos').AsInteger > fUMPosID then
      fUMPosID := UMTable.FieldByName('Pos').AsInteger;
    UMTable.Next;
  end;
  fArmPosID := 1;
  ArmTable.First;
  for i := 1 to ArmTable.RecordCount do
  begin
    if ArmTable.FieldByName('Pos').AsInteger > fArmPosID then
      fArmPosID := UMTable.FieldByName('Pos').AsInteger;
    ArmTable.Next;
  end;
aber ggf. geht es noch anders?

Bisher habe ich immer nur Paradox Tabellen benutzt und in diesem Fall nutze ich MyBase, weil ich da weder BDE noch ADO Support auf dem Zielrechner brauche. Dachte eigentlich, dass jeder das TClientDataset für lokale DBs nimmt, oder ist da ODBC/ADO nach Access doch simpler?
  Mit Zitat antworten Zitat