Add Delphi port

Delphi/Item.pas

@@ -0,0 +1,39 @@
+unit Item;
+
+interface
+
+type
+  TItem = class(TObject)
+  private
+    FName: string;
+    FSellIn: Integer;
+    FQuality: Integer;
+  public
+    constructor Create(const AName: string; const ASellIn, AQuality: Integer);
+    function ToString: string; override;
+    property Name: string read FName write FName;
+    property SellIn: Integer read FSellIn write FSellIn;
+    property Quality: Integer read FQuality write FQuality;
+  end;
+
+implementation
+
+uses
+  System.SysUtils;
+
+{ TItem }
+
+constructor TItem.Create(const AName: string; const ASellIn, AQuality: Integer);
+begin
+  inherited Create;
+  FName := AName;
+  FSellIn := ASellIn;
+  FQuality := AQuality;
+end;
+
+function TItem.ToString: string;
+begin
+  Result := Format('%s, %d, %d', [Name, SellIn, Quality]);
+end;
+
+end.