Wie das ende der Suche von jvsearchfiles erkennen?

[BBoy]

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]

^weis echt keiner wie ich das realisieren kann? Gern auch mit einer ganz anderen Komponente.

[TeronG]

btw:
nie nach If xyz = false fragen sondern lieber if not xyz ....

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

[Aurelius]

btw:

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

@ Topic: Gibts zu der Kompo keine Dokumentation?

[DeddyH]

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

[Florian H]

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]

Da gebe ich Dir Recht, so war das auch gar nicht gemeint.

[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

[BBoy]

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...."