hedgewars/uRender.pas
changeset 11829 3f1f8f79fcdb
parent 11828 0fba6cb098a1
child 11833 a69124eb7ce7
child 12124 3374e0f67f39
equal deleted inserted replaced
11828:0fba6cb098a1 11829:3f1f8f79fcdb
   461     repeat
   461     repeat
   462         begin
   462         begin
   463         // print up to 3 extentions per row
   463         // print up to 3 extentions per row
   464         // ExtractWord will return empty string if index out of range
   464         // ExtractWord will return empty string if index out of range
   465         //AddFileLog(TrimRight(
   465         //AddFileLog(TrimRight(
   466         AddFileLog((
   466         AddFileLog(Trim(
   467             ExtractWord(tmpint, tmpstr, [' ']) + ' ' +
   467             ExtractWord(tmpint, tmpstr, [' ']) + ' ' +
   468             ExtractWord(tmpint+1, tmpstr, [' ']) + ' ' +
   468             ExtractWord(tmpint+1, tmpstr, [' ']) + ' ' +
   469             ExtractWord(tmpint+2, tmpstr, [' '])
   469             ExtractWord(tmpint+2, tmpstr, [' '])
   470         ));
   470         ));
   471         tmpint := tmpint + 3;
   471         tmpint := tmpint + 3;