AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign Delphi Verschiedene Aufzählungstypen in einer Funktion verwenden.
Thema durchsuchen
Ansicht
Themen-Optionen

Verschiedene Aufzählungstypen in einer Funktion verwenden.

Ein Thema von bernau · begonnen am 26. Mär 2012 · letzter Beitrag vom 27. Mär 2012
 
Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.312 Beiträge
 
Delphi 12 Athens
 
#7

AW: Verschiedene Aufzählungstypen in einer Funktion verwenden.

  Alt 27. Mär 2012, 00:59
Meinst du sowas?
Delphi-Quellcode:

procedure EineBerechnungFuerfData(aType1,aType2:TAtype1); overload;
procedure EineBerechnungFuerfData(aType1,aType2:TAtype2); overload;
Ne auch das meinte ich nicht. Mir geht es darum die Procedure nur einmal zu haben. Bei deiner Version ist die Procedure zwei mal vorhanden. Und dies mit fast identischem Code. So habe ich es ja jetzt, nur das diese Procedure etwas komplexer (>50Zeilen) ist. Die zweite Procedure wurde quasi kopiert und mit einem Copy/Paste wurde Type1 gegen Type2 ausgetauscht. Nun habe ich das ziemlich vereinfacht im ersten Post beschrieben. Tatsächlich gibt es aber nicht nur Type1 und Type2 sonder auch Type3 Type4 und Type5. Damit hätte ich den gleichen Code fünf mal. Und das ist bestimmt kein guter Programmierstil
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  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 12:01 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz