Einzelnen Beitrag anzeigen

Spezi

Registriert seit: 14. Feb 2009
Ort: Deutschland ;-)
65 Beiträge
 
Delphi 2005 Personal
 
#1

Ungenügende Forward- oder External-Deklaration

  Alt 2. Mär 2009, 16:03
hi,

ich hab versucht diese Klasse zu programmieren aber es tritt ein Fehler auf den ich weder verstehe noch weiß wie ich ihn beheben kann...

hier der Quelltext:

Delphi-Quellcode:
unit ebene;

interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,Math;


type
    TSpiegel = class
    private
           Fm : Double;
           Fn : Double;
    public
           function spiegeln ( mStrahl,mSpiegel : Double):Double;
    end;

implementation

function spiegeln ( mStrahl,mSpiegel : Double) : Double;
var
   m1,m2,m3,a : Double;
begin
     m1:=mSpiegel;
     m2:=mStrahl;
     a:=arcTan(abs((m1-m2)/(1+m1*m2)));
     m3:=(m1-Tan(a))/(m1*Tan(a)+1);
     spiegeln:=m3;
end;
end.
bei ausführen kommt die Fehlermeldung
--> [Fehler] ebene.pas(14): Ungenügende Forward- oder External-Deklaration: 'TSpiegel.spiegeln'

im Hauptprogramm ruf ich die Klasse noch garnicht auf...

wenn mir jemand helfen kann wäre das cool.

danke im Vorraus

MFG Spezi

PS: Bitte nicht über die Sinnhaftigkeit des Quelltexts nach denken
Wer Rechtschreibfehler findet darf Sie behalten
  Mit Zitat antworten Zitat