Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi ItemIndex aus Listbox an ComboBox übergeben? (https://www.delphipraxis.net/100189-itemindex-aus-listbox-combobox-uebergeben.html)

mlspider 24. Sep 2007 11:39


ItemIndex aus Listbox an ComboBox übergeben?
 
Wieder mal eine ganz banale Frage. Ich möchte den kompletten ItemIndex einer Listbox an eine Combobox übergeben.

Delphi-Quellcode:
ComboBox2.Items:=listBox1.Items[ ListBox1.ItemIndex];
Ist leider inkompatibel (String und TStrings).

Beispiel:

Anstatt Eintrag1, Eintrag2 usw., sollte in der Combobox 0, 1, 2 usw. stehen.

Reinhardtinho 24. Sep 2007 11:53

Re: ItemIndex aus Listbox an ComboBox übergeben?
 
Hi,

So ganz habe ich die Frage jetzt nicht verstanden, aber mit

Delphi-Quellcode:
ComboBox2.Items.Add(ListBox1.Items[ ListBox1.ItemIndex]);
kannst du den Eintrag zur ComboBox hinzufügen.



MFG
Lorenz

Matze 24. Sep 2007 11:54

Re: ItemIndex aus Listbox an ComboBox übergeben?
 
Hallo,

vielleicht geht es auch einfacher, aber mit einer Schleife würde es funktionieren:

Delphi-Quellcode:
var
  i: Integer;

ComboBox.Clear;

for i := 0 to ListBox.Items.Count - 1 do
  ComboBox.Items.Add(IntToStr(i));

mlspider 24. Sep 2007 11:56

Re: ItemIndex aus Listbox an ComboBox übergeben?
 
Auf die banale for-Schleife bin ich nicht gekommen. Danke euch beiden. Funzt.

DeddyH 24. Sep 2007 12:08

Re: ItemIndex aus Listbox an ComboBox übergeben?
 
Zitat:

Zitat von Matze
vielleicht geht es auch einfacher...

Jepp ;)
Delphi-Quellcode:
ComboBox.Items.AddStrings(ListBox.Items);
//Edit: Sorry, hatte übersehen, dass er die Zahlenwerte haben wollte.


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