Проектирование автоматизированного электронного каталога

Form2->DBEdit2->DataField="";

Form2->DBEdit3->DataField="";

Form2->DBEdit4->DataField="";

Form2->DBEdit5->DataField="";

Form2->DBEdit6->DataField="";

Form2->DBEdit7->DataField="";

Form2->DBEdit8->DataField="";

Form2->DBEdit9->DataField="";

Form2->DBEdit10->DataField="";

Form2->DBEdit11->DataField="";

Form2->DBEdit12->DataField="";

Form2->DBEdit13->DataField="";

Form2->DBEdit14->DataField="";

Table1->IndexFieldNames = "";

Form2->DBImage1->DataField="";

Form2->ComboBox1->Items->Clear();

Form2->Table1->Active = false;

Form2->Close();

Edit1->Clear();

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Button6Click(TObject *Sender)

{

Table1->Edit();

if (OpenPictureDialog1->Execute())

DBImage1->Picture->LoadFromFile(OpenPictureDialog1->FileName);

Table1->Post();

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Button8Click(TObject *Sender)

{

Table1->Edit();

TMemoryStream* strm = new TMemoryStream();

DBImage1->Picture->Graphic->SaveToStream(strm);

((TGraphicField*)Form2->Table1->FieldByName("RISUNOK"))->LoadFromStream(strm);

deletestrm;

Form2->Table1->Post();

}

//---------------------------------------------------------------------------

Unit3.h

//---------------------------------------------------------------------------

#ifndef Unit3H

#define Unit3H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <DB.hpp>

#include <DBTables.hpp>

#include <FMTBcd.hpp>

#include <SqlExpr.hpp>

#include <DBGrids.hpp>

#include <Grids.hpp>

//---------------------------------------------------------------------------

class TForm3 : public TForm

{

__published: // IDE-managed Components

TButton *Button1;

TMemo *Memo1;

TLabel *Label1;

TDBGrid *DBGrid1;

TQuery *Query1;

TDataSource *DataSource1;

TButton *Button2;

TButton *Button3;

TLabel *Label2;

void __fastcall Button1Click(TObject *Sender);

void __fastcall Button2Click(TObject *Sender);

void __fastcall Button3Click(TObject *Sender);

private: // User declarations

public: // User declarations

__fastcallTForm3(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm3 *Form3;

//---------------------------------------------------------------------------

#endif

Unit3.cpp

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit3.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm3 *Form3;

//---------------------------------------------------------------------------

__fastcall TForm3::TForm3(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm3::Button1Click(TObject *Sender)

{

Query1->Close();

Query1->SQL->Clear();

Query1->SQL = Memo1->Lines;

Query1->Open();

}

//---------------------------------------------------------------------------

void __fastcall TForm3::Button2Click(TObject *Sender)

{

Query1->Close();

Query1->SQL->Clear();

Memo1->Lines->Clear();

}

//---------------------------------------------------------------------------

void __fastcall TForm3::Button3Click(TObject *Sender)

{

Query1->Close();

Form3->Close();

}

//---------------------------------------------------------------------------

Размещено на Allbest.ru