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

Вниз

Как сделать так, чтобы программа не висла?   Найти похожие ветки 

 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 15:26) [0]

Например, я читаю файл с диска с помощью API, а файл плохо читается и API глохнет(программа не отвечает на системные запросы). Стандартно Application.processmessage не помагает. Как обойти зависание?


 
Dms   (2003-02-28 15:30) [1]

Используй потоки, должно помочь.


 
Anatoly Podgoretsky ©   (2003-02-28 15:37) [2]

Как и откуда читаешь?


 
Serious Sam   (2003-02-28 15:41) [3]

>Как обойти зависание?

Либо сделать нормальный кодинг, либо не запускать программу


 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 15:42) [4]

Тупо делаю FileRead - на нем и виснет:(


 
Smithson ©   (2003-02-28 15:46) [5]

Код в студию!


 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 15:51) [6]

Короче что-то около того
BytesCopied := FileRead(Source, CopyBuffer^, 512);
if BytesCopied > 0 then
FileWrite(Dest, CopyBuffer^, BytesCopied);

Если файл плохо читается, то на месте BytesCopied := FileRead(Source, CopyBuffer^, 512); наглухо виснет.


 
Anatoly Podgoretsky ©   (2003-02-28 16:05) [7]

Делай в отдельном потоке


 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 16:08) [8]


> Делай в отдельном потоке

А по-конкретней... DLL что-ли для этого писать?


 
Serious Sam   (2003-02-28 16:22) [9]

Что значит "файл плохо читается"?


 
BJValentine ©   (2003-02-28 16:26) [10]

Попробуй секцию Try... Except;


 
Переяслов Григорий ©   (2003-02-28 16:28) [11]

Используй TThread bkb File/New -> Thread object


 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 16:35) [12]


> Попробуй секцию Try... Except;

Это уже пройденный материал. Дело в том, что FileRead виснет например на сидюке, когда компашка дохлая(вся в царапинах). FileRead может выполнятся и 10 минут и 20 минут (у меня сидюк Asus50x еще до удешевления производтсва, так он все подрят жрет, даже компашки с поврежденной поверхностью, и что удивительно без ошибок). На других сидюках(Sony, Panasonic, Samsung) FileRead завершается быстро, но результат = 0.


 
.::D.e.M.o.N.i.X::. ©   (2003-02-28 16:37) [13]


> Используй TThread bkb File/New -> Thread object

Спасибо, только что прочитал статью на InfoCity.


 
Serious Sam   (2003-02-28 16:37) [14]

overlapped read пробовали?



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

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

Наверх




Память: 0.49 MB
Время: 0.018 c
1-29863
Sandman
2003-02-28 11:28
2003.03.10
OLE: OpenText и Dialog.Show в Excel.Workbooks


1-29947
Ozone
2003-02-27 11:39
2003.03.10
3 вопроса по Word<->Delphi7


4-30189
Шишкин Илья
2003-01-21 19:09
2003.03.10
Как получить текст из Memo чужого окна


14-30106
konstantinov
2003-02-22 16:25
2003.03.10
SOS! Проблема с модулем SDRAM 128Mb.


1-29833
hooch
2003-02-28 09:13
2003.03.10
Scroll