ich habe eine Orte-Tabelle, die ich in eine gewöhnliche ComboBox kopieren möchte. Nun möchte ich als Resultat meines Kopierens nicht nur die PLZ und den ORT haben, sondern auch als wichtigstes (für mich!!) die dazugehörige ORT_ID (Primärschlüssel). Wie stelle ich soetwas an?

Ich kenne mich leider mit Zeigern und Referenzen nicht so perfekt aus, kann mir da jemand eventuell ein Beispiel zeigen (und, ganz wichtig [minimal] dokumentieren, damit ich dran lang blicken kann)

Dank im voraus und gruß Gerd

ps: aus der Borlandhilfe wurde ich leider nicht richtig schlau, und hier im forum gab es für mich nicht unbedingt eine art lösung, sodass ich es selbst verstehen könte!

TStrings::AddObject() bringt dir da nicht viel, da du damit nur Objekte verwalten kannst, keine Strings.

Es gäbe andere Wege :
- du fragst die Datensätze bereits sortiert ab, und trägst diese so in die ComboBox ein. Dann kannst du TComboBox::ItemIndex direkt auf TQuery::RecNo anwenden, um auf den Datenstaz zuzugreifen.

- wenn du nicht die BDE-Komponenten benutzt, kannst du die ID-Werte auch in einen passenden Container (std::vector, DynamicArray...) legen, und dort mit ItemIndex zugreifen

- du benutzt TDBComboBox oder TDBLookUpComboBox anstatt TComboBox

bis bald
akari

andere frage, als object brauche ich nicht zwingend einen string, ein integer würde mir auch reichen, da der primär nen integer ist. ich habe jetzt so eine idee gehabt (vielleicht kann man die ausbauen):

beim füllen:

tblOrte->First();
cmbWohnort->Clear();
while(!tblOrte->Eof)
{
    cmbWohnort->Items->AddObject(tblOrte->FieldByName("Wohnort")->AsString,(TObject *) tblOrte->FieldByName("ort_id")->AsInteger);
    tblOrte->Next();
}

zum auslesen:

Caption = IntToStr(cmbWohnort->Items->Objects[cmbWohnort->ItemIndex]);

klappt natrüclih nicht, aber vielleicht gibts daraus eine lösung?

achja, warum klappt bei mir das compilieren mit: cmbWohnort->Items->Objects nicht?

gruß gerd

bitte immer mit angeben, was schieflaeuft. fehlermeldungen, etc...

cmbWohnort->Items->AddObject(tblOrte->FieldByName("Wohnort")->AsString,(TObject *)**(int)**tblOrte->FieldByName("ort_id")->AsInteger);

@ YLIREBUS : dir ist aber schon klar, das das nicht funktionieren wird? Nicht nur wegen dem cast, sondern einfach weil tblOrte->FieldByName("ort_id") immer auf einen Datensatz zeigt, der sich nicht durch die Auswahl der ComboBox verändert?

bis bald
akari

Anhängen:

CB_Buero->Items->AddObject(qryBASIS->FieldByName("Buero")->AsString, (TObject*)(int)qryBASIS->FieldByName("ID")->AsInteger);

auslesen:

int(CB_Buero->Items->Objects[CB_Buero->ItemIndex]);

und bei mir funzt es die id ist immer die die zu dem Büro gehört .

gut, dann habe ich das falsch verstanden...
Aber wieder mal eine unsaubere Sache mit den casts. Man sollte wenigstens statt dem C-Style Cast dann den reinterpret_cast nehmen.

bis bald
akari

habe YLIREBUS beispiel eingebunden, und auslesen tue ich so:

Caption = IntToStr((int) cmbWohnort->Items->Objects[cmbWohnort->ItemIndex]);

scheint tadellos zu klappen, oder aht noch jemand begründete einwände?!

gruß gerd

ps: habe es jetzt auch verstanden! danke an alle!

@akari: der reinterpreter_cast würde mich auch interessieren, wie das damit gelöst werden könnte!

CB_Buero->Items->AddObject(qryBASIS->FieldByName("Buero")->AsString, (TObject*)(int)qryBASIS->FieldByName("ID")->AsInteger);

wozu der cast auf int?

int a = reinterpret_cast <int> (ComboBox1->Items->Objects[ComboBox1->ItemIndex]);

reinterpret_cast<> ist ein Template aus dem C++ Standard. Das würde bei dir so aussehen :

Caption = IntToStr(reinterpret_cast<int> (cmbWohnort->Items->Objects[cmbWohnort->ItemIndex]));

Es ändert aber nichts an der Sache, das das ganze nicht sehr sauber ist.

/Edit : zu spät...

bis bald
akari

gruß gerd

was passiert bei einem (eventuellen) absturz (auch vielleicht durch fremde applikationen, sprich windows hängt sich auf oder so, muss ich den speicher trotzdem irgendwie freimachen?

gruß gerd

theoretisch wird das array von der kompo freigegeben. wenn du dort allerdings zeiger auf andere objekte speicherst, musst du die selber freigeben.