AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Function Variable mit bestimmten Wert
Thema durchsuchen
Ansicht
Themen-Optionen

Function Variable mit bestimmten Wert

Ein Thema von roboter202 · begonnen am 6. Mär 2011 · letzter Beitrag vom 6. Mär 2011
Antwort Antwort
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
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Function Variable mit bestimmten Wert

  Alt 6. Mär 2011, 19:36
Dann definier dir am Besten einen Aufzählungstyp
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#3

AW: Function Variable mit bestimmten Wert

  Alt 6. Mär 2011, 22:20
oder du wirfst eine Exception, wenn der Wert nicht richtig ist.

Bernhard
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:44 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz