Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi ComboBox item bereiche mit < und > (https://www.delphipraxis.net/155139-combobox-item-bereiche-mit-und.html)

sun4623 10. Okt 2010 18:23

ComboBox item bereiche mit < und >
 
Hallo :)

Ich hab da ein ganz kleines Problem, ich möchte in bestimmten bereichen meiner Combobox items bzw. werte verschiedene aktionen durchführen. Nun kam mir die simple idee das mit < und > zu lösen, komme aber nicht wirklich weiter...

(itemIndex werte 1-5 sind z.b. apps)

if combobox1.ItemIndex <=4 then begin ShowMessage('Apps gewählt');

(ItemIdex 5-7 sind MultiMedia)
Wie fahre ich hier fort? Ich müßte doch eigentlich mit:
If ComboBox1.ItemIndex > als 6 aber <4 then ShowMessage('MultiMedia gewählt');

fortfahren, nur wie ging das doch gleich nochmal? Bekomme das leider nicht wirklich hin , wäre nett wenn mir jemand ein wenig auf die sprünge helfen könnte. :stupid:

Danke

scrat1979 10. Okt 2010 18:26

AW: ComboBox item bereiche mit < und >
 
Delphi-Quellcode:
 CASE ComboBox.ItemIndex OF
   1..5 : Begin; .... End;
   6..9 : Begin; .... End;
 END;

mkinzler 10. Okt 2010 18:29

AW: ComboBox item bereiche mit < und >
 
Welche Zahl ist größer 6 und gleichzeitig < 4?
Delphi-Quellcode:
If (ComboBox1.ItemIndex > 4) and (ComboBox1.ItemIndex <=7) then ShowMessage('MultiMedia gewählt');
Oder
Delphi-Quellcode:
case ComboBox1.ItemIndex of
  0,1,2,3,4: ...
  5,6,7: ...
end;
oder
Delphi-Quellcode:
If ComboBox1.ItemIndex in [5,6,7] then ...

SirThornberry 10. Okt 2010 18:38

AW: ComboBox item bereiche mit < und >
 
@Markus: Klammern nicht vergessen sonst meckert der Compiler ;-)
[Edit]bzw. wird in anderen Sprachen etwas anderes gemacht als gewünscht wenn die Klammern da fehlen

mkinzler 10. Okt 2010 18:40

AW: ComboBox item bereiche mit < und >
 
Zitat:

Zitat von SirThornberry (Beitrag 1054934)
@Markus: Klammern nicht vergessen sonst meckert der Compiler ;-)

Korrigiert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:47 Uhr.

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