Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Eintrag einer ListBox in Klein/Großbuchstaben


Torsten - Fr 11.10.02 17:57
Titel: Eintrag einer ListBox in Klein/Großbuchstaben
Moinsen Leute!

Habe noch nicht wirklich viel mit TListBox gearbeitet.

Kann mir bitte jemand sagen, wie man einen ausgewählten Eintrag in einer ListBox wahlweise auf Groß- oder Kleinbuchstaben setzt?

Fragende Grüße

Torsten


patrick dee - Fr 11.10.02 18:06

hi

meinst du so :

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
var
  zeile : string;
  schleife : integer;
begin
  for Schleife := 0 to ListBox.Items.Count - 1 do
    begin
      Zeile := ListBox.Items[Schleife];

      // Alle Zeichen in Großbuchstaben verwandeln.
      Zeile := UpperCase(Zeile);

habe es nicht getestet. denke es sollte gehen.

gruß

patrick dee

(11.10.02 20:13 Tino) Code-Tags hinzugefügt.


Torsten - Fr 11.10.02 18:18

Moinsen!

Danke für die Antwort.
So in etwa war auch meine Überlegung.


Quelltext
1:
2:
3:
4:
5:
6:
7:
var     text: string;
begin
 if ListBox1.ItemIndex <> -1 then
  begin
        text:=UpperCase(ListBox1.Items[ListBox1.ItemIndex]);
        ListBox1.Items.Add(text);
  end;


Das funktioniert so schon ganz gut. Es wird jedoch ein neuer Eintrag zugefügt, also nicht der alte Eintrag umgewandelt und zurück geschrieben.

Doch irgendwie habe ich gerade einen Knoten im Hirn und komme nicht weiter.

Grüße

Torsten


Christian S. - Fr 11.10.02 18:24

Solche Knoten kenne ich ...


Quelltext
1:
2:
if ListBox1.ItemIndex > -1 then
  ListBox1.Items[ListBox1.ItemIndex]:=UpperCase(ListBox1.Items[ListBox1.ItemIndex]);


MfG,
Peter


Torsten - Fr 11.10.02 18:31

Hallo Peter,

Du bist also Kenner im Gebiet Knoten. Wunderbar.
Du hast soeben einen doppelten Palsteg aufgelöst.
Besten Dank für die Hilfe, passt astrein.

Dankende Grüße

Torsten