Labels zu Array

[Privateer3000]

Hi,
Wer kann helfen?
möchte Labels zu einem Array machen.
Das heisst:
Es wird ein Ergebnis x errechnet(Integer)
das einem bestimmten Label(x) zu geordnet also angezeigt werden soll.
Nun könnte man das mit if ...then machen,
aber ich will die Labels noch öfters als Array verwenden.

Wenn es geht bitte so erklären das ich es auch verstehe


Dankeschööööön

[Christian Seehase]

Moin Privateer,

warum nimmst Du nicht einfach eine StringList und weist dann, entsprechend des Ergebnisses der Caption des Labels einen der Strings aus der Liste zu?

[MrSpock]

Hallo Privateer3000,

ich verstehe das so, dass du dynamisch auf das Label i zugreifen willst, dann könntest du folgendes machen.
[code:1:31cdf14e68]
for i := 0 to ComponentCount -1 do
if Components[i] is TLabel then

[RomanK]

Servus

Mit Findcomponent müsste das gehen!!

[Privateer3000]

Ja mit Findcomponent werde ich es mal probieren.
Muss das noch irgendwo deklariert werden oder geht Spocki's Code Nr.2
auch "einfach so"?

Danke an alle

[Alfons_G]

Hi,

Du musst natürlich TheLabel als TLabel deklarieren

[Privateer3000]

im Interface, oder?
Ist das dann eine neue Komponente oder wird TheLabel nur "missbraucht"
sozusagen ein Alias.
Mal nebenbei...
Als ich versucht habe

Code:

Label: array[1..12] of TLabel;

zu deklarieren sagt der kompler das es nicht im Interfaces erlaubt sei...Wo dann?

Grüsse

[MrSpock]

Hallo Privateer3000,

ich gehe davon aus, dass du die Labels schon in deinem Formular hast. Ist das richtig?

Falls ja, sind sie ja schon in der Klasse (TForm1) schon definiert und dürfen natürlich nicht noch einmal deklariert werden.

Falls nicht, kannst du sie zum Beispiel im privat - Bereich der Klasse definieren, aber bitte mit einem anderen Namen, weil label ein Schlüssselwort ist. Nenne sie z.B. MyLabels oder so.

Dann musst du die Labels natürlich dynamisch erstellen (nur wenn sie noch nicht im Formular existieren!) uns zwar mit TLabel.Create.

Wenn die Labels bereits existieren, kannst du meinen Code direkt benutzen und kannst TheLabel lokal in der Procedure deklarieren, in der du das entsprechende Label suchst, um ihm einen Wert zuzuweisen.

[MrSpock]

Hallo Privateer3000,

ich gehe davon aus, dass du die Labels schon in deinem Formular hast. Ist das richtig?

Falls ja, sind sie ja schon in der Klasse (TForm1) schon definiert und dürfen natürlich nicht noch einmal deklariert werden.

Falls nicht, kannst du sie zum Beispiel im privat - Bereich der Klasse definieren, aber bitte mit einem anderen Namen, weil label ein Schlüssselwort ist. Nenne sie z.B. MyLabels oder so.

Dann musst du die Labels natürlich dynamisch erstellen (nur wenn sie noch nicht im Formular existieren!) uns zwar mit TLabel.Create.

Wenn die Labels bereits existieren, kannst du meinen Code direkt benutzen und kannst TheLabel lokal in der Procedure deklarieren, in der du das entsprechende Label suchst, um ihm einen Wert zuzuweisen.

[Privateer3000]

ok, gut,
das werde ich mal versuchen.
Na klar <andenkopfkloppundshüttel> gibts die ja schon.
Mann bin ich blöd.....jajaja..ich kenne die Antwort

Aber langsam..gaaaaanz langsam wirds

bis denne

PS:
Ach tut es mir im Herzen weh, wenn ich vom Glas den "Bodensee"