Tabel sammenknytning
Jeg arbejder med en database som har følgende 2 tabellerHovedtabel Tabel med generelle data
Nr + *
Navn String25
Dit
Dat
Dut
Undertabel
Nr + *
HovedtabelNr I *
Dit
Dat
Dut
På min form vises hovedtabellens data i DBEdit felter og undertabbellens data i
Et Dbgrid
På formen er der ligeledes en Checkbox, som hedder VisAlleElementerI_Undertabel, når denne checkbox er checked skal alle data i undertabel vises, når den er unchecked er det kun de rækker som har samme nr som i hovedtabellen der skal vises.
Jeg har forsøgt mig med følgende kode men desværre uden held
procedure TForm1.CheckBox1VisAlleElementerClick(Sender: TObject);
begin
if CheckBox1VisAlleElementer.Checked then
begin
TableUndertabel.MasterSource := nil;
TableUndertabel.MasterFields := \'\';
end
else
begin
TableUnderTabel.MasterSource := DataSourceHovedTabel;
TableUnderTabel.MasterFields := \'Nr\';
end;
TableUnderTabel.Open;
TableUnderTabel.Refresh;
end;
Hvad går galt ?
