Формирование массива

← →
Eraser (2002-01-31 13:57) [5]

Скажите если я не прав :
1.В основной форме прерываю поток
Т[1].Suspend;
2.В основной форме пишу
resultfs:=Т[1];
3.Запускаю поток
Т[1].Resume;
4.Пользуюсь переменной Fs в основной форме.

Прав ли я??
И вообще т.к. код одинаков если я напишу

procedure TSortThread.Execute;
var i:integer;
begin
while not Terminated do
case FFirstPar of
1:Work(FNextPar);
2:Work(FNextPar);
3:Work(FNextPar);
end;

procedure work(FNextPar:Integer);
begin
for i:=1 to 10000 do fs:=fs+1
end;

то вышеописанное об обращении к Fs не изменится??

Формирование массива Найти похожие ветки