Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.02.17;
Скачать: CL | DM;

Вниз

Extended в TThread и его деление...   Найти похожие ветки 

 
Василий К.   (2008-01-24 09:25) [0]

Коллеги!

Помогите решить вопрос:

Почему при попытке внутри потоковой процедуры TThread.Execute произвести деление друг на друга двух Extended чисел этот поток вышибает? При этом +,-,* операции выполняются совершенно нормально...

Или подскажите решение для определения "estimated/elapsed" времени чтения файла (тысячи мегабайт) типа "Осталось: 1:00:10"

Спасибо...


 
Palladin ©   (2008-01-24 09:28) [1]

Ошибка в 17 строке


 
Василий К.   (2008-01-24 09:31) [2]

if Assigned(WorkStream) then begin
     wSize := WorkStream.Size; wPos := WorkStream.Position;
     wTTF := wSize-wPos;
     TimeLeft := wTTF-TimeLeft;
   end else begin
     TimeLeft := 0;
   end;

где WorkStream - TFileStream
wSize, wPos, wTTF, TimeLeft: Extended;

так вот если в TimeLeft := wTTF-TimeLeft; поставить знак деления, вышибает..


 
Palladin ©   (2008-01-24 09:31) [3]

ага... подика еще и по EDivByZero...


 
Василий К.   (2008-01-24 09:34) [4]

Спасибо, разобрался сам...



Страницы: 1 вся ветка

Текущий архив: 2008.02.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
2-1200997632
Gasper
2008-01-22 13:27
2008.02.17
Киррилица


2-1201500506
psa247
2008-01-28 09:08
2008.02.17
получить ListView.Data ?


1-1194517113
DDDeN
2007-11-08 13:18
2008.02.17
Реализация механизма расписания


2-1201009454
savyhinst
2008-01-22 16:44
2008.02.17
Pascal Script


15-1200407003
OSokin
2008-01-15 17:23
2008.02.17
Доки vs форумы