Einzelnen Beitrag anzeigen

Perlsau
(Gast)

n/a Beiträge
 
#3

AW: Update Table rownum

  Alt 8. Mai 2013, 08:24
Nun möchte ich in einer Spalte in einer bestimmten Reihenfolge die Werte 1 bis 11 eintragen.
Bei 900 Einträgen kannst du das auch locker mit Delphi realisieren:
Delphi-Quellcode:
procedure TDatenModul.ZiffernEinfuegen(Von, Bis : Integer);
var
   i : Integer
begin
   i := Von;
   SortiereTabelleNach???;
   MyTable.First;
   while not MyTable.Eof DO
   begin
      MyTable.Edit;
      MyTable.FieldByName('Ziffernspalte').AsInteger := i;
      MyTable.Post;
      Inc(i);
      if i > Bis then i := Von;
   end;
   ShowMessage('Ziffern erfolgreich eingetragen ...');
end;
  Mit Zitat antworten Zitat