String als Const

[delphinia]

Ist es möglich,
einen STring der einen Namen enthält der einer Const gleicht dessen Inhalt zu bekommen?

[Christian Seehase]

Moin Doreen,

ist es möglich die Frage in verständlicher Sprache zu formulieren... ;-)

[calculon]

Zitat:

STring der einen Namen enthält

Delphi-Quellcode:

myString := 'Josef';

Zitat:

der einer Const gleicht

Delphi-Quellcode:

const
  NAME = 'Josef';

Zitat:

dessen Inhalt zu bekommen

http://www.cosgan.de/images/smilie/konfus/d070.gif http://www.cosgan.de/images/smilie/konfus/a050.gif

[delphinia]

Sorry ja wusste nicht wie ich mich ausdrücken sollte menno ;-(

Also nochmal habe einen String der behinhaltet den Namen einer Constanten
DIESE würde ich gerne ansprechen durch diesen String...

Weiss nicht wie ich es nun besser erklären soll

vielleicht so

const MEINSTRING = 475844;

var
S:String;

s := 'MEINSTRING' ;

ShowMessage(S); WOBEI S NICHT MEINSTRING sondern 475844 zurückgeben soll

[DeddyH]

Delphi-Quellcode:

const MyConst = 'Ich bin eine Konstante.';

...

var s: string;
begin
  s := MyConst;
  ShowMessage(s);
end;

Ich hoffe, Du hast das so gemeint.

[taaktaak]

Huuuuuuuuuhu, hier schreibt der kleine Übersetzer :nerd:

Ist es möglich, mit Hilfe eines Strings, der den Namen einer Konstanten enthält, auf deren Inhalt zuzugreifen?

Nicht perfekt, aber das ist doch wohl die Frage :stupid:

[delphinia]

@DeddyH

Nein!
Denn ich gebe in S den Caption eienr Label. DIESE hat mit absicht (zumindest so meine Idee) den Inhalt des Names einer Const
Nur will ich nun nicht den String ausgeben sondern durch diesen an den Wert der Const kommen

[DeddyH]

Das geht so nicht.

[Neutral General]

Hi,

Ich weiß was du willst ;)

Die Antwort lautet: nein. Es funktioniert nicht. Die Variablen und Konstantennamen sind zur Laufzeit nichtmehr verfügbar, deswegen geht das nicht.

[delphinia]

Zitat:

Zitat von Neutral General

Hi,

Ich weiß was du willst ;)

Die Antwort lautet: nein. Es funktioniert nicht. Die Variablen und Konstantennamen sind zur Laufzeit nichtmehr verfügbar, deswegen geht das nicht.

ok hmmm schnieeef danke

[grenzgaenger]

solche Konstrukte gehen bei PHP :-)

[taaktaak]

Zitat:

ich gebe in S den Caption eienr Label

Dann ist aber in S kein Freitext, sondern bereits ein zur Entwurfszeit bekannter Text - oder? Wenn das so ist, wird dieses Konstrukt m.E. gar nicht notwendig sein. Überdenke dein Konzept noch einmal :wink:

[SirTwist]

Zitat:

Zitat von delphinia

ok hmmm schnieeef danke

*Taschentuch reich*

Du musst halt Namen und Inhalt im Programm abspeichern, dann kannst Du über den Namen auf den Inhalt zugreifen.

Im einfachsten Fall nimmst Du eine TStringList, dort könntest Du Strings in der Form "Name=Inhalt" ablegen:

Delphi-Quellcode:

var stl: TStringList;
begin
  stl := TStringList.Create;
  stl.Add('Hinweis_1=Bitte durchlesen!');
  stl.Add('Hinweis_2=Wirklich lesen!');
  stl.Add('Button_1=Ja');
  stl.Add('Button_2=Nein');
  stl.Add('Button_3=Vielleicht');

und später

Delphi-Quellcode:

  s := stl.Values['Button_1'];

(alles ungetestet, kann also Syntax-Fehler enthalten. In Real müsste man die StringList natürlich als globale Variable definieren und den Create und die Adds in irgendeinem initialization-Teil machen)

Das nur als Anregung, das Prinzip kann man beliebig verfeinern. Im Endeffekt läuft es auf das hinaus, was unter Perl als assoziative Arrays bezeichnet werden.

Viel Spaß,
SirTwist