Changeset 50 for branches/ByteArray/Devices/Device.pas

Timestamp:

Nov 2, 2023, 11:18:06 PM (7 months ago)

Author:

chronos

Message:

• Added: Storage form.
• Added: Dissasembler form.
• Added: Debug and release build modes.
• Added: Support for interface translation.

File:

• branches/ByteArray/Devices/Device.pas (modified) (1 diff)

branches/ByteArray/Devices/Device.pas

@@ -33 +33 @@
   end;
 
+resourcestring
+  SNone = 'None';
+  SKeyboard = 'Keyboard';
+  SMouse = 'Mouse';
+  SStorage = 'Storage';
+  SScreen = 'Screen';
+  SConsole = 'Console';
+  STimer = 'Timer';
+
 const
-  DeviceClassText: array[TDeviceClass] of string = ('None', 'Keyboard', 'Mouse', 'Storage', 'Screen', 'Console', 'Timer');
+  DeviceClassText: array[TDeviceClass] of string = (SNone, SKeyboard, SMouse,
+    SStorage, SScreen, SConsole, STimer);