Changeset 573 for GraphicTest/Packages/bgrabitmap/bgrautf8.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/Packages/bgrabitmap/bgrautf8.pas (modified) (2 diffs)

GraphicTest/Packages/bgrabitmap/bgrautf8.pas

@@ -7 +7 @@
 
 uses
-  Classes, SysUtils, BGRAUnicode{$IFDEF BGRABITMAP_USE_LCL}, lazutf8classes{$ENDIF};
+  Classes, SysUtils, BGRAUnicode{$IFDEF BGRABITMAP_USE_LCL}, lazclasses{$ENDIF};
 
 {$IFDEF BGRABITMAP_USE_LCL}
 type
-  TFileStreamUTF8 = lazutf8classes.TFileStreamUTF8;
-  TStringListUTF8 = lazutf8classes.TStringListUTF8;
+  TFileStreamUTF8 = TFileStream;
+  TStringListUTF8 = TStringList;
 {$ELSE}
 type
@@ -105 +105 @@
 procedure LoadStringsFromFileUTF8(List: TStrings; const FileName: string);
 begin
-  lazutf8classes.LoadStringsFromFileUTF8(List,FileName);
+  LoadStringsFromFileUTF8(List,FileName);
 end;
 
 procedure SaveStringsToFileUTF8(List: TStrings; const FileName: string);
 begin
-  lazutf8classes.SaveStringsToFileUTF8(List,FileName);
+  SaveStringsToFileUTF8(List,FileName);
 end;