Frage zu FindFirst - Findnext Funktion

[Newcomer91]

Hi, ich habe eine Frage zu oben genannter Thematik. Ich möchte ein Programm schreiben welches aus einem editfeld und nem button besteht. In das editfeld soll man einen Pfad angeben können und über den Button (Ausführen) soll dann in diesem Pfad nach bestimmten wörtern gesucht werden, .zb. "hallo und "peter".

Ich weiß ungefähr was ich benutzen muss weiß aber nicht wie ich es anwende.

Ich wäre mit einer For Schleife angefangen die alle textdateien öffnet und dann noch eine verschachtelte For Schleife die jede Zeile in diesem Textdokument öffnet.

für jeden tipp wäre ich dankbar

hier meine anfänge:

Delphi-Quellcode:

unit Main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TfrmSuche = class(TForm)
    edtEingabe: TEdit;
    btnStart: TButton;
    procedure btnStartClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  frmSuche: TfrmSuche;

implementation

{$R *.dfm}

procedure TfrmSuche.btnStartClick(Sender: TObject);
begin


end;

end.

Kommentare die auf iwelche Seiten hinweisen wo es eine Lösung geben soll, ignoriere ich, da ich nicht so top im englisch bin das ich alles so einwandfrei übersetze und verstehe.

lg

[DeddyH]

Implementiere doch erst einmal die Dateisuche. Wenn die funktioniert, sehen wir weiter.

[edit] Statt des Edits würde ich lieber SelectDirectory verwenden, das ist bequemer für den Anwender und Du kannst ziemlich sicher sein, dass es den Pfad dann auch gibt. [/edit]

[Newcomer91]

schlechte Idee, ich weis nämlich nicht wie ich anfangen muss... : /

[DeddyH]

Du hast die Begriffe doch selbst im Topic genannt.

[Newcomer91]

Das Problem ist das ich nicht weiß wie ich es umsetzen soll, was ich machen muss weiß ich ja.. ;(

[Sharky]

In unserer Code-Library gibt es verschiedene Beispiele um Dateiennamen in einem Verzeichniss zu finden und z.B. in einer TStringList einzutragen.

[Newcomer91]

ist die deutsch und für nicht profis verständlich?

[Sharky]

Zitat:

Zitat von Newcomer91

ist die deutsch und für nicht profis verständlich?

Schaue es Dir doch mal an. Einfach oben auf "Code-Library" klicken und dann z.B. nach FindAllFiles suchen.

[Sir Rufo]

Zitat:

Zitat von Newcomer91

Kommentare die auf iwelche Seiten hinweisen wo es eine Lösung geben soll, ignoriere ich, da ich nicht so top im englisch bin das ich alles so einwandfrei übersetze und verstehe.

aha ... nach deiner meinung gibt es zu delphi im internet also nur was in englisch?
Wieso fragst du dann im Internet, wo es nach deiner definition nur was in englisch gibt?

Oder hast du einfach nur kein Bock selber zu denken (auch wenn sich hinter den Links was in deutscher Sprache versteckt)?

btw: es riecht ein wenig nach Hausaufgabe ...

Zitat:

Zitat von Sharky

In unserer Code-Library gibt es verschiedene Beispiele um Dateiennamen in einem Verzeichniss zu finden und z.B. in einer TStringList einzutragen.

er will doch keine Links :mrgreen:

Zitat:

Zitat von Newcomer91

ist die deutsch und für nicht profis verständlich?

echt hammer ... sogar zu faul einmal auf den link zu drücken und eben mal selber schauen

[dominikkv]

Zitat:

Zitat von Newcomer91

ist die deutsch und für nicht profis verständlich?

Es gibt Gerüchte, dass manch einer gebissen wurde, als er eben dies nachschauen wollte :stupid: