unit10.pas

ziptv为delphi控件

Unit Unit10;

Interface

Uses
   Windows,
   Messages,
   SysUtils,
   Classes,
   Graphics,
   Controls,
   Forms,
   Dialogs,
   StdCtrls;

Type
   TfrmInput = Class(TForm)
      Label1: TLabel;
      Edit1: TEdit;
      Button1: TButton;
      Button2: TButton;
   Private
      { Private declarations }
   Public
      { Public declarations }
   End;

Var
   frmInput: TfrmInput;

Implementation

{$R *.DFM}

End.