Thema: Delphi SQL - Volltextsuche

Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#5

Re: SQL - Volltextsuche

  Alt 7. Okt 2003, 10:32
Hallo Snyderburn,

eine Tabelle mit 200 Feldern in einer relationalen Datenbank ist schon eine Besonderheit.
Die Übertragung des langen SQL Strings kannst du dir ersparen, wenn du eine entsprechende StoredProcedure auf dem Server erstellst. Eine einfachere Methode gibt es wohl nicht. Du kannst aber bei der Erzeugung des SQL Codes eine Schleife einbinden. Wenn du eine z.B. TQuery Komponente benutzt, die Felder der Datenmenge über den Feldeditor hinzufügst und dann über eine Schleife darauf zugreifst:

Delphi-Quellcode:
SQL := 'select * from meineTabelle where '
for i := 0 to myQry.FieldCount-1 do
  if i > 0 then
    SQL := SQL+' OR ('+Fields[i].FieldName+' like '+QuotedStr(suchStr)+')'
  else
   SQL := SQL+'('+Fields[i].FieldName+' like '+QuotedStr(suchStr)+')'
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat