Changeset 51 for branches/DelphiToC/Example.pas

Timestamp:

Aug 9, 2010, 3:50:42 PM (14 years ago)

Author:

george

Message:

Renamed some files.
Added support for custom record types.

File:

• branches/DelphiToC/Example.pas (modified) (2 diffs)

branches/DelphiToC/Example.pas

@@ -2 +2 @@
 
 uses System, Crt;
+
+type
+  TPoint = record
+    X: Integer;
+    Y: Integer;
+  end;
 
 function Max(A, B: Byte): Byte;
@@ -18 +24 @@
   sS: Byte;
   D: Byte;
+  
 begin
   WriteLn(A);