перенести type из одного модуля в другой

[fize]

unit Unit2;
interface
Uses Windows;


  type
    TDevice = object
    DD,DS,DN:String;
    DH : Dword;
    ISB: Boolean;

  end;
implementation
end.

с этого модуля нужно перенести type в этот-

unit Unit1;

interface

uses
   Windows,    SysUtils,  Forms,
  StdCtrls,  Controls,  Buttons,   Classes,   ComCtrls,   ExtCtrls, Dialogs,
  Unit2;

  type
 Int = Array of byte;

  type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    Button1: TButton;

куда только не вставлял везде ошибки

[goblinyara]

какие именно ошибки?

[Neeter]

Попробуйте изменить код так:

unit Unit1;

interface

uses
   Windows,    SysUtils,  Forms,
  StdCtrls,  Controls,  Buttons,   Classes,   ComCtrls,   ExtCtrls, Dialogs,
  Unit2;

type
  Int = Array of byte;

  TDevice = object
   DD,DS,DN:String;
   DH : Dword;
   ISB: Boolean;
  end;

  TForm1 = class(TForm)
   ListBox1: TListBox;
   Button1: TButton;
  ...

[fize]

извеняюсь. уже разобрался. end забыл