Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Frage zu FindFirst - Findnext Funktion (https://www.delphipraxis.net/149141-frage-zu-findfirst-findnext-funktion.html)

Newcomer91 15. Mär 2010 12:54


Frage zu FindFirst - Findnext Funktion
 
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 15. Mär 2010 13:02

Re: Frage zu FindFirst - Findnext Funktion
 
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 15. Mär 2010 13:11

Re: Frage zu FindFirst - Findnext Funktion
 
schlechte Idee, ich weis nämlich nicht wie ich anfangen muss... : /

DeddyH 15. Mär 2010 13:13

Re: Frage zu FindFirst - Findnext Funktion
 
Du hast die Begriffe doch selbst im Topic genannt.

Newcomer91 15. Mär 2010 13:14

Re: Frage zu FindFirst - Findnext Funktion
 
Das Problem ist das ich nicht weiß wie ich es umsetzen soll, was ich machen muss weiß ich ja.. ;(

Sharky 15. Mär 2010 13:14

Re: Frage zu FindFirst - Findnext Funktion
 
In unserer Code-Library gibt es verschiedene Beispiele um Dateiennamen in einem Verzeichniss zu finden und z.B. in einer TStringList einzutragen.

Newcomer91 15. Mär 2010 13:17

Re: Frage zu FindFirst - Findnext Funktion
 
ist die deutsch und für nicht profis verständlich?

Sharky 15. Mär 2010 13:20

Re: Frage zu FindFirst - Findnext Funktion
 
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 15. Mär 2010 13:20

Re: Frage zu FindFirst - Findnext Funktion
 
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 15. Mär 2010 13:22

Re: Frage zu FindFirst - Findnext Funktion
 
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:

Newcomer91 15. Mär 2010 13:24

Re: Frage zu FindFirst - Findnext Funktion
 
natürlich, nach hausaufgabe...xD Als wenn man auf dem Fachgym Wirtschaft programmiert, und nein,

ich denke nicht dass alles nur englisch ist im internet, aber sämtliche Seiten von Borland, Embarcadero kA sind englisch, ich frage im Internet auf ner DEUTSCHEN xD Seite nach.
Ich schreibe dieses Programm um jemandem damit die Arbeit zu erleichtern, für mich selbst ist es eig. unrelevant.

Dennoch möchte ich das gerne fertig schreiben und hoffe auf Kommentare die einem helfen und nicht darauf hinweisen wie blöd man denn doch wäre das man dem internet unterstellt es sei nur englisch oder sonstiges.

Gruß

Panthrax 15. Mär 2010 13:43

Re: Frage zu FindFirst - Findnext Funktion
 
Das mit dem Englisch ist wirklich so eine Sache. Ich habe bis heute nicht verstanden, warum einige Deutsche Englisch Deutsch vorziehen und damit ihre Arbeit den eigenen Leuten vorenthalten. Ich habe noch nie gesehen, dass jemand Englisches seine Programme nur auf Deutsch kommentiert, dokumentiert o.ä.

Allerdings braucht das Verhalten hier auch keinen direkten Kommentar, oder?

DP-Maintenance 15. Mär 2010 13:45

DP-Maintenance
 
Dieses Thema wurde von "Sharky" von "Programmieren allgemein" nach "Object-Pascal / Delphi-Language" verschoben.
So oder so ist es eine Delphi Frage!!!

himitsu 15. Mär 2010 13:55

Re: Frage zu FindFirst - Findnext Funktion
 
Zitat:

Zitat von Newcomer91
ich denke nicht dass alles nur englisch ist im internet, aber sämtliche Seiten von Borland, Embarcadero kA sind englisch, ich frage im Internet auf ner DEUTSCHEN xD Seite nach.
Ich schreibe dieses Programm um jemandem damit die Arbeit zu erleichtern, für mich selbst ist es eig. unrelevant.

[ot] ich kommentiere auch immer öfters in englisch, da die Kommentare so für einen größeren Teil der Menschheit was nützen.

Mit deutsch schränke ich mich vorwiegend nur auf den deutschsprachigen raum ein,
wärend englisch als "sogenannte" Weltsprache viel mehr verbreitet ist.

PS: eigentlich alle großen Programmiersprachen sind grundsätzlich englisch, so daß dann auch viele Befehle, Funktionen, Prozeduren, Typenbezeichnungen (Klassen nd Co.), sowie Variablen und Konstanten englisch sind und dann machen sich da auch eigene englischsprachige Bezeichner nicht schlecht ... ist jedenfalls besser als soein Dänglisch-Mischmasch (deutsch-englisch).

Sir Rufo 15. Mär 2010 14:02

Re: Frage zu FindFirst - Findnext Funktion
 
Zitat:

Zitat von Newcomer91
ich denke nicht dass alles nur englisch ist im internet, aber sämtliche Seiten von Borland, Embarcadero kA sind englisch,

Vor kurzem haben wir hier erst in die Delphi-Referenz auch die deutschen Seiten von embarcadero reingenommen.
Soviel zum Thema, da gibts ja nur englisch.
Zitat:

Zitat von Newcomer91
hoffe auf Kommentare die einem helfen und nicht darauf hinweisen wie blöd man denn doch wäre das man dem internet unterstellt es sei nur englisch oder sonstiges.

Und wenn dann ein Kommentar kommt der dir helfen soll, kommt von dir nur die Frage "ist das auch auch deutsch, kann ich das verstehen".
Hier in diesem Forum gibt es nur Hilfe zu Selbsthilfe.
Lies dazu bitte einmal die Forumsregeln (sind auch zum Glück auf deutsch)
Hier wird Eigeninitiative vorausgesetzt, das impliziert, dass man auch mal auf einem Button/Link drückt und man schaut, was sich da verbirgt.
Weiterhin verlangen wir hier, dass man auch die Suche im Forum benutzt.

Wenn du dort dann Quellen gefunden hast, und du dort dann spezielle Teile nicht verstehst, werden wir dir gerne weiterhelfen.

Panthrax 15. Mär 2010 14:19

Re: Frage zu FindFirst - Findnext Funktion
 
Zitat:

Zitat von himitsu
ich kommentiere auch immer öfters in englisch, da die Kommentare so für einen größeren Teil der Menschheit was nützen.

Mit deutsch schränke ich mich vorwiegend nur auf den deutschsprachigen raum ein,
wärend englisch als "sogenannte" Weltsprache viel mehr verbreitet ist.

Doku usw. !? -- Hm, während das englische Kiddy damit etwas anfangen kann, muss man hierzulande erstmal Englisch lernen... In der Wirtschaft ist nennt man das Wettbewerbsverzerrung; nur blöd, dass wir es uns selbst schwermachen. Wie steht es eigentlich um unseren Antrag in das Commonwalth einzutreten?

Sharky 15. Mär 2010 14:35

Re: Frage zu FindFirst - Findnext Funktion
 
Können wir wieder zum Thema zurück finden?

Danke :-D

himitsu 15. Mär 2010 14:35

Re: Frage zu FindFirst - Findnext Funktion
 
Zitat:

Zitat von Panthrax
Hm, während das englische Kiddy damit etwas anfangen kann, muss man hierzulande erstmal Englisch lernen...

Wer programmieren will sollte sowieso englisch verstehn können
oder sollte wenigstens wissen wie man z.B. Wörterbücher, Übersetzungsprogramme, Babelfish oder andere Übersetzer benutzt. ( http://translate.google.de )

Zitat:

Zitat von Panthrax
In der Wirtschaft ist nennt man das Wettbewerbsverzerrung; nur blöd, dass wir es uns selbst schwermachen. Wie steht es eigentlich um unseren Antrag in das Commonwalth einzutreten?

Ein-/ausgrenzen muß man so oder so immer irgendwen.
Und da ist es mit Englisch das geringere Übel.
(wobei ich nur sagte, daß ich grundsätzlich erstmal Englisches verbreite und nicht, daß es NIE eine deutsche Überetzung geben wird)

[edit]
*nix gesagt hab*
aber die RedBox hätte ruhig mal warnen können.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:09 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz