equal
deleted
inserted
replaced
1326 |
1326 |
1327 // render highlighted caption (if there is a ':') |
1327 // render highlighted caption (if there is a ':') |
1328 tmpline2:= _S''; |
1328 tmpline2:= _S''; |
1329 SplitByChar(tmpline, tmpline2, ':'); |
1329 SplitByChar(tmpline, tmpline2, ':'); |
1330 if length(tmpline2) > 0 then |
1330 if length(tmpline2) > 0 then |
1331 WriteInRect(tmpsurf, cFontBorder + 2, r2.y + r2.h, $ffc7c7c7, font, PChar(tmpline + ':')); |
1331 begin |
|
1332 tmpline:= tmpline + ':'; |
|
1333 WriteInRect(tmpsurf, cFontBorder + 2, r2.y + r2.h, $ffc7c7c7, font, PChar(tmpline)); |
|
1334 end; |
1332 end |
1335 end |
1333 end; |
1336 end; |
1334 |
1337 |
1335 if length(extra) > 0 then |
1338 if length(extra) > 0 then |
1336 r:= WriteInRect(tmpsurf, cFontBorder + 2, r.y + r.h, extracolor, font, PChar(extra)); |
1339 r:= WriteInRect(tmpsurf, cFontBorder + 2, r.y + r.h, extracolor, font, PChar(extra)); |