AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Record als Result einer Funktion
Thema durchsuchen
Ansicht
Themen-Optionen

Record als Result einer Funktion

Offene Frage von "Uwe Raabe"
Ein Thema von NoGAD · begonnen am 27. Mär 2020 · letzter Beitrag vom 30. Mär 2020
Antwort Antwort
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.643 Beiträge
 
Delphi 12 Athens
 
#1

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 10:23
Kannst Du das als Text kopieren? Ich habe keinen Zugriff auf die Seiten.
Sorry, dann ist das wohl geschütztes Material. In dem Fall (und überhaupt) empfehle ich den Erwerb des Buches.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Weimar
345 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 10:40
Wäre es denn sinnvoll, aus OOP - Sicht, meine Unit: Unit_ABS_DBFunctions.pas neu zu schreiben?


Jedoch fehlt mir das Wissen, um hier z.B. eine eigene Klasse zu erstellen.
Mathias
  Mit Zitat antworten Zitat
Frickler

Registriert seit: 6. Mär 2007
Ort: Osnabrück
625 Beiträge
 
Delphi XE6 Enterprise
 
#3

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 13:09
Kannst Du das als Text kopieren? Ich habe keinen Zugriff auf die Seiten.
Sorry, dann ist das wohl geschütztes Material. In dem Fall (und überhaupt) empfehle ich den Erwerb des Buches.
Nö, ich komm drauf.

Da wird vorgeschlagen, statt einer Funktion "Bla(startDatum, endDatum)" eine Funktion "Bla(DatumsBereich)" zu erstellen, mit "DatumsBereich" als Parameterobjekt. In Delphi macht man zweckmäßigerweise einen erweiterten Record, dem man zusätzlich zu den reinen Daten auch noch Methoden zur Initialisierung mitgeben kann:
Delphi-Quellcode:
type TDatumsBereich = record
                        Von, Bis: TDateTime;
                        procedure Heute;
                      end;

procedure TDatumsBereich.Heute;
begin
  Von := Date; Bis := Date;
end;
  Mit Zitat antworten Zitat
Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Weimar
345 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 13:15
Zur Info:

Ich habe ein weiteres Thema eröffnet https://www.delphipraxis.net/203833-...rogrammes.html.
Mathias
  Mit Zitat antworten Zitat
Benutzerbild von dummzeuch
dummzeuch

Registriert seit: 11. Aug 2012
Ort: Essen
1.686 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#5

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 15:16
Kannst Du das als Text kopieren? Ich habe keinen Zugriff auf die Seiten.
Sorry, dann ist das wohl geschütztes Material. In dem Fall (und überhaupt) empfehle ich den Erwerb des Buches.
Wenn es geschützes Material ist, wundert es mich, dass ich Zugriff habe:

Da steht ein Beispiel, man soll das ...

function amountInvoiced(startDate, endDate) {...}
function amountReceived(startDate, endDate) {...}
function amountOverdue(startDate, endDate) {...}

... ändern in ...

function amountInvoiced(aDateRange) {...}
function amountReceived(aDateRange) {...}
function amountOverdue(aDateRange) {...}

Also aus zwei Parametern einen machen, der diese beiden Werte sinnvoll kombiniert.

Natürlich ist das bei nur zwei Parametern nur bedingt sinnvoll (kann es aber sein), aber das Prinzip ist dasselbe wie bei 50 Parametern.
Thomas Mueller
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.643 Beiträge
 
Delphi 12 Athens
 
#6

AW: Record als Result einer Funktion

  Alt 30. Mär 2020, 15:21
Wenn es geschützes Material ist, wundert es mich, dass ich Zugriff habe:
Ja, hat mich auch gewundert, daß das angeblich nicht geht. Der Link sollte schon auf eine lesbare Seite führen, aber die weiterführenden Links gehen dann auf die Web-Ausgabe von Fowler's Refactoring Buch - und das ist nicht frei zugänglich. Da ich das aber erworben habe, sehe ich selbst da eben keine Beschränkung.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  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:11 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