Высокоуровневые методы информатики и программирования. Сивохин А.В - 110 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

87
private
{ Private declarations }
public
{ Public declarations }
end;
var
OrlovProductsForm: TOrlovProductsForm;
implementation
{$R *.dfm}
Initialization
end.//—11. Конец модуля для работы с таблицей “Изделия”.
*
unit OrlovAuctionsUnit;//—12. Модуль для работы с таблицей
“Аукционы”:
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DBCtrls, Grids, DBGrids, DB, DBTables, ExtCtrls;
type
TOrlovAuctionsForm = class(TForm)
OrlovAuctionsPanel1: TPanel;
OrlovAuctionsPanel2: TPanel;
OrlovAuctionsTable: TTable;
OrlovAuctionsDataSource: TDataSource;
OrlovAuctionsDBGrid: TDBGrid;
OrlovAuctionsDBNavigator: TDBNavigator;
private
{ Private declarations }
public
{ Public declarations }
end;
var
OrlovAuctionsForm: TOrlovAuctionsForm;
implementation 
      private
       { Private declarations }
      public
       { Public declarations }
      end;

     var
      OrlovProductsForm: TOrlovProductsForm;

     implementation

     {$R *.dfm}

     Initialization
     end.//—11. Конец модуля для работы с таблицей “Изделия”.



     *

    unit OrlovAuctionsUnit;//—12.         Модуль     для    работы     с    таблицей
“Аукционы”:

     interface

     uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, DBCtrls, Grids, DBGrids, DB, DBTables, ExtCtrls;

     type
      TOrlovAuctionsForm = class(TForm)
       OrlovAuctionsPanel1: TPanel;
       OrlovAuctionsPanel2: TPanel;
       OrlovAuctionsTable: TTable;
       OrlovAuctionsDataSource: TDataSource;
       OrlovAuctionsDBGrid: TDBGrid;
       OrlovAuctionsDBNavigator: TDBNavigator;
      private
       { Private declarations }
      public
       { Public declarations }
      end;

     var
      OrlovAuctionsForm: TOrlovAuctionsForm;

     implementation
87

Страницы