Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 3. Mai 2011
  TApEnumerations = class
  public
  class function EnumToStr<T>(const Value: T): String; static;
  class function StrToEnum<T>(const Value: String): T; static;
  
  class function SetToStr<T>(const Value: T): String; static;
  class function StrToSet<T>(const Value: String): T; static;
  end;
  So, habe das ganze nun überarbeitet und um die Methoden SetToStr<T>() und StrToSet<T>() erweitert. Zudem...
• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 1. Mai 2011
  Allein aufgrund der automatischen Garbage Collection bei Records kann ich verstehen, warum es so gemacht ist, wie es gemacht ist. Sonst müsstest du ja jedes mal ein TValue-Objekt erzeugen und freigeben, wenn du damit arbeiten willst. Records machen das halt sehr viel bequemer. Klar, in meinem Fall ändert sich nicht wirklich viel, aber ich hab mir mal den TValue-Record näher angeschaut und allein...
• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 1. Mai 2011
  Da hat der Herr wohl vollkommen recht, baue ich morgen ein :stupid: Aber im großen und ganzen müsste das der Compiler sogar abfangen, da man ja einen Enum angeben muss, der im Moment ja immer 1 Byte groß ist. Bei den Enums, bei denen man Ordinalwerte angeben kann, wird ja eine Exception geworfen, da gar keine Typeinformationen vorhanden sind.
  
  
  Ich habe es mir wahrlich im Source der VCL...
• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 30. Apr 2011
  Ich unterstütze alles ab Delphi 2010, da ich teilweise rege Verwendung der neuen RTTI mache. Nachdem es auch die netten Generics gibt, will ich dem Nutzer der Log-Komponente (Hauptnutzer bin wohl ich :mrgreen:) so viel wie möglich abnehmen. Daher mein Ansatz, aber danke für den Hinweis.
  
  -- Edit: Hier noch schnell der Record mit den entsprechenden Methoden. Die Methode StrToEnum() gibt es in...
• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 30. Apr 2011
  Ha, ich habs :stupid:
  
  TLog = record
  class procedure AddEnum<T>(V: T); static;
  end;
  
  class procedure TLog.AddEnum<T>(V: T);
  begin
  Writeln(GetEnumName(TypeInfo(T), PByte(@V)^));
  end;
• Forum: Object-Pascal / Delphi-Language

  AW: Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 30. Apr 2011
  Selbst mit Ord() scheitert das ganze: Project1.dpr(30): E2008 Inkompatible Typen
  
  PS: Beachtet das mit dem set mal noch nicht.
• Forum: Object-Pascal / Delphi-Language

  Generisches ToString für Enumerations

    Delphi
    by s.h.a.r.k, 30. Apr 2011
  Hallo zusammen,
  
  habe gerade mal wieder ein Problem bzgl. meiner Log-Klasse. Ich hätte gerne folgendes:
  type
  TTestEnum = (teOne, teTwo, teThree {...});
  TTestEnumSet = set of TTestEnum;
  
  var
  a : TTestEnum;
  b : TTestEnumSet;