Ergebnis der Suchanfrage

• Forum: Die Delphi-IDE

  AW: Volltextsuche mit Delphi

   
    by p80286, 27. Apr 2015
  Wenn Du hier
  if MatchesMask( Rec.Name, FileName) then
  Listbox1.Items.Add(Path + Rec.Name);
  die gefundenen Dateien in eine Listbox einträgst, dann kannst Du ebensogut hier Deine Suche starten
  
  if MatchesMask( Rec.Name, FileName) then
  begin
  Listbox1.Items.Add(Path + Rec.Name);
  PositionofText:=FindTextinFile(Filename,Texttofind);
  end;
• Forum: Die Delphi-IDE

  AW: Volltextsuche mit Delphi

   
    by p80286, 24. Apr 2015
  nee, das geht ja auch nicht!
  Angenommen Du suchst in C:\ nach *.sql dann sucht Deine Routine in C:\ namch einer Datei die die Bedingung *.sql erfüllt, da dies nicht der Fall ist (höchstwahrscheinlich) verabschiedet sich Deine Suche gleich wieder.
  wenn Du rekursiv suchen willst, dann mußt Du auf jeden Fall die (möglichen) Verzeichnisse
  
  if Checkbox1.Checked then
  begin
  ...
• Forum: Die Delphi-IDE

  AW: Volltextsuche mit Delphi

   
    by p80286, 21. Apr 2015
  Wenn das der Fall sein könnte, muß man den Text eben entsprechen aufbereiten, z.B. nach jedem ";" eine neue Zeile beginnen. Aber Vorsicht, Kommentare und Strings müßen gesondert behandelt werden.
  
  Gruß
  K-H