Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Listbox item (https://www.delphipraxis.net/21765-listbox-item.html)

NikoMitDaMacht 7. Mai 2004 21:54


Listbox item
 
Kann mir jemand den code vervollständigen:

Delphi-Quellcode:
 if { der text des markiertem listboxItems= '1'} then ShowMessage('Hallo')

a.vollmer 7. Mai 2004 21:58

Re: Listbox item
 
Delphi-Quellcode:
if listbox1.itemindex = 0 then ShowMessage('Hallo');
oder wenn in der Listbox eins steht dann wohl so...

Delphi-Quellcode:
if listbox1.items[listbox1.itemindex] = '1' then ShowMessage('Hallo');

NikoMitDaMacht 7. Mai 2004 22:05

Re: Listbox item
 
DANKE :hi:

Muetze1 7. Mai 2004 22:08

Re: Listbox item
 
Moin!

Der Code geht aber schief, wenn noch kein Eintrag selektiert wurde...

MfG
Muetze1

yankee 8. Mai 2004 07:50

Re: Listbox item
 
Ja, natürlich. Könnte ja nicht anders sein. Entweder du machst das in eine TRY-Anweisung oder du schreibst davor if ListBox.ItemIndex <> nil (ungetestet) oder so was ähnliches...

Pseudemys Nelsoni 8. Mai 2004 07:55

Re: Listbox item
 
eher

if ListBox1.Items.Count <> -1 then ...

yankee 8. Mai 2004 08:01

Re: Listbox item
 
Ja, richtig. Ich wusste es nicht mehr so genau *g*

NikoMitDaMacht 8. Mai 2004 14:49

Re: Listbox item
 
Jupp :thuimb:

Benedikt 8. Mai 2004 15:01

Re: Listbox item
 
Zitat:

Zitat von Pseudemys Nelsoni
if ListBox1.Items.Count <> -1 then ...

Das wird dir wenig helfen.
Die Listbox kann ja hunderte von Einträgen haben, aber trotzdem muss keiner Selektiert sein.

So würdest du es richtig abfangen:
Delphi-Quellcode:
if ListBox1.ItemIndex<>-1 then
Dazu auch gleich noch die Delphi-Hilfe:
Zitat:

Zitat von Delphi-Hilfe
...
Wenn kein Eintrag ausgewählt ist, hat ItemIndex den Wert -1 (dies ist zugleich der Vorgabewert)....



Alle Zeitangaben in WEZ +1. Es ist jetzt 03:44 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