Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];
ВнизВопрос по потокам Найти похожие ветки
← →
XShura (2002-06-18 14:22) [0]Всем привет! Возник вопрос по синхронизации потоков :
Имеем главную форму, где расположен TListView :
TfmGlav = class(TForm)
List1: TListView;
Image1: TImageList; // иконки для ListView
...
end;
и есть вторичный поток :
TTh = class(TThread)
private
{ Private declarations }
fList:TListView;
protected
procedure Execute; override;
public
constructor Create(List:TListView);
destructor Destroy; override;
end;
implementation
constructor TTh.Create(List:TListView);
begin
inherited create(true);
fListGr:=ListGr; // присваиваем FList указатель на TListView главной формы
resume;
end;
procedure TTh.Execute;
begin
repeat
sleep(10);
fList.Items[0].ImageIndex:=3; // обращение к свойству List1.ImageIndex первичного потока
sleep(10);
fList.Items[0].ImageIndex:=0;
sleep(10);
until Terminated;
end;
вопрос : насколько корректен код в методе Execute и надо ли
использовать метод Synchronize ?
И еще, если мой код некорректен, то как мне заставить программу "глюкнуть"
в этом методе, так как данный код работает без всяких коллизий.
← →
_Antiox_ (2002-06-18 14:33) [1]Синхронизировать надо конечно!
Коллизии возникнут, если у тебя несколько потоков будут работать с одним и тем же ресурсом без синхронизации.
Т.к. в коде присутствуют sleep() - это уменьшает вероятность коллизии, но это не выход.
Дело в том, что даже убрав все sleep-ы и запустив множество потоков программа может и не "глюкнуть" явно (т.е. не будет AV и т.д.), но логика программы может быть нарушена.
← →
XShura (2002-06-18 14:50) [2]Спасибо что откликнулся!
Из твоего ответа я понял, что нет никаких средств отследить такие коллизии кроме как ждать и ждать ....
← →
[aka] (2002-06-18 15:33) [3]Зачем ждать, создай десять таких струн и сразу увидишь как весело будет с ListView ;)
Хотя зависит от логики - если остальному коду неважно, какая там иконка, то юзверю и подавно :)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c