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

Вниз

Небольшая проблема с потоком...   Найти похожие ветки 

 
Ксардас ©   (2005-08-13 21:44) [0]

Короче создал я поток,который должен грузить офигенное кол-во инфы в РичЭдит.В общем загрузка происходит нормально,но по ёё окончании выводится сообщение об ошибке:

Project Project2.exe raised exception class EAccessViolation with message "Access violation at address 74DF3CB9 in module "RICHED20.dll". Read of address 6C840002". Process stopped. Use Step or Run to continue.

Что ЭТО обозначает и что можно сделать?


 
begin...end ©   (2005-08-13 21:48) [1]

Приведите код загрузки офигенного кол-ва инфы в РичЭдит.


 
Eraser ©   (2005-08-13 21:49) [2]

Ксардас ©   (13.08.05 21:44)

Визуальные копоненты из VCL по своей природе не потоко-безопасны,  т.е. к ним можно обращаться только в контексте основного потока.


 
Ксардас ©   (2005-08-13 22:05) [3]

begin
ct:=0;
adress:=0;
TestForm.Memo1.Lines.LoadFromFile("C:\TestLoader\Data\LastFile.last");
TestForm.RichEdit1.Clear;
TestForm.N6.Enabled:=true;
TestForm.ToolButton4.Enabled:=true;
begin
TestForm.RichEdit1.Clear;
assignfile(f,TestForm.Memo1.Text);
reset(f,1);
ct:=0;
while not eof(f) do begin
blockread(f,MyArray,1);
ct:=ct+1;
end;
reset(f,1);
blockread(f,MyArray,ct);
closefile(f);
end;
for i:=0 to (ct div 16 )do begin
AdrStr:="";
HexStr:="";
SmvStr:="";
FinalString:="";
Adress:=Adress+16;
AdrStr:=IntToHex(Adress-16,8)+"   ";
for j1:=1 to 16 do begin
if j1=9 then HexStr:=HexStr+" -";
HexStr:=HexStr+" "+IntToHex(MyArray[i*16+j1],2);
if j1=16 then HexStr:=HexStr+"  ";
if char(MyArray[i*16+j1])=#000 then SmvStr:=SmvStr+"." else
SmvStr:=SmvStr+char(MyArray[i*16+j1]);
end;
FinalString:=AdrStr+HexStr+SmvStr+#13#10;
TestForm.RichEdit1.Text:=TestForm.RichEdit1.Text+FinalString;
end;
end;

Примерно так


 
GanibalLector ©   (2005-08-13 22:09) [4]

2 Ксардас ©   (13.08.05 22:05) [3]
Что это??? Это код потока??? Если да,то читаем Eraser ©   (13.08.05 21:49) [2]


 
Наиль ©   (2005-08-13 22:11) [5]

Подозрительная строчка.
blockread(f,MyArray,ct);
Какого размера MyArray?


 
Ксардас ©   (2005-08-13 22:12) [6]


> Подозрительная строчка.
> blockread(f,MyArray,ct);
> Какого размера MyArray?

0..800000


 
Ксардас ©   (2005-08-13 22:12) [7]


> Визуальные копоненты из VCL по своей природе не потоко-безопасны,
>  т.е. к ним можно обращаться только в контексте основного
> потока.

можно поподробнее?


 
Eraser ©   (2005-08-13 23:33) [8]

Ксардас ©   (13.08.05 22:12) [7]
можно поподробнее?


Как я уже говорил VCL не потоко-безопасна, т.е. эта библиотека изначально разрабатывалась для работы с ней только из основного потока пролижения. Восновном это связано с тем, что графические ф-ии в VCL не защищены объектами синхронизации (критическая секция, мьютекс и т.д.).
Поэтому чтобы взаимодействовать с VCL из другого потока существует метод Synchronize (см. справку - F1). Хотя он "пожирает" довольно много ресурсов... иногда выгоднее использовать сообщения (Send/PostMessage + F1).
В некоторых случаях можно обойти проблемы взаимодействия с визуальными компонентами, защитив обращения к ним, критическими секциями, например... но это можно делать далеко не во всех компонентах и далеко не всегда.


 
AlexWlad ©   (2005-08-14 11:38) [9]

Это HEX-viewer ?


 
Eraser ©   (2005-08-14 14:16) [10]

AlexWlad ©   (14.08.05 11:38) [9]

Где?



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

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

Наверх




Память: 0.49 MB
Время: 0.041 c
14-1123873434
Piter
2005-08-12 23:03
2005.09.04
Сколько будет 2 х 2 ?


14-1123668228
Внук
2005-08-10 14:03
2005.09.04
Свершилось


1-1123742247
M@rlin
2005-08-11 10:37
2005.09.04
ЛИЦЕНЗИЯ НА ДЕЛФИ


4-1121698162
Docent
2005-07-18 18:49
2005.09.04
Хук на Edit


1-1123439946
Jenya
2005-08-07 22:39
2005.09.04
доработка в Компоненте