Ignore:
Timestamp:
Feb 24, 2024, 8:04:26 PM (9 months ago)
Author:
chronos
Message:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LocalPlayer/UnitStat.pas

    r510 r530  
    101101  if MainTexture.Age <> AgePrepared then begin
    102102    AgePrepared := MainTexture.Age;
    103     BitBltCanvas(Back.Canvas, 0, 0, wCommon, hOwnModel,
    104       MainTexture.Image.Canvas, (MainTexture.Width - wCommon) div 2,
     103    BitBltBitmap(Back, 0, 0, wCommon, hOwnModel,
     104      MainTexture.Image, (MainTexture.Width - wCommon) div 2,
    105105      (MainTexture.Height - hOwnModel) div 2);
    106     BitBltCanvas(Back.Canvas, wCommon, 0, wCommon, hEnemyModel,
    107       MainTexture.Image.Canvas, (MainTexture.Width - wCommon) div 2,
     106    BitBltBitmap(Back, wCommon, 0, wCommon, hEnemyModel,
     107      MainTexture.Image, (MainTexture.Width - wCommon) div 2,
    108108      (MainTexture.Height - hEnemyModel) div 2);
    109     BitBltCanvas(Back.Canvas, 2 * wCommon, 0, wCommon, hEnemyUnit,
    110       MainTexture.Image.Canvas, (MainTexture.Width - wCommon) div 2,
     109    BitBltBitmap(Back, 2 * wCommon, 0, wCommon, hEnemyUnit,
     110      MainTexture.Image, (MainTexture.Width - wCommon) div 2,
    111111      (MainTexture.Height - hEnemyUnit) div 2);
    112     BitBltCanvas(Back.Canvas, 3 * wCommon, 0, wCommon, hEnemyCityDefense,
    113       MainTexture.Image.Canvas, (MainTexture.Width - wCommon) div 2,
     112    BitBltBitmap(Back, 3 * wCommon, 0, wCommon, hEnemyCityDefense,
     113      MainTexture.Image, (MainTexture.Width - wCommon) div 2,
    114114      (MainTexture.Height - hEnemyCityDefense) div 2);
    115     BitBltCanvas(Back.Canvas, 4 * wCommon, 0, wCommon, hEnemyCity,
    116       MainTexture.Image.Canvas, (MainTexture.Width - wCommon) div 2,
     115    BitBltBitmap(Back, 4 * wCommon, 0, wCommon, hEnemyCity,
     116      MainTexture.Image, (MainTexture.Width - wCommon) div 2,
    117117      (MainTexture.Height - hEnemyCity) div 2);
    118118    ImageOp_B(Back, Template, 0, 0, 0, 0, 5 * wCommon, hMax);
     
    378378  case Kind of
    379379    dkOwnModel: begin
    380       BitBltCanvas(Offscreen.Canvas, 0, 0, wCommon, hOwnModel,
    381         Back.Canvas, 0, 0);
     380      BitBltBitmap(Offscreen, 0, 0, wCommon, hOwnModel, Back, 0, 0);
    382381      yView := 13;
    383382      yTotal := 92;
    384383    end;
    385384    dkEnemyModel: begin
    386       BitBltCanvas(Offscreen.Canvas, 0, 0, wCommon, hEnemyModel,
    387         Back.Canvas, wCommon, 0);
     385      BitBltBitmap(Offscreen, 0, 0, wCommon, hEnemyModel, Back, wCommon, 0);
    388386      yView := 13;
    389387      yTotal := 92;
    390388    end;
    391389    dkEnemyUnit, dkOwnUnit: begin
    392       BitBltCanvas(Offscreen.Canvas, 0, 0, wCommon, hEnemyUnit,
    393         Back.Canvas, 2 * wCommon, 0);
     390      BitBltBitmap(Offscreen, 0, 0, wCommon, hEnemyUnit, Back, 2 * wCommon, 0);
    394391      yView := 13;
    395392      yTotal := 123;
    396393    end;
    397394    dkEnemyCityDefense: begin
    398       BitBltCanvas(Offscreen.Canvas, 0, 0, wCommon, hEnemyCityDefense,
    399         Back.Canvas, 3 * wCommon, 0);
     395      BitBltBitmap(Offscreen, 0, 0, wCommon, hEnemyCityDefense, Back, 3 * wCommon, 0);
    400396      yView := 171;
    401397      yTotal := 231;
    402398    end;
    403399    dkEnemyCity: begin
    404       BitBltCanvas(Offscreen.Canvas, 0, 0, wCommon, hEnemyCity,
    405         Back.Canvas, 4 * wCommon, 0);
     400      BitBltBitmap(Offscreen, 0, 0, wCommon, hEnemyCity, Back, 4 * wCommon, 0);
    406401      yView := 171;
    407402      yTotal := 231;
     
    430425          yImp + ySizeSmall, MainTexture.ColorBevelLight,
    431426          MainTexture.ColorBevelShade);
    432         BitBltCanvas(Offscreen.Canvas, X, yImp, xSizeSmall, ySizeSmall,
    433           SmallImp.Canvas, J mod 7 * xSizeSmall,
     427        BitBltBitmap(Offscreen, X, yImp, xSizeSmall, ySizeSmall,
     428          SmallImp, J mod 7 * xSizeSmall,
    434429          (J + SystemIconLines * 7) div 7 * ySizeSmall);
    435430        Inc(X, xSizeSmall + 4);
     
    549544                    * (yyt * 3 + 1));
    550545              end;
    551           BitBltCanvas(Offscreen.Canvas, xView, yView + 16, 64, 32,
    552             Buffer.Canvas, 1, 0);
     546          BitBltBitmap(Offscreen, xView, yView + 16, 64, 32, Buffer, 1, 0);
    553547
    554548          // show unit, experience and health
Note: See TracChangeset for help on using the changeset viewer.