Проектирование параллельных алгоритмов в задачах идентификации. Вашкевич Н.П - 44 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

44
void __fastcall DriveComboBox1Change(TObject *Sender);
void __fastcall DirectoryListBox1Change(TObject *Sender);
void __fastcall FileListBox1Change(TObject *Sender);
private: // User declarations
bool file;
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
main.cpp - главная форма приложения "Выбор диска и каталога"
//---------------------------------------------------------------------------
#include <vcl.h
#pragma hdrstop
#include "main.h"
#include "result.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cdiroutl"
#pragma link "DriveComboBox1"
#pragma link "DriveComboBox1"
#pragma link "DirectoryListBox1"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
file=false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Release();
Application-Terminate();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OKBottomDlg=new TOKBottomDlg(Application,Edit1-Text.c_str(),file);
OKBottomDlg-ShowModal();
delete OKBottomDlg;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DriveComboBox1Change(TObject *Sender)
{
DirectoryListBox1-Drive = DriveComboBox1-Drive;
FileListBox1-Drive = DriveComboBox1-Drive;
FileListBox1-Directory = DirectoryListBox1-Directory;
Edit1-Text=DirectoryListBox1-Directory;
file=false;
}
//--------------------------------------------------------------------------- 
void __fastcall DriveComboBox1Change(TObject *Sender);
void __fastcall DirectoryListBox1Change(TObject *Sender);
void __fastcall FileListBox1Change(TObject *Sender);
private: // User declarations
bool file;
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
main.cpp - главная форма приложения "Выбор диска и каталога"
//---------------------------------------------------------------------------
#include

Страницы