Разработка справочной системы по визуальным компонентам Delphi

Автор работы: Пользователь скрыл имя, 16 Апреля 2014 в 20:46, курсовая работа

Краткое описание

Нужно разработать справочную систему на объектно-ориентировочном языке Object Pascal по визуальным компонентам Delphi в среде визуального программирования Delphi (7 версия). Для этого будут использоваться книги авторов, таких как Возневич Э. Освой самостоятельно Delphi: Полное руководство для самостоятельного обучения; Гофман В.Э./ Хомоненко А.Д. Delphi 6; Епанешников А.М. Программирование в среде Turbo Pascal 0 – 3-е издание и другие.

Вложенные файлы: 1 файл

справочная система по визуальным компонентам Delphi .doc

— 309.50 Кб (Скачать файл)

end;

procedure Tf_main.bb_TSoapConnectionClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebServices.txt','TSoapConnection'));

end;

procedure Tf_main.bb_HTTPSoapDispatcherClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebServices.txt','HTTPSoapDispatcher'));

end;

procedure Tf_main.bb_HTTPSoapPascalInvokerClick(Sender: TObject);

begin

        m_help.Clear;

       m_help.Lines.Add(finding('WebServices.txt','HTTPSoapPascalInvoker'));

end;

procedure Tf_main.bb_HTTPRIOClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebServices.txt','HTTPRIO'));

end;

procedure Tf_main.bb_OPToSoapDomConvertClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebServices.txt','OPToSoapDomConvert'));

end;

procedure Tf_main.bb_WSDLHTMLPublishClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebServices.txt','WSDLHTMLPublish'));

end;

procedure Tf_main.bb_XMLBrokerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('InternetExpress.txt','XMLBroker'));

end;

procedure Tf_main.bb_InetXPageProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('InternetExpress.txt','InetXPageProducer'));

end;

procedure Tf_main.bb_ClientSocketClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','ClientSocket'));

end;

procedure Tf_main.bb_ServerSocketClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','ServerSocket'));

end;

procedure Tf_main.bb_WebDispatcherClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','WebDispatcher'));

end;

procedure Tf_main.bb_PageProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','PageProducer'));

end;

procedure Tf_main.bb_DataSetTableProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','DataSetTableProducer'));

end;

procedure Tf_main.bb_DataSetPageProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','DataSetPageProducer'));

end;

procedure Tf_main.bb_QueryTableProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','QueryTableProducer'));

end;

procedure Tf_main.bb_SQLQueryTableProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','SQLQueryTableProducer'));

end;

procedure Tf_main.bb_TcpClientClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','TcpClient'));

end;

procedure Tf_main.bb_TcpServerClick(Sender: TObject);

begin

        m_help.Clear;

       m_help.Lines.Add(finding('Internet.txt','TcpServer'));

end;

procedure Tf_main.bb_UdpSocketClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','UdpSocket'));

end;

procedure Tf_main.bb_XMLDocumentClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','XMLDocument'));

end;

procedure Tf_main.bb_WebBrowserClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Internet.txt','WebBrowser'));

end;

procedure Tf_main.bb_TAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TAdapter'));

end;

procedure Tf_main.bb_TPagedAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TPagedAdapter'));

end;

procedure Tf_main.bb_TDataSetAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TDataSetAdapter'));

end;

procedure Tf_main.bb_TLoginFormAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TLoginFormAdapter'));

end;

procedure Tf_main.bb_TStringsValuesListClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TStringsValuesList'));

end;

procedure Tf_main.bb_TDataSetValuesListClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TDataSetValuesList'));

end;

procedure Tf_main.bb_TWebAppComponentsClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TWebAppComponents'));

end;

procedure Tf_main.bb_TApplicationAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TApplicationAdapter'));

end;

procedure Tf_main.bb_TEndUserAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TEndUserAdapter'));

end;

procedure Tf_main.bb_TEndUserSessionAdapterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TEndUserSessionAdapter'));

end;

procedure Tf_main.bb_TPageDispatcherClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TPageDispatcher'));

end;

procedure Tf_main.bb_TAdapterDispatcherClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TAdapterDispatcher'));

end;

procedure Tf_main.bb_TLocateFileServiceClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TLocateFileService'));

end;

procedure Tf_main.bb_TSessionsServiceClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TSessionsService'));

end;

procedure Tf_main.bb_TWebUserListClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TWebUserList'));

end;

procedure Tf_main.bb_TXSLPageProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TXSLPageProducer'));

end;

procedure Tf_main.bb_TXSLAdapterProducerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('WebSnap.txt','TXSLAdapterProducer'));

end;

procedure Tf_main.bb_NMDayTimeClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMDayTime'));

end;

procedure Tf_main.bb_NMMsgClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMMsg'));

end;

procedure Tf_main.bb_NMMsgServClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMMsgServ'));

end;

