unit DAddShotcutForder; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; type TDlgAddShotcutFolder = class(TForm) Label1: TLabel; Label2: TLabel; edPath: TEdit; edDescription: TEdit; btnOk: TButton; btnCancel: TButton; btnSelPath: TButton; private { Private declarations } public { Public declarations } Constructor Create(aOwner: TComponent); override; Destructor Destroy; override; end; var DlgAddShotcutFolder: TDlgAddShotcutFolder; implementation {$R *.dfm} Constructor TDlgAddShotcutFolder.Create(aOwner: TComponent); begin Inherited Create(aOwner); end; Destructor TDlgAddShotcutFolder.Destroy; begin Inherited; end; end.