How to list all reports and forms |
Previous Top Next |
Once you've opened a database, you can use the Access application's Reports and Forms properties to list the open reports and forms:
Code: |
for i := 0 to Access.Reports.Count - 1 do Memo1.Lines.Add(Access.Reports[i].Name); for i := 0 to Access.Forms.Count - 1 do Memo1.Lines.Add(Access.Forms[i].Name); |
But note that these properties return only the open reports and forms in a database. To get the closed ones you have to use DAO97.pas (or DAO_TLB.pas for Delphi 4) and access the Documents collection:
Code: |
uses DAO97; var i: integer; Cont: Container; begin Cont := Access.CurrentDB.Containers.Item['Reports']; for i := 0 to Cont.Documents.Count - 1 do Memo1.Lines.Add(Cont.Documents[i].Name); Cont := Access.CurrentDB.Containers.Item['Forms']; for i := 0 to Cont.Documents.Count - 1 do Memo1.Lines.Add(Cont.Documents[i].Name); |
©Drkb::02745