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....