Einzelnen Beitrag anzeigen

Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
672 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: ADS Spalte einlesen, filtern, in andere Spalte einfügen

  Alt 7. Mär 2006, 08:42
Delphi-Quellcode:
var
i : integer;
s : string;
begin
  for i:=1 to ADSTable1.RecordCount-1 do
    begin
      s := DBEdit8.Text;
      s := Stringreplace(s,'/','',[rfReplaceAll]);
      s := Stringreplace(s,'-','',[rfReplaceAll]);
      s := Stringreplace(s,' ','',[rfReplaceAll]);
      AdsTable1.Edit;
      AdsTable1.FieldByName('tsuche').AsString := s;
      AdsTable1.Post;
    end;
end;
Dein DBEdit8 ist doch sicherlich an irgendeine Komponente gebunden. Man verwende grundsätzlich nicht die DBEdit.XXX Methoden, sondern grefit auf die zugrundeliegende Datenmenge zu. Und ja, nimm den Ansatz von jensw_2000:
Delphi-Quellcode:
While not AdsTable1.EOF do
  begin
    //mach was
    AdsTable1.Next;
  end;
Oder gleich SQL:
 update #test set tsuche=REPLACE(REPLACE(REPLACE(tsuche,' ',''),'-',''),'/','');
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat