Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen? (https://www.delphipraxis.net/191032-enum-string-mehrere-overloaded-funktionen-zu-einer-einzigen-zusammenfassen.html)

Zacherl 1. Dez 2016 16:36

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Zitat:

Zitat von uligerhardt (Beitrag 1355150)
Dumme Frage: Warum nimmst du nicht einfach Assert?
Delphi-Quellcode:
  Assert(TypInfo^.Kind = tkEnumeration, 'Invalid generic type.');

Guter Einwand :thumb: Keine Ahnung, warum ich das so umständlich gemacht hatte.

a.def 1. Dez 2016 16:56

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Kann man diese Funktion auch in mein aktuell bestehendes Konzept einbauen?

Delphi-Quellcode:
unit enum_functions;

uses ;

type
 TEnumFunctions = class
 private
  //
 public
  // meine Funktionen
 end;

implementation

// meine Funktionen

end;
Delphi-Quellcode:
var _enumFunctions: TEnumFunctions;

// Aufruf meiner Funktionen mit
_enumFunctions.Funktionsname();

Zacherl 1. Dez 2016 18:21

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Zitat:

Zitat von a.def (Beitrag 1355186)
Kann man diese Funktion auch in mein aktuell bestehendes Konzept einbauen?

Natürlich kannst du dir die Funktion auch in deine bestehende Klasse einbauen. Wenn du dir allerdings Sorgen machst, dass du bei der Helper Klasse von mir zusätzliche Instanzen pflegen musst, dann kann ich dich beruhigen, da du die Funktion ganz einfach in der Form
Delphi-Quellcode:
S := TEnumHelper<TMyEnum>.GetName(EnumValue)
aufrufen kannst.

In deiner bestehender Klasse müsstest du dann die Funktion selbst mit Generics ausrüsten, anstelle der ganzen Klasse (sofern die anderen Helper nicht auch typisiert werden sollen).

Generell würde ich dir allerdings raten deine
Delphi-Quellcode:
TEnumFunctions
mit
Delphi-Quellcode:
class function Bla: X; static
bzw.
Delphi-Quellcode:
class procedure Bla; static
auszurüsten statt der normalen Methoden. Dann benötigst du auch dafür keine Instanz mehr, was die Aufrufe zum einen weniger umständlich macht und dir später im Kompilat sogar ein klein wenig (nagut nur sehr sehr wenig - aber immerhin :stupid:) Performance-Overhead einspart.
Letzter Tipp natürlich unter dem Vorbehalt, dass du wirklich keine Instanz (also z.b. Zugriff auf Klassen-Felder, persistenter State, etc.) benötigst.

a.def 1. Dez 2016 19:09

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Zitat:

Zitat von Zacherl (Beitrag 1355188)
Generell würde ich dir allerdings raten deine
Delphi-Quellcode:
TEnumFunctions
mit
Delphi-Quellcode:
class function Bla: X; static
bzw.
Delphi-Quellcode:
class procedure Bla; static
auszurüsten statt der normalen Methoden. Dann benötigst du auch dafür keine Instanz mehr, was die Aufrufe zum einen weniger umständlich macht und dir später im Kompilat sogar ein klein wenig (nagut nur sehr sehr wenig - aber immerhin :stupid:) Performance-Overhead einspart.

Daran hatte ich schon lange gedacht. Denn mit meiner aktuellen Klasse+Instanz kann ich nur Funktionen und Prozeduren einbauen, aber keine private und public Variablen.
Nur ich weiß leider nicht wie das geht :(

Zitat:

Letzter Tipp natürlich unter dem Vorbehalt, dass du wirklich keine Instanz (also z.b. Zugriff auf Klassen-Felder, persistenter State, etc.) benötigst.
Das habe ich nicht ganz verstanden. Aber ich glaube du meinst, dass man dann keine Variablen im TEnumFunctions = class-Konstrukt benutzen kann.

Edit: habs glaube ich

Delphi-Quellcode:
type
 TEnumFunctions = class
 private
  //
 public
  class function TestFunction(sInput: string): string; static;
 end;

implementation

class function TEnumFunctions.TestFunction(sInput: string): string;
begin
 Result := sInput + ' - ZUSATZ';
end;

// Aufruf
ShowMessage(TEnumFunctions.TestFunction('123'));
... bin gerade schon alles fleißig am umstellen, damit ich die Instanzen-"Variable" loswerde.

Sollte dann lieber folgendes bleiben...
Delphi-Quellcode:
type
 TEnumFunctions = class
Oder besser
Delphi-Quellcode:
type
 TEnumFunctions = record
?

Zacherl 1. Dez 2016 23:15

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Zitat:

Zitat von a.def (Beitrag 1355189)
Sollte dann lieber folgendes bleiben...
Delphi-Quellcode:
type
 TEnumFunctions = class
Oder besser
Delphi-Quellcode:
type
 TEnumFunctions = record

Tatsächlich verwenden die meisten Leute - mich eingeschlossen - lieber einen Record, wenn es eh nur statische Methoden gibt. Kann dir aber grade gar nicht genau sagen, was dazu die Überlegung im Hintergrund ist. Ich rede mir ein, dass der Compiler so weniger RTTI-"Müll" generiert.

bepe 2. Dez 2016 05:57

AW: Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?
 
Hi,

es gibt noch eine andere Möglichkeit die auch mit nicht Enums kein Problem hätte: TValue. Das nutze ich immer.

Delphi-Quellcode:
...
uses
  System.RTTI
...
class function TEnumHelper<TEnum>.GetName(Value: TEnum): String;
begin
  Result := TValue.From<TEnum>(Value).ToString;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:43 Uhr.
Seite 2 von 2     12   

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