| # | Line 109 | Line 109 | function EditFieldLink(aMaster: TDataSet | |
|---|---|---|
| 109 | ||
| 110 | implementation | |
| 111 | ||
| 112 | < | uses IBCustomDataSet; |
| 113 | < | |
| 114 | < | function EditFieldLink(aMaster: TDataSet; aIndexDefs: TIndexDefs; |
| 112 | > | function EditFieldLink(aMaster: TDataSet; aIndexDefs: TIndexDefs; |
| 113 | var aDetailIndexFieldNames: string; var aMasterIndexFieldNames: string | |
| 114 | ): boolean; | |
| 115 | begin | |
| # | Line 270 | Line 268 | end; | |
| 268 | end; | |
| 269 | ||
| 270 | procedure TFieldLinkEditor.LoadMasterFields; | |
| 273 | – | var FieldNames: string; |
| 274 | – | idx: integer; |
| 271 | begin | |
| 272 | MasterFieldListBox.Clear; | |
| 273 | if assigned(Master) then | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |