![]() |
Re: Daten einer Tabelle in eine TComboBox einlesen?
Zitat:
|
Re: Daten einer Tabelle in eine TComboBox einlesen?
Hallo zusammen.
Ich hätt mal eine Frage. Und zwar habe ich eine Combobox wie von Sharky vorgeschlagen mit
Delphi-Quellcode:
erstellt. Wie lese ich das ausgewählte nun aus ?
ComboBox1.Items.AddObject(inhalt,TOBject(id)); // Mit ID-Feld
Wahrscheinlich im ComboBox1Change-Ereignis, aber was muss ich abfragen wenn ich die ID des ausgewählten Feldes haben möchte? Gruß Micha |
Re: Daten einer Tabelle in eine TComboBox einlesen?
Hai _SolidSnake_,
Zitat:
Delphi-Quellcode:
var
id : integer; begin id := Integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]); end; |
Re: Daten einer Tabelle in eine TComboBox einlesen?
Hallo Sharky.
Danke, klappt wunderbar :) Gruß Micha |
Re: Daten einer Tabelle in eine TComboBox einlesen?
Hallo zusammen.
Leider muss ich nochmal stören :oops: Ist es auch umgekehr möglich ? Wenn ich zum Beispiel ein Login erstellen möchte wo ich den Bearbeiter über die Nummer (TEdit) oder eben über eine Auswahl (TComboBox) auswählen kann. Das ändern der Nummer bei Auswahl aus der Liste ist kein Problem, hab ich geschafft. Aber wie sieht es aus wenn ich eine Nummer eingebe, kann ich dann auch die Auswahl entsprechen auf den passenden Benutzer als Default stellen ? Ich hab ein wenig was ausprobiert, aber es klappt nicht ganz. Z.B.:
Delphi-Quellcode:
Tut sich nichts bei der Eingabe der Benutzernummer, aber sobald ich jemanden Auswähle bekomme ich nur wirre Zahlen im Edit-Feld
ComboBox1.Items.Objects[ComboBox1.ItemIndex] := TObject(Edit2.Text);
Delphi-Quellcode:
Geht im Grunde, aber die ID stimmt nicht, weil der Index ja bei 0 beginnt und meine ID's bei 1 beginnen und nicht unbedingt fortlaufend sind, weil ich ja auch mal Mitarbeiter rausnehme.
ComboBox1.ItemIndex := StrToInt(Edit2.Text);
Für nen kleinen Tipp wär ich dankbar ... Gruß Micha |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:30 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz