Einfaches Thread Beispiel

[DoktorD]

Servus.

Ich bin hier im Forum auf der suche nach einen einfachen Beispiel für Threads, habe auch leider nichts gefunden.
Ich selber habe noch nie was mit Threads gemacht, denke aber, das ich jetzt sowas in der richtung brauchen werde (Application.ProcessMessages schickt nicht mehr)

Ein Teil meines Programms (eine Funktion ) friert bei jeder ausführung den rest ein und man kann für ca. 2 Sekunden nichts anderes mehr machen

Ich stelle mir den Thread so änlich vor wie:

Delphi-Quellcode:

Starte Thread

Hier meine Funktion 

Stoppe Thread

Hat jemand zufällig ein einfaches Beispiel in dieser Richtung? Wäre euch 100000000000Mal Dankbar!!!!

[everdream]

TThread sollte dir helfen: kleine Erklärung mit Beispiel

[sirius]

Für Threads kann man schwer eine allgemeine Lösung posten.

Mache dir zuerst Gedanken über die Schnittstellen zum MainThread (oder noch weitere Threads wenn vorhanden und notwendig).
Also:
- welche Eingabeparameter
- welche Ausgabeparameter
- gibt es zwischendurch Variablen, die ausgetauscht werden müssen (wenn es geht vermeiden)

[DoktorD]

Zitat:

Zitat von everdream

TThread sollte dir helfen: kleine Erklärung mit Beispiel

Danke für das Beispiel, werde es erstmal damit probieren

[DelphiManiac]

Hier mal ein kleiner Auschnitt aus dem oben genannten Beispiel, wie man es nicht machen sollte:

Delphi-Quellcode:

procedure TMyThread.Execute;
var
T:Integer;
begin
t:=FTimeToWork;
Form1.Memo1.Lines.Add('Begin execution'); // AAARGH nie ohne Synchronisierung auf die GUI zugreifen!!! (Siehe Forum)
while not Terminated and (t>0) do
begin
Form1.Memo1.Lines.Add(format('Remaining %5.2f%%',[t/FTimeToWork*100]));
Sleep(500);
dec(t,500);

[Luckie]

Guck mal hier: http://delphitutorials.michael-puff.de

[Regan]

Zitat:

Zitat von Luckie

Guck mal hier: http://delphitutorials.michael-puff.de

Kann ich dir auch nur empfehlen. Ich habe mich aber erst ab Seite 53 mit dem VCL-Threadobjekt beschäftigt. Das ist einfacher.

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Programmieren allgemein" nach "VCL / WinForms / Controls" verschoben.