Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Wie das ende der Suche von jvsearchfiles erkennen? (https://www.delphipraxis.net/103427-wie-das-ende-der-suche-von-jvsearchfiles-erkennen.html)

BBoy 15. Nov 2007 16:15


Wie das ende der Suche von jvsearchfiles erkennen?
 
ICh lasse mit jvsearchfiles in einem bestimmten Ornder nach ZIP dateien suchen.
Immer wenn eines gefunden wird, wird daraus die file_id.diz ausgelesen und in eine liste geschrieben.

In der zeit wo die suche läuft habe ich 2 buttons disabled die wieder enabled werden müssen wenn die suche abgeschlossen ist.
Dachte mir ich mache das so:
Delphi-Quellcode:
procedure TForm1.JvSearchFiles1Progress(Sender: TObject);
begin
   if jvsearchfiles1.Searching = false then begin
      button1.Enabled := True;
      button2.Enabled := False;
      button3.Enabled := True;
      label3.Caption := inttostr(JvSearchFiles1.TotalFiles);
   end;
end;
Aber jvsearchfiles1.Searching wird scheinbar nur aufgerufen wenn die suche mit abort beendet wurde. Irgendwie fehlt da eine OnComplete eigenschaft.

Weis jemand wie ich es hinbekomme die buttons zu enablen wenn die suche abgeschlossen ist? ODer kennt jemand eine alternative komponente die ich verwenden kann?

BBoy 16. Nov 2007 11:45

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
^weis echt keiner wie ich das realisieren kann? Gern auch mit einer ganz anderen Komponente.

TeronG 16. Nov 2007 12:11

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
btw:
nie nach
Delphi-Quellcode:
If xyz = false
fragen sondern lieber
Delphi-Quellcode:
if not xyz
....

Genaue Beschreibung/Grund siehe irgendwo hier im Forum .... (bin grad zu faul zu suchen ^^)

Aurelius 16. Nov 2007 12:13

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
btw:

Das ist falsch. man sollte nie nach
Delphi-Quellcode:
if Boolean = TRUE ...
fragen sondern lieber
Delphi-Quellcode:
if Boolean ...
Beim FALSE ist das geschmackssache...

@ Topic: Gibts zu der Kompo keine Dokumentation?

DeddyH 16. Nov 2007 12:35

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
Die Jedis sind doch OpenSource. Wenn etwas fehlt, kann man es doch nachrüsten.

Florian H 16. Nov 2007 12:46

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
Zitat:

Zitat von DeddyH
Die Jedis sind doch OpenSource. Wenn etwas fehlt, kann man es doch nachrüsten.

Es nachzurüsten, obwohl es vielleicht schon da ist, wäre trotzdem realtiv doof.
Von daher ist die Frage doch gerechtfertigt.

DeddyH 16. Nov 2007 12:52

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
Da gebe ich Dir Recht, so war das auch gar nicht gemeint.

shmia 16. Nov 2007 13:24

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
Ich verstehe nicht, weshalb du für das Ende der Suche ein Event brauchst.
Das lässt sich doch ganz einfach ohne Events regeln:
Delphi-Quellcode:
// hier alle Befehle von dem Suchen
jvsearchfiles1.Search; // Search oder wie auch immer die Funktion heisen mag
// hier alle Befehle nach dem Suchen

BBoy 16. Nov 2007 17:21

Re: Wie das ende der Suche von jvsearchfiles erkennen?
 
Zitat:

Zitat von shmia
Ich verstehe nicht, weshalb du für das Ende der Suche ein Event brauchst.
Das lässt sich doch ganz einfach ohne Events regeln:
Delphi-Quellcode:
// hier alle Befehle von dem Suchen
jvsearchfiles1.Search; // Search oder wie auch immer die Funktion heisen mag
// hier alle Befehle nach dem Suchen

^OK das wars *schäm* man merkt's das ich schon lange nichts mehr Programmiert hab. Danke!

Vlt. hat ja doch jemand mal ein Link wegen dem Thema "If Boolean...."


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:23 Uhr.

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