Высокоуровневые методы информатики и программирования

{

  int pr=0;

  int i=0;

  CFile file (KolvoFile, CFile::modeRead|CFile::modeCreate|

CFile::modeNoTruncate);

  DWORD nom;

  nom=file.GetLength();

  nom=nom/25;

  file.Close();

  for(i=0;i<int(nom);i++)

  {

    ChtenieZap(i);

    init_ind(i,Kod);

    if (Kod!="")

    {

      fact_kol++;

      pr=1;

    }

  }

  init_kol(nom);

  return;

}

void CKolvo::Zamena(int nomer)

{

  ZapisZap(nomer);

  cor_ind(nomer,Kod);

}

void CKolvo::Udalenie(int nomer)

{

  Kod="";

  Kolvo="";

  Naim2="";

  ZapisZap(nomer);

  cor_ind(nomer,Kod);

  cor_ind(nomer,Kolvo);

  cor_ind(nomer,Naim2);

} 
 
 

Класс CFilesDlg 

Файл заголовков FilesDlg.h

#if !defined(AFX_FILESDLG_H__D4C2D396_ABD6_4172_B132_3223FC2A6466__INCLUDED_)

#define AFX_FILESDLG_H__D4C2D396_ABD6_4172_B132_3223FC2A6466__INCLUDED_ 

#if _MSC_VER > 1000

#pragma once

#endif // _MSC_VER > 1000

// FilesDlg.h : header file

// 

/////////////////////////////////////////////////////////////////////////////

// CFilesDlg dialog 

class CFilesDlg : public CDialog

{

// Construction

public:

      CString m_strFileKolvo;

      CString m_strFileKodd;

      CFilesDlg(CWnd* pParent = NULL);   // standard constructor 

// Dialog Data

      //{{AFX_DATA(CFilesDlg)

      enum { IDD = IDD_FILESDLG };

            // NOTE: the ClassWizard will add data members here

      //}}AFX_DATA 
 

// Overrides

      // ClassWizard generated virtual function overrides

      //{{AFX_VIRTUAL(CFilesDlg)

      public:

      protected:

      virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support

      //}}AFX_VIRTUAL 

// Implementation

protected: 

      // Generated message map functions

      //{{AFX_MSG(CFilesDlg)

      afx_msg void OnButtonKodd();

      afx_msg void OnButtonKolvo();

      virtual void OnOK();

      virtual void OnCancel();

      virtual BOOL OnInitDialog();

      //}}AFX_MSG

      DECLARE_MESSAGE_MAP()

}; 

//{{AFX_INSERT_LOCATION}}

// Microsoft Visual C++ will insert additional declarations immediately before the previous line. 

#endif // !defined(AFX_FILESDLG_H__D4C2D396_ABD6_4172_B132_3223FC2A6466__INCLUDED_) 
 

Файл заголовков FilesDlg.cpp

// FilesDlg.cpp : implementation file

// 

#include "stdafx.h"

#include "Kurs.h"

#include "FilesDlg.h"

extern CString KoddFile;

extern CString KolvoFile;

#ifdef _DEBUG

#define new DEBUG_NEW

#undef THIS_FILE

static char THIS_FILE[] = __FILE__;

#endif 

/////////////////////////////////////////////////////////////////////////////

// CFilesDlg dialog 
 

CFilesDlg::CFilesDlg(CWnd* pParent /*=NULL*/)

      : CDialog(CFilesDlg::IDD, pParent)

{ 

      //{{AFX_DATA_INIT(CFilesDlg)

            // NOTE: the ClassWizard will add member initialization here

      //}}AFX_DATA_INIT

} 
 

void CFilesDlg::DoDataExchange(CDataExchange* pDX)

{

      CDialog::DoDataExchange(pDX);

      DDX_Text (pDX, IDC_FILEKodd, m_strFileKodd);

      DDX_Text (pDX, IDC_FILEKolvo, m_strFileKolvo);

      //{{AFX_DATA_MAP(CFilesDlg)

            // NOTE: the ClassWizard will add DDX and DDV calls here

      //}}AFX_DATA_MAP

} 
 

BEGIN_MESSAGE_MAP(CFilesDlg, CDialog)

      //{{AFX_MSG_MAP(CFilesDlg)

      ON_BN_CLICKED(IDC_BUTTONKodd, OnButtonKodd)

      ON_BN_CLICKED(IDC_BUTTONKolvo, OnButtonKolvo)

      //}}AFX_MSG_MAP

END_MESSAGE_MAP() 

/////////////////////////////////////////////////////////////////////////////

// CFilesDlg message handlers 

void CFilesDlg::OnButtonKodd()

{

      // TODO: Add your control notification handler code here

        CString strKodd;

  static char Filter[]="Kodd Files(*.Kodds)|*.Kodds||";//фильтр имен ф.

  CFileDialog dialog(TRUE, "*.Kodds", strKodd, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, Filter);//откр. диал. окна

  if (dialog.DoModal()==IDOK)//вывод диалог. окна

  {

    strKodd=dialog.GetPathName();//возвр. имя файла с указ. пути

    m_strFileKodd=strKodd;

    UpdateData(FALSE);//заносит в текст. поле знач. перем.m_str

  } 

} 

void CFilesDlg::OnButtonKolvo()

{

      // TODO: Add your control notification handler code here

        CString strKolvo;

  static char Filter[]="Kolvo Files (*.Kolvos)|*.Kolvos||";

  CFileDialog dialog (TRUE,"*.Kolvos",strKolvo,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,Filter);

  if (dialog.DoModal()==IDOK)

  {

    strKolvo=dialog.GetPathName();

    m_strFileKolvo=strKolvo;

    UpdateData(FALSE);//значения перем. m_str… в текстовое поле

  } 

} 

void CFilesDlg::OnOK()

{

      // TODO: Add extra validation here

      UpdateData(TRUE);// знач. текст. поля - в переменную m_str…

    KoddFile=m_strFileKodd;//знач. перем. m_str…присваиваются

    KolvoFile=m_strFileKolvo; // перем. файла MainFrm.cpp

    EndDialog(1);//устан. флажка закрытия файла, 1 - в DoModal() 

      CDialog::OnOK();

} 

void CFilesDlg::OnCancel()

{

      // TODO: Add extra cleanup here

      OnOK();//фиксирование данных блока диалога и обновление переменных приложения

      CDialog::OnCancel();

} 
 

BOOL CFilesDlg::OnInitDialog()

{

      CDialog::OnInitDialog(); 

      // TODO: Add extra initialization here

        m_strFileKodd=KoddFile;//имена файлов присваиваются переменным

     m_strFileKolvo=KolvoFile;//m_str…класса

     UpdateData(FALSE);//заносит в текст. поле значения перем. m_str. 

      return TRUE;  // return TRUE unless you set the focus to a control

                    // EXCEPTION: OCX Property Pages should return FALSE

} 
 

Класс CKoddDobDlg 

Файл заголовков KoddDobDlg.h

#if !defined(AFX_KoddDOBDLG_H__F819696A_2BD0_42D4_B619_76B185D53903__INCLUDED_)

#define AFX_KoddDOBDLG_H__F819696A_2BD0_42D4_B619_76B185D53903__INCLUDED_ 

#if _MSC_VER > 1000

#pragma once

#endif // _MSC_VER > 1000

// KoddDobDlg.h : header file

//

#include "Kodd.h"

/////////////////////////////////////////////////////////////////////////////

// CKoddDobDlg dialog 

class CKoddDobDlg : public CDialog

{

// Construction

public:

      CKoddDobDlg(CWnd* pParent = NULL);   // standard constructor

      CKodd base;