unit frmUnit4;

interface

uses
 Winapi.Windows, System.Classes, Vcl.Forms, Vcl.Controls, Vcl.StdCtrls,
 ddPlugin_TLB;

type
  TformDodavky = class(TForm)
    btnOK: TButton;
    procedure btnOKClick(Sender: TObject);
  private
  public
   Helios: IHelios;
   idOrg: integer;
  end;

var
  formDodavky: TformDodavky;

implementation
uses ComObjekt, helUtils;

{$R *.dfm}

 procedure TformDodavky.btnOKClick(Sender: TObject);
  begin
   Close;
  end;

 end.