equal
deleted
inserted
replaced
37 procedure DrawCaptions; |
37 procedure DrawCaptions; |
38 var |
38 var |
39 grp: TCapGroup; |
39 grp: TCapGroup; |
40 offset: LongInt; |
40 offset: LongInt; |
41 begin |
41 begin |
42 {$IFDEF IPHONEOS} |
42 {$IFDEF IPHONEOS} |
43 offset:= 40; |
43 offset:= 40; |
44 {$ELSE} |
44 {$ELSE} |
45 if ((TrainingFlags and tfTimeTrial) <> 0) and (TimeTrialStartTime > 0) then |
45 offset:= 8; |
46 offset:= 48 |
46 {$ENDIF} |
47 else |
|
48 offset:= 8; |
|
49 {$ENDIF} |
|
50 |
47 |
51 for grp:= Low(TCapGroup) to High(TCapGroup) do |
48 for grp:= Low(TCapGroup) to High(TCapGroup) do |
52 with Captions[grp] do |
49 with Captions[grp] do |
53 if Tex <> nil then |
50 if Tex <> nil then |
54 begin |
51 begin |