Tabelle durchsuchen ohne Angabe eines Feldnamens

[smart]

Zitat von Iwo Asnet:

Delphi-Quellcode:

MyDataset.First;
While Not MyDataSet.Eof Do Begin
  For i:=0 to MyDataset.Fieldcount-1 do
     If ContaintsText (Search, MyDataset.Fields[i].AsString) Then
        ShowMEssage(Format('Gefunden in Feld "%s" in Record #%d',[MyDataSet.Fields[i].Name, MyDataSet.RecNo]));
  MyDataset.Next
End;

Was ist ContaintsText ?

[Iwo Asnet]

Zitat von smart:

Was ist ContaintsText ?

Ein Tippfehler, was sonst.

Es sollte heißen "ContainsText" und ist in der Unit 'StrUtils' enthalten.