Bezeichner

[furgi]

Hallo,
ich habe ein Problem mit einem Bezeichner in der uinit 2
Fehlermeldung: fehlender Bezeichner stddev und sum,
es geht allerdings probeweise in der unit1 ohne unit2






Code:

Delphi-Quellcode:

unit Unit1;

interface

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

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

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses unit2;

  procedure TForm1.Button1Click(Sender: TObject);
 var arrb :array[0..3] of double;
  stb, summe:double;
  Durchschnitt:double;

begin
        arrb[0]:=3;
        arrb[1]:=2;
        arrb[2]:=5;
        arrb[3]:=1;
    summe:=sum(arrb);
    Durchschnitt:=mean(arrb);
   stb:=stddev(arrb);
   berechnen(stb);
    end;


end.




unit Unit2;

interface
 procedure berechnen(summe,stb:double);



implementation
procedure berechnen;
begin

 stb:=stddev(arrb);
  summe:=sum(arrb);
end;

end.

[edit=Sharky]Delphi-Tags eingefügt. Mfg, Sharky[/edit]