procedure Tf_main.bb_NMEchoClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMEcho'));

end;

procedure Tf_main.bb_NMFTPClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMFTP'));

end;

procedure Tf_main.bb_NMHTTPClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMHTTP'));

end;

procedure Tf_main.bb_NMNNTPClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMNNTP'));

end;

procedure Tf_main.bb_NMStrmClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMStrm'));

end;

procedure Tf_main.bb_NMStrmServClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMStrmServ'));

end;

procedure Tf_main.b_NMPOP3Click(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMPOP3'));

end;

procedure Tf_main.bb_NMSMTPClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMSMTP'));

end;

procedure Tf_main.bb_NMTimeClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMTime'));

end;

procedure Tf_main.bb_NMUDPClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMUDP'));

end;

procedure Tf_main.bb_NMURLClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMURL'));

end;

procedure Tf_main.bb_NMUUProcessorClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMUUProcessor'));

end;

procedure Tf_main.bb_PowerSockClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','PowerSock'));

end;

procedure Tf_main.bb_NMGeneralServerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMGeneralServer'));

end;

procedure Tf_main.bb_NMFingerClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('FastNet.txt','NMFinger'));

end;

procedure Tf_main.bb_DecisionCubeClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionCube'));

end;

procedure Tf_main.bb_DecisionQueryClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionQuery'));

end;

procedure Tf_main.bb_DecisionSourceClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionSource'));

end;

procedure Tf_main.bb_DecisionPivotClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionPivot'));

end;

procedure Tf_main.bb_DecisionGridClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionGrid'));

end;

procedure Tf_main.bb_DecisionGraphClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('DecisionCube.txt','DecisionGraph'));

end;

procedure Tf_main.bb_QuickRepClick(Sender: TObject);

begin

       m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QuickRep'));

end;

procedure Tf_main.bb_QRSubDetailClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRSubDetail'));

end;

procedure Tf_main.bb_QRStringsBandClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRStringsBand'));

end;

procedure Tf_main.bb_QRBandClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRBand'));

end;

procedure Tf_main.bb_QRChildBandClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRChildBand'));

end;

procedure Tf_main.bb_QRGroupClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRGroup'));

end;

procedure Tf_main.bb_QRLabelClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRLabel'));

end;

procedure Tf_main.bb_QRDBTextClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRDBText'));

end;

procedure Tf_main.bb_QRExprClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRExpr'));

end;

procedure Tf_main.bb_QRSysDataClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRSysData'));

end;

procedure Tf_main.bb_QRMemoClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRMemo'));

end;

procedure Tf_main.bb_QRExprMemoClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRExprMemo'));

end;

procedure Tf_main.bb_QRRichTextClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRRichText'));

end;

procedure Tf_main.bb_QRDBRichTextClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRDBRichText'));

end;

procedure Tf_main.bb_QRShapeClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRShape'));

end;

procedure Tf_main.bb_QRImageClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRImage'));

end;

procedure Tf_main.bb_QRDBImageClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRDBImage'));

end;

procedure Tf_main.bb_QRCompositeReportClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRCompositeReport'));

end;

procedure Tf_main.bb_QRPreviewClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRPreview'));

end;

procedure Tf_main.bb_QRTextFilterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRTextFilter'));

end;

procedure Tf_main.bb_QRCSVFilterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRCSVFilter'));

end;

procedure Tf_main.bb_QRHTMLFilterClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRHTMLFilter'));

end;

procedure Tf_main.bb_QRChartClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('QReport.txt','QRChart'));

end;

procedure Tf_main.bb_OpenDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','OpenDialog'));

end;

procedure Tf_main.bb_SaveDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','SaveDialog'));

end;

procedure Tf_main.bb_OpenPictureDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','OpenPictureDialog'));

end;

procedure Tf_main.bb_SavePictureDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','SavePictureDialog'));

end;

procedure Tf_main.bb_FontDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','FontDialog'));

end;

procedure Tf_main.bb_ColorDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','ColorDialog'));

end;

procedure Tf_main.bb_PrintDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','PrintDialog'));

end;

procedure Tf_main.bb_PrinterSetupDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','PrinterSetupDialog'));

end;

procedure Tf_main.bb_FindDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','FindDialog'));

end;

procedure Tf_main.bb_ReplaceDialogClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Dialogs.txt','ReplaceDialog'));

end;

procedure Tf_main.bb_DBLookupListClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Win31.txt','DBLookupList'));

end;

procedure Tf_main.bb_DBLookupComboClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Win31.txt','DBLookupCombo'));

end;

procedure Tf_main.bb_TabSetClick(Sender: TObject);

begin

        m_help.Clear;

        m_help.Lines.Add(finding('Win31.txt','TabSet'));

end;

procedure Tf_main.bb_OutlineClick(Sender: TObject);

Информация о работе Разработка справочной системы по визуальным компонентам Delphi