Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2008-07-02 22:19:38 ЛС | профиль | цитата
nesco,


dtBitmap(db,FBitmap);
dtIcon(di,FIcon);
inc(FCurIndex);

if FCurIndex > FListIndex.Count - 1 then begin
if FCircleAnima then
if FStopCycle then //begin
FStop := true
// FCurIndex := FListIndex.Count - 1;
// FFlagDelay := true;
// end
else begin
FCurIndex := 0;
FFlagDelay := true;
FTimerCycle.Enabled := true;
// end else begin
// FStop := true;
// FCurIndex := FListIndex.Count - 1;
end;
_hi_OnEvent(_event_onEndCycle);
end;

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0