Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Mehrere EditFelder zusammenfassen.
majolo - Fr 28.06.02 17:40
Titel: Mehrere EditFelder zusammenfassen.
Ich habe ein Problem bzw. eher eine Frage. In meinem Programm kann den EditFeldern eine Farbe zugewiesen werden. Nun möchte ich aber nicht immer
Edit1.Font.Color := .........
Edit2.Font.Color := ........
Edit3.Font.Color := ........
usw.
schreiben sondern das Ganze zusammenfassen. Also Beispiel
Edit[1...3].Font.color := Farbe
Mein Beispiel funzt nicht, ist auch nur ein nicht funktionierendes Beispiel.
Aber ist so etwas möglich? Ist eine Idee, die ich bisher noch nicht hatte.
Danke im vorraus.
majolo 8)
Tino - Fr 28.06.02 17:51
Versuch es mal so:
Quelltext
1: 2: 3:
| For Idx := 1 To 10 Do IF Assigned (FindComponent ('Edit' + IntToStr (Idx))) Then tEdit (FindComponent ('Edit' + IntToStr (Idx))).Font.Color := clBlack; |
Gruß
majolo - Fr 28.06.02 18:10
Ich kriege die Fehlermeldung Undeclared identifier: 'Idx'
Wie definiere ich IDX?
Gruß Marcus
Marc - Fr 28.06.02 18:11
majolo hat folgendes geschrieben: |
Wie definiere ich IDX? |
Gruß Marc
Alibi - Fr 28.06.02 18:12
Wie jetzt? Ist doch eine ganz normale Integer Variable.
majolo - Fr 28.06.02 18:13
Okay IDX als Integer.Die Farbe ändert sich zwar noch nicht, aber ich werde noch was probieren.
Majolo
Tino - Fr 28.06.02 18:15
Die Edit-Felder müssen natürlich so benannt sein wie in Deinem Beispiel oben (Edit1, Edit2, Edit3, ...)
majolo - Fr 28.06.02 18:15
@Marc: Schon Okay. Habe ich gepennt. Fernsehen und programmieren klappt halt doch nicht immer.
Trotzdem Danke
PS: In dem Moment, wo du gepostet hast, hab ichs auch rausgefunden
majolo - Fr 28.06.02 18:18
Danke Tino. Klappt jetzt wunderbar. Ich hatte im Programm die EditFelder anders bezeichnet.
Gruss
majolo
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!