Changeset 573 for GraphicTest/Methods/MethodBitmapRawImageDataPaintBox.pas

Timestamp:

Jun 25, 2024, 10:49:43 AM (4 months ago)

Author:

chronos

Message:

• Modified: Build with Lazarus 3.4.
• Modified: Removed U prefix from unit names.

File:

• GraphicTest/Methods/MethodBitmapRawImageDataPaintBox.pas (moved) (moved from GraphicTest/Methods/UMethodBitmapRawImageDataPaintBox.pas ) (3 diffs)

GraphicTest/Methods/MethodBitmapRawImageDataPaintBox.pas

@@ -1 @@
-unit UMethodBitmapRawImageDataPaintBox;
-
-{$mode delphi}
+unit MethodBitmapRawImageDataPaintBox;
 
 interface
 
 uses
-  {$IFDEF windows}Windows,{$ENDIF}Classes, SysUtils, Controls, UDrawMethod, UFastBitmap, Graphics, LCLType,
-  FPimage, IntfGraphics, GraphType;
+  {$IFDEF windows}Windows,{$ENDIF}Classes, SysUtils, Controls, DrawMethod,
+  FastBitmap, Graphics, LCLType, FPimage, IntfGraphics, GraphType;
 
 type
@@ -47 +45 @@
 begin
   FreeAndNil(TempBitmap);
-  inherited Done;
+  inherited;
 end;
 
@@ -94 +92 @@
 end;
 
-
 end.