Delphi-PRAXiS
Seite 1 von 5  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Combobox Problem (https://www.delphipraxis.net/95766-combobox-problem.html)

Darksniper 12. Jul 2007 20:02


Combobox Problem
 
hi

Es geht um folgendes:

Ich hab ne ComboBox die 3 zeilen enthällt (1a;2a;3a)

Ich will die Caption eines Labels verändern wenn ich eine Zeile auswähle

z.b.wenn ich ich "2a" auswähle soll das Label (200) anzeigen

Das Ganze wird durch ein Button ausgelöst

Wie ist da der code?

mkinzler 12. Jul 2007 20:11

Re: Combobox Problem
 
Delphi-Quellcode:
Label.Caption := ComboBox.items[ ComboBox.ItemIndex);

dajuhsa 12. Jul 2007 20:13

Re: Combobox Problem
 
im onchange ereignis der combobox

Darksniper 12. Jul 2007 20:24

Re: Combobox Problem
 
Ok

Ich erweitere es ein bisschen

Wenn die Combobox "1a" anzeigt,soll das Label 100 anzeigen
Bei "2a" soll das llabel 200 anzeigen
Und bei "3a" soll es 300 anzeigen
Alles wird ausgelöst vom Button9

Wie lautet da der code?

Ich programmier noch nicht lange desshalb kann ich mit
Delphi-Quellcode:
Label.Caption := ComboBox.items[ ComboBox.ItemIndex);
nicht viel anfagen

Apollonius 12. Jul 2007 20:29

Re: Combobox Problem
 
Geh doch mal strukturiert vor:
Was willst du eigentlich? Du willst in ein Label das erste Zeichen des aktivierten Comboboxeintrags und dahinter noch '00' schreiben. Das ganze im ButtonClick. Wie du den Text des gewählten Comboboxeintrags erhältst, hat dir mkinzler schon gesagt. Jetzt musst du dir nur noch das erste Zeichen dieses Strings holen, das geht einfach, indem du der Zeichenkette [1] nachstellst. Nochmal zum Mitschreiben:
Delphi-Quellcode:
MeinLabel.Caption:=MeineCombobox.items[MeineCombobox.itemindex][1]+'00';

Matze 12. Jul 2007 20:31

Re: Combobox Problem
 
Hi,

schau dir unbedingt die Delphi-Grundlagen an. Für den Anfang ist es sicher am einfachsten zu verstehen, wenn du den angezeigten Text der ComboBox auswertest:

Delphi-Quellcode:
if ComboBox1.Text = '1a' then
  Label1.Caption := '100'
else if ...
Du kannst natürlich auch mit dem ItemIndex arbeiten, diesen um eins erhöhen und 2 Nullen anhängen. Doch das ist für dich sicher etwas schwieriger nachzuvollziehen:

Delphi-Quellcode:
Label1.Caption := IntToStr(ComboBox1.ItemIndex + 1) + '00';

Darksniper 12. Jul 2007 20:46

Re: Combobox Problem
 
danke

Delphi-Quellcode:
if ComboBox1.Text = '1a' then
  Label1.Caption := '100'
else if ...
is genau das was ich such.

was ist eigentlich der Index. :gruebel:

Matze 12. Jul 2007 20:48

Re: Combobox Problem
 
Die Einträge (Items) der ComboBox sind alle mit einer Nummer (Index) versehen, über die man diese Einträge ansprechen kann. Der erste Eintrag hat den ItemIndex 0, der zweite 1 etc.

Darksniper 12. Jul 2007 20:50

Re: Combobox Problem
 
danke

du hast mir gerade sehr viel tipperei erspaart

mkinzler 12. Jul 2007 20:51

Re: Combobox Problem
 
Und .ItemIndex ist der Index des ausgewählten Eintrags.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:01 Uhr.
Seite 1 von 5  1 23     Letzte »    

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