Delphi网络应用开发的源代码

				object MyPageAdapter: TMyPageAdapter
				  OldCreateOrder = False
				  OnCreate = WebPageModuleCreate
				  OnDestroy = WebPageModuleDestroy
				  OnActivate = WebPageModuleActivate
				  PageProducer = AdapterPageProducer
				  Left = 254
				  Top = 107
				  Height = 172
				  Width = 215
				  object AdapterPageProducer: TAdapterPageProducer
				    HTMLDoc.Strings = (
				      ''
				      ''
				      ''
				      ''
				      ''
				      ''
				      '')
				    Left = 48
				    Top = 8
				    object AdapterForm1: TAdapterForm
				      object AdapterGrid1: TAdapterGrid
				        Adapter = PagedAdapter1
				      end
				      object AdapterCommandGroup1: TAdapterCommandGroup
				        DisplayComponent = AdapterGrid1
				      end
				    end
				  end
				  object PagedAdapter1: TPagedAdapter
				    OnGetRecordIndex = PagedAdapter1GetRecordIndex
				    OnGetRecordCount = PagedAdapter1GetRecordCount
				    OnGetEOF = PagedAdapter1GetEOF
				    OnGetFirstRecord = PagedAdapter1GetFirstRecord
				    OnGetNextRecord = PagedAdapter1GetNextRecord
				    PageSize = 10
				    Left = 40
				    Top = 72
				    object TAdapterDefaultActions
				    end
				    object TAdapterDefaultFields
				      object FileName: TAdapterField
				        OnGetValue = FileNameGetValue
				      end
				      object FileSize: TAdapterField
				        OnGetValue = FileSizeGetValue
				      end
				    end
				  end
				end