[HAI]

Подскажите пожалуйста как реализовать потоки в делфях (полный ламер, если можно поподробнее)
Проблема в том что пока идет процедура просчета, программа не отвечает и нельзя даже нажать кнопочку санцел, которая прерывает работу процедуры. По идее с потоками должно получится, или может есть какой либо иной способ, помогите пожалуйста!

[Keygenmusic]

Вот суперский документ по потокам _hххp://decoding.narod.ru/book/doc/synchronization.zip
Имхо больше ничего и не нужно знать. И годиться не только для делфи

[bravo]

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

Вот суперский документ по потокам _hххp://decoding.narod.ru/book/doc/synchronization.zip

Очень хочется почитать, но я не знаю как это закачать. Ясно что ссылка не на Инет ресурс... Вообщем я не знаю как это закачать. Сори.

[Decoding]

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

Очень хочется почитать, но я не знаю как это закачать. Ясно что ссылка не на Инет ресурс... Вообщем я не знаю как это закачать. Сори.

Что значит "ссылка не на Инет ресурс". А на что? Или ты не догадался заменить _hххp на http. Или вообще выкинь из строки с адресом это - _hххp://, и все будет ок. Ну а если скачать не сможешь, пиши на decoding@narod.ru, вышлю.

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

Подскажите пожалуйста как реализовать потоки в делфях (полный ламер, если можно поподробнее)
Проблема в том что пока идет процедура просчета, программа не отвечает и нельзя даже нажать кнопочку санцел, которая прерывает работу процедуры. По идее с потоками должно получится, или может есть какой либо иной способ, помогите пожалуйста!

Если внутри цикла надо обрабатывать различные действия пользователя, нужно вставить внутрь цикла Application.ProcessMessages, и никакие потоки не нужны. Вот пример:

Код:

begin
   // бесконечный цикл
   while true do
   begin
      {
         любые действия
      }
      Application.ProcessMessages;
      if ( условие_выхода ) then Break;
   end;
   // продолжаем работу после цикла
end;

[Keygenmusic]

Если внутри цикла надо обрабатывать различные действия пользователя, нужно вставить внутрь цикла Application.ProcessMessages, и никакие потоки не нужны.

смотря какие действия, а если там слип на секунду? без потока никак тогда.
2 bravo насмешил :beer:

[Decoding]

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

смотря какие действия, а если там слип на секунду? без потока никак тогда.

Никогда не говори "никак"!!! Sleep() можно реализовать ручками, например так:

Код:

var
  t: Cardinal;
begin
   {
      Делай что надо
   }
   // Потом Sleep на секунду
   t := GetTickCount;
   while GetTickCount-t < 1000 do
      Application.ProcessMessages;
   {
      И спокойно работай дальше
   }
end;

И никакой поток тебе не нужен.