[~TB~]

Сообщение от Pyro

можно взять две картинки - полностью горящий и полностью выключенный, и на выключенную накладывать только нужный сектор горящей, в идеале с полупрозрачностю на краях такого сектора

На мой взгляд самый верный вариант будет

[Gudzik11]

NumLock зачем ты так? обидна ведь.
Подскажи лучше где эту GDI+ для delphi xe взять ?
А то качаю пытаюсь запустить DEMO а он мне ошибку выдаёт.

[Gudzik11]

Код:

Project "G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\GDITEST0.dproj" (Make target(s)):
  Target _PasCoreCompile:
      g:\program files\embarcadero\rad studio\8.0\bin\dcc32.exe -$O- -$W+ --no-config -M -Q -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE -DDEBUG -I"g:\program files\embarcadero\rad studio\8.0\lib\Win32\release";"C:\Users\Gudzik\Documents\RAD Studio\8.0\Imports";"g:\program files\embarcadero\rad studio\8.0\Imports";"C:\Users\Public\Documents\RAD Studio\8.0\Dcp";"g:\program files\embarcadero\rad studio\8.0\include";"G:\Program Files\CS4\Lib\RS-XE";"g:\program files\embarcadero\rad studio\8.0\RaveReports\Lib";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\HotKeyManager";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\TMS Component Pack 6.0.2.0 Full Source";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\pas" -LE"C:\Users\Public\Documents\RAD Studio\8.0\Bpl" -LN"C:\Users\Public\Documents\RAD Studio\8.0\Dcp" -O"g:\program files\embarcadero\rad studio\8.0\lib\Win32\release";"C:\Users\Gudzik\Documents\RAD Studio\8.0\Imports";"g:\program files\embarcadero\rad studio\8.0\Imports";"C:\Users\Public\Documents\RAD Studio\8.0\Dcp";"g:\program files\embarcadero\rad studio\8.0\include";"G:\Program Files\CS4\Lib\RS-XE";"g:\program files\embarcadero\rad studio\8.0\RaveReports\Lib";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\HotKeyManager";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\TMS Component Pack 6.0.2.0 Full Source";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\pas" -R"g:\program files\embarcadero\rad studio\8.0\lib\Win32\release";"C:\Users\Gudzik\Documents\RAD Studio\8.0\Imports";"g:\program files\embarcadero\rad studio\8.0\Imports";"C:\Users\Public\Documents\RAD Studio\8.0\Dcp";"g:\program files\embarcadero\rad studio\8.0\include";"G:\Program Files\CS4\Lib\RS-XE";"g:\program files\embarcadero\rad studio\8.0\RaveReports\Lib";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\HotKeyManager";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\TMS Component Pack 6.0.2.0 Full Source";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\pas" -U"g:\program files\embarcadero\rad studio\8.0\lib\Win32\release";"C:\Users\Gudzik\Documents\RAD Studio\8.0\Imports";"g:\program files\embarcadero\rad studio\8.0\Imports";"C:\Users\Public\Documents\RAD Studio\8.0\Dcp";"g:\program files\embarcadero\rad studio\8.0\include";"G:\Program Files\CS4\Lib\RS-XE";"g:\program files\embarcadero\rad studio\8.0\RaveReports\Lib";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\HotKeyManager";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\TMS Component Pack 6.0.2.0 Full Source";"G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\pas" -K00400000 -NB"C:\Users\Public\Documents\RAD Studio\8.0\Dcp" -NH"C:\Users\Public\Documents\RAD Studio\8.0\hpp"   GDITEST0.dpr   
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(358,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(365,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(375,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(382,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(394,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(834,41): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(836,40): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
      G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\GDIPAPI.pas(38,2): error F2063: F2063 Could not compile used unit 'DirectDraw.pas'
  Done building target "_PasCoreCompile" in project "GDITEST0.dproj" -- FAILED.
  Done building project "GDITEST0.dproj" -- FAILED.
  Build FAILED.
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(358,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(365,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(375,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(382,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(394,55): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(834,41): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\DirectDraw.pas(836,40): error E2154: E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
  G:\Program Files\Embarcadero\RAD Studio\8.0\Component\gdiplus\demos\Alpha Blending Lines and Fills\Drawing Opaque and Semitransparent Lines\GDIPAPI.pas(38,2): error F2063: F2063 Could not compile used unit 'DirectDraw.pas'
      0 Warning(s)
      8 Error(s)
  Time Elapsed 00:00:00.20