unit UHeaders;

interface

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

   function  Rysuj(parCanvas : TCanvas) : Integer;         stdcall; external 'Pierwsza.dll' name 'Rysuj';
   function  GetLibVersion() : PChar;                      stdcall; external 'Pierwsza.dll' name 'GetLibVersion';
   procedure GetNI(var nazwisko: PChar; var imie : PChar); stdcall; external 'Pierwsza.dll' name 'GetNI';
   function  Kwadrat(cyfra : Integer) : LongInt;           stdcall; external 'Pierwsza.dll' name 'Kwadrat';

implementation

end.



