Changeset 68 for trunk/Demos

Timestamp:

Jul 30, 2012, 3:52:56 PM (12 years ago)

Author:

chronos

Message:

• Added: Addon modules support.
• Modified: Restored usage of URegistry unit.

File:

• trunk/Demos/Simple/System.pas (modified) (1 diff)

trunk/Demos/Simple/System.pas

@@ -9 +9 @@
 function ReadLn: string; internal;
 procedure WriteLn(Text: string); internal;
+procedure SetPort(Index: Integer; Value: Byte);
+function GetPort(Index: Integer): Byte;
+property Port[Index: Integer]: Byte read GetPort write SetPort;
 
 implementation