Brute Force Demo-Programm

[ReDoX]

Hi,
Ich würde in die Procedure force am Anfang ein ProcessMessages reinstetzten und bei

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
.
.
.
end;

würde ich das so machen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form1.Caption := 'Searching...';
   .
   .
   .  
   .
  Form1.Caption := ' Brute Force - Demo';
end;

Mfg ReDoX


Mein 200 Beitrag