Автор: Пользователь скрыл имя, 24 Октября 2011 в 10:17, курсовая работа
1. Разработка эскизного и технического проектов программы.
Нужно разработать справочную систему на объектно-ориентировочном языке Object Pascal по визуальным компонентам Delphi в среде визуального программирования Delphi (6 версия). Для этого будут использоваться книги авторов, таких как Возневич Э. Освой самостоятельно Delphi: Полное руководство для самостоятельного обучения; Гофман В.Э./ Хомоненко А.Д. Delphi 6; Епанешников А.М. Программирование в среде Turbo Pascal 0 – 3-е издание и другие.
procedure bb_DecisionCubeClick(Sender: TObject);
procedure bb_DecisionQueryClick(Sender: TObject);
procedure bb_DecisionSourceClick(Sender: TObject);
procedure bb_DecisionPivotClick(Sender: TObject);
procedure bb_DecisionGridClick(Sender: TObject);
procedure bb_DecisionGraphClick(Sender: TObject);
procedure bb_QuickRepClick(Sender: TObject);
procedure bb_QRSubDetailClick(Sender: TObject);
procedure bb_QRStringsBandClick(Sender: TObject);
procedure bb_QRBandClick(Sender: TObject);
procedure bb_QRChildBandClick(Sender: TObject);
procedure bb_QRGroupClick(Sender: TObject);
procedure bb_QRLabelClick(Sender: TObject);
procedure bb_QRDBTextClick(Sender: TObject);
procedure bb_QRExprClick(Sender: TObject);
procedure bb_QRSysDataClick(Sender: TObject);
procedure bb_QRMemoClick(Sender: TObject);
procedure bb_QRExprMemoClick(Sender: TObject);
procedure bb_QRRichTextClick(Sender: TObject);
procedure bb_QRDBRichTextClick(Sender: TObject);
procedure bb_QRShapeClick(Sender: TObject);
procedure bb_QRImageClick(Sender: TObject);
procedure bb_QRDBImageClick(Sender: TObject);
procedure bb_QRCompositeReportClick(
procedure bb_QRPreviewClick(Sender: TObject);
procedure bb_QRTextFilterClick(Sender: TObject);
procedure bb_QRCSVFilterClick(Sender: TObject);
procedure bb_QRHTMLFilterClick(Sender: TObject);
procedure bb_QRChartClick(Sender: TObject);
procedure bb_OpenDialogClick(Sender: TObject);
procedure bb_SaveDialogClick(Sender: TObject);
procedure bb_OpenPictureDialogClick(
procedure bb_SavePictureDialogClick(
procedure bb_FontDialogClick(Sender: TObject);
procedure bb_ColorDialogClick(Sender: TObject);
procedure bb_PrintDialogClick(Sender: TObject);
procedure bb_PrinterSetupDialogClick(
procedure bb_FindDialogClick(Sender: TObject);
procedure bb_ReplaceDialogClick(Sender: TObject);
procedure bb_DBLookupListClick(Sender: TObject);
procedure bb_DBLookupComboClick(Sender: TObject);
procedure bb_TabSetClick(Sender: TObject);
procedure bb_OutlineClick(Sender: TObject);
procedure bb_TabbedNotebookClick(Sender: TObject);
procedure bb_NotebookClick(Sender: TObject);
procedure bb_HeaderClick(Sender: TObject);
procedure bb_FileListBoxClick(Sender: TObject);
procedure bb_DirectoryListBoxClick(
procedure bb_DriveComboBoxClick(Sender: TObject);
procedure bb_FilterComboBoxClick(Sender: TObject);
procedure bb_IBEventAlerterClick(Sender: TObject);
procedure bb_GaugeClick(Sender: TObject);
procedure bb_ColorGridClick(Sender: TObject);
procedure bb_SpinButtonClick(Sender: TObject);
procedure bb_SpinEditClick(Sender: TObject);
procedure bb_DirectoryOutlineClick(
procedure bb_CalendarClick(Sender: TObject);
procedure bb_ShellTreeViewClick(Sender: TObject);
procedure bb_ShellComboBoxClick(Sender: TObject);
procedure bb_ShellListViewClick(Sender: TObject);
procedure bb_ShellChangeNotifierClick(
procedure bb_ChartfxClick(Sender: TObject);
procedure bb_VSSpellClick(Sender: TObject);
procedure bb_F1BookClick(Sender: TObject);
procedure bb_VtChartClick(Sender: TObject);
procedure bb_COMAdminCatalogClick(
procedure bb_IBConfigServiceClick(
procedure bb_IBBackupServiceClick(
procedure bb_IBRestoreServiceClick(
procedure bb_IBValidationServiceClick(
procedure bb_IBStatisticalServiceClick(
procedure bb_IBLogServiceClick(Sender: TObject);
procedure bb_IBSecurityServiceClick(
procedure bb_IBServerPropertiesClick(
procedure bb_IBLicensingServiceClick(
procedure bb_IBInstallClick(Sender: TObject);
procedure bb_IBUnInstallClick(Sender: TObject);
procedure bb_IdTCPClientClick(Sender: TObject);
procedure bb_IdUDPClientClick(Sender: TObject);
procedure bb_IdDayTimeClick(Sender: TObject);
procedure bb_IdDNSResolverClick(Sender: TObject);
procedure bb_IdEchoClick(Sender: TObject);
procedure bb_IdFingerClick(Sender: TObject);
procedure bb_IdFTPClick(Sender: TObject);
procedure bb_IdGopherClick(Sender: TObject);
procedure bb_IdHTTPClick(Sender: TObject);
procedure bb_IdIcmpClientClick(Sender: TObject);
procedure bb_IdPOP3Click(Sender: TObject);
procedure bb_IdNNTPClick(Sender: TObject);
procedure bb_IdQOTDClick(Sender: TObject);
procedure bb_IdSMTPClick(Sender: TObject);
procedure bb_IdSNTPClick(Sender: TObject);
procedure bb_IdTelnetClick(Sender: TObject);
procedure bb_IdTimeClick(Sender: TObject);
procedure bb_IdTrivialFTPClick(Sender: TObject);
procedure bb_IdWhoisClick(Sender: TObject);
procedure bb_IdTCPServerClick(Sender: TObject);
procedure bb_IdUDPServerClick(Sender: TObject);
procedure bb_IdChargenServerClick(
procedure bb_IdDayTimeServerClick(
procedure bb_IdDictServerClick(Sender: TObject);
procedure bb_IdDiscardServerClick(
procedure bb_IdEchoServerClick(Sender: TObject);
procedure bb_IdFingerServerClick(Sender: TObject);
procedure bb_IdGopherServerClick(Sender: TObject);
procedure bb_IdHostNameServerClick(
procedure bb_IdHTTPServerClick(Sender: TObject);
procedure bb_IdIMAP4ServerClick(Sender: TObject);
procedure bb_IdIRCServerClick(Sender: TObject);
procedure bb_IdMappedPortTCPClick(
procedure bb_IdNNTPServerClick(Sender: TObject);
procedure bb_IdQOTDServerClick(Sender: TObject);
procedure bb_IdSimpleServerClick(Sender: TObject);
procedure bb_IdTelnetServerClick(Sender: TObject);
procedure bb_IdTimeServerClick(Sender: TObject);
procedure bb_IdTrivialFTPServerClick(
procedure bb_IdTunnelMasterClick(Sender: TObject);
procedure bb_IdTunnelSlaveClick(Sender: TObject);
procedure bb_IdWhoIsServerClick(Sender: TObject);
procedure bb_IdAntiFreezeClick(Sender: TObject);
procedure bb_IdDateTimeStampClick(
procedure bb_IdIPWatchClick(Sender: TObject);
procedure bb_IdLogDebugClick(Sender: TObject);
procedure bb_IdMessageClick(Sender: TObject);
procedure bb_IdNetworkCalculatorClick(
procedure bb_IdThreadMgrDefaultClick(
procedure bb_IdThreadMgrPoolClick(
procedure bb_IdVCardClick(Sender: TObject);
procedure bb_IdIMFDecoderClick(Sender: TObject);
procedure bb_
procedure bb_
procedure bb_IdBase64EncoderClick(
procedure bb_IdBase64DecoderClick(
procedure bb_IdUUEncoderClick(Sender: TObject);
procedure bb_IdUUDecoderClick(Sender: TObject);
procedure bb_IdXXEncoderClick(Sender: TObject);
procedure bb_IdXXDecoderClick(Sender: TObject);
procedure bb_IdCoderMD2Click(Sender: TObject);
procedure bb_IdCoderMD4Click(Sender: TObject);
procedure bb_IdCoderMD5Click(Sender: TObject);
procedure bb_
procedure b_
procedure b_findClick(Sender: TObject);
procedure b_fileClick(Sender: TObject);
procedure b_printClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
f_main: Tf_main;
implementation
{$R *.DFM}
function
finding(p1:string;p2:string):
var
f : TextFile;
s : string;
sr : string;
begin
AssignFile(f,p1);
Reset(f);
repeat
ReadLn(f,s);
sr:=copy(s,length(p2)+3,
until pos(p2+' - ',s)>0;
CloseFile(f);
finding:=sr;
end;
procedure Tf_main.bb_FramesClick(Sender: TObject);
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure Tf_main.bb_EditClick(Sender: TObject);
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_MainMenuClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_PopupMenuClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure Tf_main.bb_LabelClick(Sender: TObject);
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure Tf_main.bb_MemoClick(Sender: TObject);
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure Tf_main.bb_ButtonClick(Sender: TObject);
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_CheckBoxClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_RadioButtonClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_ListBoxClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_ComboBoxClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_ScrollBarClick(
begin
m_help.Clear;
m_help.Lines.Add(finding('
end;
procedure
Tf_main.bb_GroupBoxClick(
begin
m_help.Clear;
Информация о работе Разработка эскизного и технического проектов программы