AGB  ·  Datenschutz  ·  Impressum  







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

String-Aufzählungen

Ein Thema von Helmi · begonnen am 23. Jun 2004 · letzter Beitrag vom 23. Jun 2004
Antwort Antwort
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
 
Delphi XE2 Professional
 
#1

String-Aufzählungen

  Alt 23. Jun 2004, 00:32
Hallo,

ich programmier gerade eine Komponente und steh vor einem Problem

kurze Erklärung

ich eine eine Type:
Code:
type
  TIrgendwas = (Irgendwas_1, Irgendwas_2, Irgendwas_3);
und unter private:
Code:
private
  FIrgendwo: TIrgendwas;
 
  procedure Setirgendwo(Value: TIrgendwas);
die Type frag ich in einer property ab:
Code:
property Irgendwo: TIrgendwas read FIrgendwo write SetIrgendwo default Irgendwas_2;

mein Problem ist nun dass ich diese Aufzählung im Type als String brauche,
das ich aber gleichzeitig in der property abfragen kann, so wie oben.

Ich hoffe das war einigermassen verständlich für die Uhrzeit

Vielleicht kann mir ja jemand helfen...

mfg
Helmi
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: String-Aufzählungen

  Alt 23. Jun 2004, 00:36
Moin Helmi,

an welcher Stelle bzw. in welchem Zusammenhang brauchst Du den String.
Ggf. such' hier mal nach Hier im Forum suchenRTTI (Run Time Type Information).
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
MrKnogge

Registriert seit: 9. Jun 2003
Ort: Pforzheim
2.458 Beiträge
 
Delphi 2007 Professional
 
#3

Re: String-Aufzählungen

  Alt 23. Jun 2004, 00:40
Servus Helmi,

andernfalls musst du dir eine eigne funktion schreiben:

Delphi-Quellcode:
function IrgendwasToStr(x: TIrgendwas): string;
begin
case x of
  Irgendwas_1 : result := 'Irgendwas_1';
  Irgendwas_2 : result := 'Irgendwas_2';
  ....
end;
Christian Bootz
Einstein ist tot, Newton ist tot,
und mir ist auch schon ganz schlecht...
  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 23:12 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