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]

[DeddyH]

Hallo und Willkommen in der DP ,

füge einmal auch in der Unit2 math zur uses-Klausel hinzu. BTW: Schließe Code bitte künftig in Delphi-Tags ein, dann ist er besser zu lesen.

[Astat]

Hallo furgi, uses Math hinzufügen.

Delphi-Quellcode:

unit Unit2;

interface

uses
  Math;

...

//-- EDIT

Zu spät..

lg. Astat

[furgi]

vielen Dank,funktioniert jetzt.
hatte wohl die Übersicht verloren.