![]() |
combobox + mysql + 2 werte ausgeben(gleichzeitig)
Hi,
ich hätte noch ein kleines problemchen. Und zwar habe ich eine mysql datenbank. Über die zeoskomponenten, greife ich darauf zu. Mein problem ist, das ich aus einer Tabelle die wie folgt aufgebaut ist: id,zbe die datensätze haben möchte. Aber in einer Combobox. Es soll wie folgt aufgebaut sein, das wenn man auf die combobox geht, die Datensätze der spalte zbe ausgegeben werden sollen. Dies funktioniert auch.
Delphi-Quellcode:
Wenn der user anschließend seinen datensatz ausgewählt hat in der combobox, soll er
var i,j : byte;
begin administration.anmelden; hauptfenster.qrmain.SQL.Text:='Select * from ZBezeichnung'; hauptfenster.qrmain.Open; j:= hauptfenster.qrmain.RecordCount; for i:=1 to j do begin zimmerbezeichnung.itemindex:=zimmerbezeichnung.itemindex+1; zimmerbezeichnung.Items.Add(hauptfenster.qrMain.FieldByName('zbe').AsString); hauptfenster.qrmain.next; end; er nur noch auf einen button klicken. Dann soll die zu dem datensatz dazugehörige id in einem label ausgegeben werden. Also beispiel id=1 und zbe=technikraum in der combobox stehen ein paar einträge unter anderem technikraum. Wenn einer auf technikraum geht soll die id (1) in einem label ausgegeben werden. Ich weiß nur absolut nicht, wie ich die id dahinbekomme. Ich habe es über eine stringgrid gemacht. Da geht es wunderbar, weil man ja alles in einer zeile stehen hat die id und die zbe. Nur bei allen anderen komponenten, klappt es nicht so einfach. Ich hoffe mir kann da einer helfen. mfg yoshi |
Re: combobox + mysql + 2 werte ausgeben(gleichzeitig)
Hallo yoshie,
verwende doch statt der Combobox die LookupCombobox und fülle diese mit den benötigten Tabellendaten. So kannst Du einfach auf verschiedene Attribute zurückgreifen und eine Unterscheidung zwischen 'Key' und 'ListField' machen. Soll heißen: den Wert der angezeigt werden soll und der Wert der einen Wert eindeutig identifiziert... Gruß, Barnti |
Re: combobox + mysql + 2 werte ausgeben(gleichzeitig)
Zitat:
Ist jemanden schon etwas ähnliches passiert, und wenn ja: wie wurde das problem gelöst? Danke, David. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:20 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