AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Eigenen Record/Type erstellen

Ein Thema von Aike · begonnen am 26. Jan 2006 · letzter Beitrag vom 26. Jan 2006
 
Aike

Registriert seit: 2. Okt 2004
319 Beiträge
 
#1

Eigenen Record/Type erstellen

  Alt 26. Jan 2006, 13:35
Hallöchen,

ich hab schon lange nichts mehr hier posten müssen, aber jetzt habe ich mich an etwas neues gewagt: Die Records.
Und zwar möchte ich in einer Funktion einen Aufruf, der so aussieht:

Delphi-Quellcode:
type
  TMeinMathe; record
    Rechenvorschrift: (Plus,Minus);
  end;

function AddierenSubtrahieren(Zahl1,Zahl2:integer;Rechenvorschrift:TMeinMathe):integer;
begin
  if Rechenvorschrift=Plus then
    result:=Zahl1+Zahl2;
  if Rechenvorschrift=Minus then
    result:=Zahl1-Zahl2;
end;

procedure TForm1.Button1OnClick(Sender: TObject);
begin
  showmessage(IntToStr(AddierenSubtrahieren(2,1,Plus)));
end;
So wie es in der showmessage steht, soll es aussiehen.
Das darüber ist die Art, wie ich es mir vorstelle, dass es aussehen muss, damit es klappt (tut es aber nicht).
Ich könnte es sicher auch mit Konstanten oder Variablen lösen, aber ich möchte das gerne mit einem Record (oder einem Type?) lösen, falls möglich.

Wie immer vielen Dank im voraus!

Grüße,
Aike
Achim
  Mit Zitat antworten Zitat
 


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 18:13 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