XE2: TThread.Start erzeugt Exception

[Helmi]

Hallo,

in einem Projekt das ich aus Delphi 7 in XE2 portiert habe, erzeuge und starte ich einen Thread so:

Delphi-Quellcode:

  //Thread erzeugen
  MD_Thread := TDatenThread.Create;

  //Priorität festlegen
  MD_Thread.Priority := tpNormal;

  //Thread nach dem Freigeben selbstständig löschen lassen
  MD_Thread.FreeOnTerminate := true;

  //Thread starten
  MD_Thread.Resume;

Unter XE2 wird "Resume" als veraltet angewarnt und man solle "Start" benutzen".

Wenn ich aber nun "Resume" durch "Start" tausche, dann erhalte ich eine Exception:

Zitat:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt NCUpgradeReader.exe ist eine Exception der Klasse EThread mit der Meldung 'Start kann für einen laufenden oder unterbrochenen Thread nicht aufgerufen werden' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------

Klick ich dann auf "Fortsetzen" so läuft der Thread an und alles wird wie gewohnt abgearbeitet.

Nun frag ich mich, warum das Start eine Exception schmeisst?
Da bleib ich dann doch lieber bei "Resume".

[Edit]
Argl!

Im constructor von TDatenThread war create(false) drin.
Deswegen wurde der Thread sofort gestartet. Dann muss er natürlich bei "Start" eine Exception schmeissen

Delphi-Quellcode:

constructor TDatenThread.Create;
begin
  inherited Create(false);

  //StringList erzeugen
end;

[himitsu]

Resume und Start sollten eigentlich das Gleoche sein.

Wird dein DatenThread überhaupt Supended (angehalten) erstellt?

[edit]
Nee, ist nicht das Selbe.
Resume und Suspend zählen, wie oft angehalten wurde und behandeln keine Startfehler, wenn der Thread schon läuft, welchen man starten will,
was Start aber macht.

Etwas das schon läuft, das kann man nicht mehr starten.

[Helmi]

Zitat von himitsu:

Wird dein DatenThread überhaupt Supended (angehalten) erstellt?

siehe meinem Edit oben

[himitsu]

ähhh, sag ich doch