hedgewars/uCaptions.pas
changeset 6415 af2047bb4f70
parent 6394 f0a9042e7387
parent 5727 6e4aceba8cde
child 6580 6155187bf599
equal deleted inserted replaced
6414:8474b7fa84d6 6415:af2047bb4f70
    77 procedure DrawCaptions;
    77 procedure DrawCaptions;
    78 var
    78 var
    79     grp: TCapGroup;
    79     grp: TCapGroup;
    80     offset: LongInt;
    80     offset: LongInt;
    81 begin
    81 begin
    82 {$IFDEF IPHONEOS}
    82 {$IFDEF MOBILE}
    83     offset:= 48;
    83     offset:= 48;
    84 {$ELSE}
    84 {$ELSE}
    85     offset:= 8;
    85     offset:= 8;
    86 {$ENDIF}
    86 {$ENDIF}
    87 
    87