Hi, Colleagues!
Can you help me with one task?
I need to call some procedure 4 times and get results from each threads after execution.
Is anybody know how to make it easy?
My code now is:
Count:=(|MirrorsData|-2)/3
MirrorWidth:=MirrorsData[|MirrorsData|-2]
MirrorHeight:=MirrorsData[|MirrorsData|-1]
FullTime:=0
Threads:=[]
for Index := 0 to |MirrorsData|-3 by 3
X:=MirrorsData[Index]
Y:=MirrorsData[Index+1]
Ang:=MirrorsData[Index+2]
MirrorAreaData:=[X,Y,Ang,MirrorWidth,MirrorHeight]
copy_image(SourceImage, DupImage)
par_start<LabelingProcessThread.at(Index)>: Get_Label_Collerete_And_Cap (DupImage, \
LabelPartImage, \
CollereteImage, \
CapImage, \
MirrorAreaData, \
HangersData, \
MirrorAreaData, \
MirrorAreaData, \
CollereteData, \
CapData, \
HangersShapeModel, \
TimeElapsed)
endfor
convert_vector_to_tuple (LabelingProcessThread, ImageProcessingThreads)
count_seconds (T1)
par_join(ImageProcessingThreads)
count_seconds (T2)
TimePar:=1000.0*(T2-T1)
return ()
Looks like he is working. But I don't understand how to get results from threads after execution.
|