Einzelnen Beitrag anzeigen

Benutzerbild von calculon
calculon

Registriert seit: 16. Sep 2006
256 Beiträge
 
Delphi 7 Personal
 
#1

function/procedure pausieren verhindern

  Alt 10. Jun 2007, 17:33
Hi Leute,

wenn ich beispielsweise eine Prozedur habe:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
for i := 0 to 1000000 do
  begin
    listbox1.Items.Add(inttostr(i));
    application.ProcessMessages;
  end;
end;
und während diese läuft und ich in der Listbox scrolle oder die Form auf dem Desktop verschiebe, dann pausiert die Prozedur bis ich die Maus wieder loslasse. Kann man das unkompliziert verhindern?

Gruß

Calculon
--
  Mit Zitat antworten Zitat