Einzelnen Beitrag anzeigen

roboter202

Registriert seit: 6. Mär 2011
98 Beiträge
 
Delphi 6 Professional
 
#1

Function Variable mit bestimmten Wert

  Alt 6. Mär 2011, 19:33
Hallo,

ich möchte gerne eine Function/Procdure erstellen der eine Variable übergeben wird, diese Variable nur bestimmte vorher festgelegte Werte haben darf.

Bsp :
Delphi-Quellcode:
function calc (val1,val2 :real ; sys :string) : real ; //sys darf nur addieren, subtrahieren ... sein
begin

If sys = 'addierenthen ...

end;

procedure Button1.click (Sender : TObject) ;
begin
calc (17.6,18,addieren) ;
end;
Ist das überhaupt möglich ?
Wenn ja wie !

Gruß
Christian
Christian
i := 0 ; While i = 0 do beep ;
  Mit Zitat antworten Zitat