Threading möglich?

[derseitzer]

Hallo Leute,
Ich habe ein Programm und hole mir in einer Funktion alle Informationen von einer Steuerung.
Das sind so viele Daten das ich das gesamte Programm für einige Sekunden lahmlegen würde, wenn ich mir alle Daten auf einmal holen würde.
Momentan hole ich mir nun die Informationen Stückweise, aber mich würde interessieren, ob es nicht möglich ist, alle meine normalen Funktionen Prozeduren und Timer etc. normal
laufen zu lassen und mithilfe eines anderen Kerns die Daten zu empfangen kurz: Multi-Threading. Würde das funktionieren?

Gruß derseitzer

[TiGü]

Die Glaskugel sagt:
Vielleicht! :glaskugel:

[derseitzer]

und ich hab nochmal eine blöde Frage :oops:
Ich habe Delphi 10 Seattle und habe in meiner Tool-Palette kein "TThread", bedeutet dass, das ich da schon wieder irgendeine Erweiterung brauche? :cry:

[Uwe Raabe]

TThread ist nicht von TComponent abgeleitet und kann daher in der Tool-Palette nicht auftauchen.

[LTE5]

Datei > Neu > Weitere > Delphi-Dateien > Thread-Objekt

[derseitzer]

Oh Dankeschön! Dann werde ich mich nun einarbeiten. Dnakeschön :-D

[Mavarik]

oder

Delphi-Quellcode:

TTask.Run(Procedure
begin
  Hole_Daten;
  TThread.Queue(NIL,Procedure
  begin
    Label1.Text := 'Daten da';
  end);
end);

Mavarik

[derseitzer]

Nun habe ich mich ein klein wenig eingearbeitet und habe ein paar Fragen

Meine Form:

Code:

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

Mein TThread:

Code:

procedure MyThread.Execute;
begin
FreeOnTerminate := TRUE;
showmessage('hi');
sleep(5000);

Also ich wollte hier mal testen ob meine Form freazed wenn ich den sleep befehl im Thread nutze und das passiert nicht, so wie erhofft :-D
1. Frage: Stimmt das so, dass ich den Befehl MyThread.Create(False) zum starten meines MyThread.Executes benutze?
2. Frage: angenommen ich hole mir in "MyThread.Execute" nun Daten z.B. A:= Data1, B:=Data2 usw., dann würde meine Form nicht einfrieren (gehe ich von aus,da sie beim sleep Befehl auch nicht einfriert). Inwieweit beeinflusst mein Thread denn nun das ausgeführte Programm meiner Form (ich denke bzw. hoffe, die Antowrt ist garnicht mehr)?
3. Wird nun gleichzeitig die prozedur mythread.execute und z.b. eine prozedur meiner Form1 ausgeführt?
4.angenommen das Daten holen mithilfe des Threads dauert 10sekunden aufgrund der Massen an Daten, woher weiß ich wo ich gerade bin und was ich schon mit meiner Form verarbeiten kann?

Vielen Dank schon im voraus an alle die Ihre Zeit für mich opfern :oops:
Vielen Dank und freundliche Grüße,
derseitzer

[Mavarik]

Meine Antwort gelesen?

[TiGü]

Na, wie werden Objekte in Delphi richtig erstellt? Bitte nochmal überlegen!

Und schaue dir bitte Seite für Seite dieses kleine Tutorial an:
https://www.delphi-treff.de/tutorial...ascal/threads/

[4dk2]

Ich glaube du solltest dir erstmal Grundsätzlich durchlesen was Threads im allgemeinen sind,
und nicht drauf los programmieren.
Da du Seattle hast wäre für dich sicher die Paralls Lib sinnvoller.

http://docwiki.embarcadero.com/RADSt...amming_Library

Trotzdem. erstmal informieren was Threads sind.

[himitsu]

Zitat:

Delphi-Quellcode:

  MyThread.Create(False);
end;

Wollte erst TMyThread sagen, bis ich das sah

Zitat:

Delphi-Quellcode:

procedure MyThread.Execute;
begin

:shock:

ShowMessage im Thread niemals,
außer du synchronisierst das. Synchronize

[derseitzer]

Das showmessage habe ich nur gemacht um zu sehen, ob mein execute überhaupt ausgeführt wird - das gibt es nachher sowieso nicht mehr.
Und ja ich dachte beim Erstellen das Delphi mir das "T" für TThread schon mitgeben wird.. hat es aber nicht :lol:
Ich weiß was Threads sind, aber programmieren kann ich deshalb trotzdem noch keine :cry:

[Luckie]

Und die VCL ist nivht threadsafe. Deswegen ist der Aufruf von ShowMessage nicht die beste Idee.