[nsd]

Hola gente, es mi primera vez en este foro y nose bien donde ira este tema, si este no es el lugar espero que algun admin me disculpe.

el tema es asi, tengo un programa en delphi con 2 unit, la primera tiene un boton y la otra una clase, pongo los dos codigos:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,Unit2;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  API : ClassAPI;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
    API.Setear();
end;

end.

Código Delphi [-]
unit Unit2;

interface
  type
    ClassAPI = Class
      public
        Variable : Integer;
        procedure Setear();
    End;

implementation

  Procedure ClassAPI.Setear();
  begin
      Variable := 6;
  end;

end.

cuando apreto el boton me salta error de violacion de acceso a la clase, que esta pasando? agradezco cualquie ayuda