Änderungen in einer Datenbank erfassen

[TypusMensch]

http://de.wikipedia.org/wiki/Datenbanktrigger
Trigger hör ich zum ersten Mal.

Ich gehe davon aus dass "REPLACE" eine von dir eigens geschrieben Prozedur ist. Du gehst bestimmt auf alle Datensätze von oben bis unten durch...

Wieso prüft du vorher nicht einfach, ob ein '.' vorhanden ist und schreibst es in deine Listbox. Beispiel:

Delphi-Quellcode:

Meine_Table.First;
while not(Meine_Table.eof) then
  begin
  if Pos('.',Meine_TableFeld1.AsString) > 0 then ListBox1.Items.Add(Meine_TableID.Asstring);
  //Aufruf der SQL-Anweisung "Update"...
  Meine_Table.Next;
  end;

...oder anders:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var s:string;
    i:integer;
    change:boolean;
begin
Meine_Table.First;
while not(Meine_Table.eof) do
  begin
  change := false;
  s := Meine_TableFeld1.AsString;
  for i := 0 to length(s) do
    begin
    if s[i] = '.' then
      begin
      s[i] := ',';
      change := true;
      end;
    end;
  if change then ListBox.Items.Add(Meine_TableID.AsString)
  Meine_Table.Edit;
  Meine_TableFeld1.AsString := s;
  Meine_Table.Post;
  Meine_Table.Next;
  end;
end;

Maybe....