Entwickler-Ecke

Datenbanken - DbGrid / Radiobuttons


Cosmic - Fr 29.11.02 14:43
Titel: DbGrid / Radiobuttons
Hi,
zuerst hatte ich das Problem eine Radiobuttonabfrage in eine Tabelle bzw DbGrid zu bekommen, dann hatte Klabauttermann (aus dem Forum) mir die nötigen Hinweise zur Lösung gegeben. Nun Habe ich das umgekehrte Problem ;-) Ich möchte via DbGrid bzw DbNavigator einen Datensatz auswählen oder durchclicken und die dazugehörigen Radiobuttons sollen ausgewählt werden (also aus der Tabelle ausgelesen werden). Ich habe auch den Befehl mit dem ich die Daten auslese, aber ich habe nicht ganz den Peil wie ich das mit dem DbGrid oder den Auswahlpfeilen verknüpfe!

Danke im Vorraus

Ciao Cosmic :wink:


Cosmic - Fr 06.12.02 17:34
Titel: Antwort
Hi,
nun weiß ich nicht ob das hier noch jemand liest :lol:
Aber falls doch könnte ich das ändern von Radiobuttons evt. mit dem
TDataSource.OnDataChange Ereignis auslösenn ?
Also falls es doch noch jemand liest, wäre ich dnak bar für eine Idee :-)
Ciao Cosmic

------------------------------------------------------------------
Let´s Fetz Heute beginnt Dein Leben!


Klabautermann - So 08.12.02 15:06

Hallo,

wenn ich mcih recht erinnere, habe ich dir damals geraten eine Radio-Group zu verwenden und den Index in ein Integer Feld zu Schreiben. Also inetwa so:

Quelltext
1:
MyTable.FieldByName('RadioOption').AsInteger := RadioBox1.ItemIndex;                    

um dies umzukehren musst du nur die Elemente dieser Anweisung vertauschen:

Quelltext
1:
RadioBox1.ItemIndex := MyTable.FieldByName('RadioOption').AsInteger;                    

Damit das jedes mal geschieht, wenn du den Aktiven Datensatz änderst, solltest du es im AfterScroll Ereignis des Tabellen Objektes aufrufen. Das war es dann auch schon ;)

Gruß
Klabautermann


Cosmic - So 08.12.02 15:20
Titel: Hurraaaaa !!!!!!!!!!!
Also ein großes "Danke" an alle die mir geholfen haben bei dieser schweren Hürde :D

Ich habe das Problem mit Hilfe des On-Scroll Ereignisses und folgendem Befehl hinbekommen:

Quelltext
1:
  form1.RadioButton5.Checked := boolean(Table3.FieldByName('ausbauvariante5').AsInteger);                    


Nochmals vielen Dank bis zur nächesten Hürde ;-)

Ciao Cosmic

----------------
Let´s Fetz heute beginnt Dein Leben[/code]