Einzelnen Beitrag anzeigen

Newcomer91

Registriert seit: 9. Mär 2010
66 Beiträge
 
Delphi 2010 Professional
 
#1

Frage zu FindFirst - Findnext Funktion

  Alt 15. Mär 2010, 12:54
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
  Mit Zitat antworten Zitat