First definition of database tables:
CREATE TABLE UNCERTAINTY
(
ID Integer NOT NULL,
NAME Varchar(240) CHARACTER SET NONE NOT NULL,
CONSTRAINT PK_UNCERTAINTY PRIMARY KEY (ID),
UNIQUE (NAME)
);
CREATE TABLE UNCERTAINTYDETAIL
(
ID Integer NOT NULL,
UNCERTAINTY_ID Integer NOT NULL,
MEASTYPE Varchar(255) CHARACTER SET NONE,
CONDITION Varchar(255) CHARACTER SET NONE,
POWERFACTOR Double precision,
LOADTYPE Varchar(255) CHARACTER SET NONE,
UNCERTAINTY Double precision,
CONSTRAINT PK_UNCERTAINTYDETAIL PRIMARY KEY (ID)
);
ALTER TABLE UNCERTAINTYDETAIL ADD CONSTRAINT FK_UNCERTAINTY_UNCERTAINTYDETAI
FOREIGN KEY (UNCERTAINTY_ID) REFERENCES UNCERTAINTY (ID) ON DELETE CASCADE;
And now definition of my data sources and queries in dfm file:
object FDQuery1: TFDQuery
Connection = Connection1
SQL.Strings = (
'select * from UNCERTAINTY'
'order by NAME')
Left = 125
Top = 239
end
object FDQuery2: TFDQuery
MasterSource = DataSource1
MasterFields = 'ID'
Connection = Connection1
SQL.Strings = (
'select * from UNCERTAINTYDETAIL'
'where UNCERTAINTY_ID=:param1'
'order by ID')
Left = 456
Top = 224
ParamData = <
item
Name = 'PARAM1'
ParamType = ptInput
end>
end
object DataSource1: TDataSource
DataSet = FDQuery1
Left = 53
Top = 239
end
object DataSource2: TDataSource
DataSet = FDQuery2
Left = 392
Top = 224
end
Both data sources are connected to db grids.
In FormShow event I call following methods:
FDQuery1->Open();
FDQuery2->Open();
The master grid displays correctly all items stored in table UNCERTAINTY but detail grid is always empty. Why ?
The parameters of detail query should match MasterFields. So change param1
of FDQuery2 to ID
to match value MasterFields.
The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.