Глохнет софт, проблема в потоке?

[FleXik]

Вобщем софт глохнет когда сам захочет, я так понимаю что дохнет поток или не освобождается регулярка RegExpr или стринглист (про регулярку и стринглист могу ошибаться) или не синхронизирую какую-то часть кода, как решить проблему? Причем такая проблема в большинстве моих проэктов, даже там где все синхронизировано...

Стартую поток так:

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  thr_potok:th_potok;

  thr_potok:=th_potok.Create(True);
  thr_potok.Priority:=tplower;
  thr_potok.FreeOnTerminate:=True;
  thr_potok.Ends:=True;
  thr_potok.Resume;

Останавливаю поток так:

  thr_potok.Ends:=False;

Ends у меня типа Boolean и прописано в юните потока (там где Execute)

[uberchel]

Когда нет полного листинга кода, боюсь, вам помогут только ясновидцы )

[Vapaamies]

Глохнет? Искра в баллон ушла.

[min@y™]

Думаешь, если задать один вопрос на N форумах, то его решат в N раз быстрее?

Я ж тебе сказал:

если хочешь делать работающий код, учись юзать отладчик, без него ты слепой, это аксиома.

[Shouldercannon]

Сообщение от FleXik

Останавливаю поток так:

  thr_potok.Ends:=False;

Ends у меня типа Boolean и прописано в юните потока (там где Execute)

Что не так?

thr_potok.Terminate; // В какой-нибудь процедуре
if Self.Terminated then Break; // Проверка в самом потоке