Реферат Проектування автоматизованого електронного каталогу

------------------

# ifndef Unit2H

# define Unit2H

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

# include

# include

# include

# include

# include

# include

# include

# include

# include

# include

# include

# include

# include

# include

// ---------------------------------------- ----------------------------------- TForm2: public TForm

{

__published: // IDE-managed Button1Click (TObject * Sender); __fastcall Button2Click (TObject * Sender); __fastcall Button3Click (TObject * Sender); __fastcall Button4Click (TObject * Sender); __fastcall Button5Click (TObject * Sender); __fastcall Button6Click (TObject * Sender); __fastcall Button8Click ( TObject * Sender);: // User declarations: // User declarations

__fastcallTForm2 (TComponent * Owner);

};

// ---------------------------------------- ----------------------------------- PACKAGE TForm2 * Form2;

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

# endif

Unit2.cpp

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

# include

# pragma hdrstop

# include "Unit2.h"

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

# pragma package (smart_init)

# pragma resource "*. dfm" * Form2;

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

__fastcall TForm2 :: TForm2 (TComponent * Owner)

: TForm (Owner)

{

}

{-> Next (); (; Table1-> FieldByName (ComboBox1-> Text) -> AsString! = -> Edit1-> Text ;)

{-> Table1-> Next (); (Form2-> Table1-> Eof)

{("Нічегоненайдено!");;

}

}