KB10599 - List all field names from a joined dataset.
This can be done as follows:
if Assigned( oLayer.JoinDB ) then begin
for i:=0 to oLayer.JoinDB.FieldCount-1 do begin
name := oLayer.JoinDB.Fields[i].DisplayName ;
....
end ;
end ;
if Assigned( oLayer.JoinADO ) then begin
for i:=0 to oLayer.JoinADO.Fields.Count-1 do begin
name := oLayer.JoinADO.Fields.Item[i].Name ;
...
end ;
end ;
Created: January 07, 2005, Modified: September 10, 2015