DBLookupCombobox in DbEdit Feld anzeigen

[klaus9]

Hallo vielen dank ja so funktionier es wunderbar

[klaus9]

Hallo,

jetzt habe ich noch ein Problem.

Ich will gerne per Radio Button, wenn ich diesen anklicke, das mir die ausgewählte DBLookupCombobox in einem Edit.Feld angezeigt wird.


Habe mal folgendes versucht, aber er überträgt mir den Wert der DBLookupCombobox nur wenn ich direkt auf diese klicke.

Radiobutton habe ich als Onclick Event DBLookupComboBox1Click z.B. und dort im Code habe ich stehen

Form1.test.text:=(string(Form7.dbgrid1.Fields[1].AsString));

nur das funktioniert noch nicht so ohne weiteres

[DeddyH]

Wieso greifst Du nicht auf die dahinterliegende Datenmenge zu statt über VCL-Controls? Wenn es unbedingt über das Grid sein soll:
Form1.test.text := Form7.dbgrid1.DataSource.Dataset.Fields[1].AsString;

[klaus9]

Hi,

danke, aber muß gestehen mit diesen DBLookupBoxen habe ich im netz den versuchten code gefunden und der funktionierte halt bedingt.

Mein Problem ist derzeit folgendes.

Mehrere LookupComboboxen, DBEdit felder und RadioButtons.

nun will ich gerne das wenn ich auf Radiobutton clicke, mir die jeweiligen LookupCombo ausgewählten bereiche im dbedit feld angezeigt werden. Nur beim durch klicken der Aufträge haut er mir die Filtersetzungen durch einander.

Wie kann ich das verändern ?

[DeddyH]

Das habe ich ehrlich gesagt nicht verstanden. Vielleicht hängst Du mal einen Screenshot an mit einem kurzen beschreibenden Text? Evtl. kann ich Abstraktionsniete dann Dein Problem auch nachvollziehen.

[klaus9]

Hi,

kein Problem, habe hier im Anhang meine Idee angegeben.

Zurzeit klappt es auch soweit ganz gut, wähle ich in den Comboboxen namen aus und gehe anschließend auf die RadioButtons zeigt er mir bei auswahl der Radiobuttons im Edit1 Feld den jeweiligen Namen der Combobox an..

Ich möchte aber gerne die Mitarbeiter Nummer angezeigt bekommen im Edit Feld statt dem Namen.

als Anlage mal mein Source Beispiel..

Gruß
Klaus

[DeddyH]

Weis einmal dem DBEdit1 die Datasource zu. So, im RadioButton1Click kannst Du nun z.B. sagen:

Delphi-Quellcode:

procedure TForm1.RadioButton1Click(Sender: TObject);
begin
  DBEdit1.DataField := 'Nummer';
end;