Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
hattee es auch schon geändert, vielen dank ;)
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
ich weiss das auch, nur für mich ist es nicht ganz so leicht die zusammenhänge herauszufinden
bzw. diese anzupassen.
du meinst das, gell?
IF FindFirst(Path + '*.TXT', faAnyFile, SearchR) = 0 THEN
REPEAT
IF (SearchR.Attr <> faDirectory) THEN
BEGIN
// nach einem Wort im Dateinamen suchen
// pos ist...
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
:balloon: das ist es...
ich muss nur noch den pfad aus aus (Pfad) rauskriegen (so das nur noch der ordnername da steht)
und im zweiten stringgrid1.cells steht nur die dateiendung...
das ist alles, vielen dank für deine hilfe
ich will mir ein programm machen mit dem ich sourcecode-beispiele für verschiedene programmiersprachen/scripte abspeichern kann.
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
wie soll ich in dem zusammenhang die stringliste füllen?
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
ach nee...
das was fehlt weiss ich doch selber...nur wie ich das machen muss weiss ich nicht, deshalb poste ich doch hier. :-D
ich verstehe auch nicht, das stand doch auch schon alles in meinem ersten beitrag.
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
das stringgrid wird nicht gefüllt...
hiermit geht es:
procedure ZuMemoFallsKiterienerfuellt(const pfad, BestimmteDatei,SuchTextInDerDatei: string);
var
i:integer;
aStringList : TStringList;
begin
//aStringList := TStringList.Create;
if Str1IstInStr2(BestimmteDatei,pfad)
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
das funktioniert so nicht, was mache ich falsch?
procedure ZuMemoFallsKiterienerfuellt(const pfad, BestimmteDatei,SuchTextInDerDatei: string);
var
i:integer;
aStringList : TStringList;
begin
aStringList := TStringList.Create;
if Str1IstInStr2(BestimmteDatei,pfad)
and istInderDatei(SuchTextInDerDatei,pfad) then
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
genau das ist ja mein problem, ich blick da nicht durch...
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
moin christian
das was mit
form1.memo1.lines.add('"'+pfad + SuchTextInDerDatei);
ins memo kommt, soll in ein stringrid. (s.screenshot oben)
Forum: Sonstige Fragen zu Delphi
Delphi
by horst,
26. Okt 2003
ich habe ein problem mit dem füllen eines stringrid mit suchergebnissen.
ein memo kann ich so ganz prima füllen...
werwende dafür den tip:
http://joachim.mohr.rottenburg.bei.t-online.de/faq.html#durchsuchen
procedure ZuMemoFallsKiterienerfuellt(const pfad, BestimmteDatei,
SuchTextInDerDatei: string);
begin
if Str1IstInStr2(BestimmteDatei,pfad)
...