Show; end; procedure TForm6


перейти к полному списку дипломных проектов

Ссылка на скачивания файла в формате .doc находится в конце странички

Show; end; procedure TForm6

Visible:=true;

dbgrid1.Columns[5].Visible:=true;

dbgrid1.Columns[6].Visible:=true;

dbgrid1.Columns[7].Visible:=true;

dbgrid1.Columns[8].Visible:=true;

dbgrid1.Columns[9].Visible:=true;

dbgrid1.Columns[10].Visible:=true;

dbgrid1.Columns[11].Visible:=true;

dbgrid1.Columns[12].Visible:=true;

form2.show;

form6.Hide;

form6.bsSkinButton2.Visible:=false;

end;

procedure TForm6.bsSkinButton2Click(Sender: TObject);

begin

form7.DataSource1.DataSet:=datamodule4.ADOQuery3;

form7.Show;

end;

procedure TForm6.bsSkinButton3Click(Sender: TObject);

begin

datamodule4.RvProject3.Execute;

end;

end.

unit Unit7; //форма досрочного снятия сотрудника

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, Mask, DBCtrls, DB, ComCtrls, bsSkinCtrls, bsSkinData,

BusinessSkinForm;

type

TForm7 = class(TForm)

DBEdit1: TDBEdit;

DBEdit2: TDBEdit;

DBEdit3: TDBEdit;

DataSource1: TDataSource;

Edit1: TEdit;

DateTimePicker1: TDateTimePicker;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

bsBusinessSkinForm1: TbsBusinessSkinForm;

bsSkinData1: TbsSkinData;

bsCompressedStoredSkin1: TbsCompressedStoredSkin;

bsBusinessSkinForm2: TbsBusinessSkinForm;

bsSkinData2: TbsSkinData;

bsCompressedStoredSkin2: TbsCompressedStoredSkin;

bsBusinessSkinForm3: TbsBusinessSkinForm;

bsSkinData3: TbsSkinData;

bsCompressedStoredSkin3: TbsCompressedStoredSkin;

bsBusinessSkinForm4: TbsBusinessSkinForm;

bsSkinData4: TbsSkinData;

bsCompressedStoredSkin4: TbsCompressedStoredSkin;

bsSkinButton1: TbsSkinButton;

bsSkinButton2: TbsSkinButton;

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure bsSkinButton1Click(Sender: TObject);

procedure bsSkinButton2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form7: TForm7;

implementation

uses Unit4, Unit6, Unit5;

{$R *.

скачать бесплатно Организационно-экономическая сущность задачи

Содержание дипломной работы

Еще несколько лет назад было редкостью увидеть какой-нибудь персональный компьютер – они были, но были очень дорогие, и даже не каждая фирма могла иметь у себя в офисе компьютер
В графической части проекта представлены: диаграмма вариантов использования, диаграмма классов, диаграмма последовательности и диаграмма деятельности
В ее основе лежит идея отделения процесса разработки от процесса создания отчета за счет использования промежуточного документа, который называется проектом отчета
Кроме того, Delphi включает в себя локальный сервер Interbase для того, чтобы можно было разработать расширяемые на любые внешние SQL-сервера приложения в офлайновом режиме
Мощность множества кортежей отношения называют мощностью отношения
1 – Главное окно программы На главном окне есть три вкладки с тремя таблицами: информация о сотрудниках УВД, областных сотрудниках и сотрудниках снятых с учета
Взаимосвязь процедур используется как для возможности дальнейшей обработки уже обработанной информации другими процедурами, так и для возможности существования некоторых процедур по средствам других
Value; datamodule4
, нами было разработано и проведено 6 занятий по 3D моделированию, позволяющих изучить основы 3D моделирования
Add('select * from Pract'); //выбирает все данные из таблицы Sotr1 SQL
ADOQuery2Datapr
IsEmpty then exit; if datamodule4
ОПИСАНИЕ ПРОГРАММНОГО СРЕДСТВА 4
Проверка степени этих правил проводится без использования объектного кода программы путем формального анализа текста программы на языке программирования
С помощью встроенного компилятора были обнаружены синтаксические ошибки, которые тут же исправлялись с помощью встроенного редактора текста программы
Программа найдет широкое применение не только среди работников отдела кадров, но и среди многих сотрудников УВД
: Выш
FormActivate(Sender: TObject); var k:integer; begin with datamodule4
Value; datamodule4
ADOTable2['nomspr']:=datamodule4
ADOQuery1Datapr
ADOQuery2
show; end; procedure TForm2
Delete; datamodule4
ADOTable2; form5
show; end; procedure TForm2
show; end; procedure TForm2
Hide; end; procedure TForm3
ADOQuery1['Dataspr']:=strtodate(s); datamodule4
ADOQuery1['Otc']:=edit3
dfm} procedure TForm5
Columns[3]
Columns[2]
Show; end; procedure TForm6
DataSet
Add('select * from SnVzisk'); //выбирает все данные из таблицы Sotr1 SQL
ActivePage=form2
unit Unit15; //форма информации о программе interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, bsSkinCtrls, bsSkinData, BusinessSkinForm; type TForm15 = class(TForm) bsBusinessSkinForm1: TbsBusinessSkinForm; bsSkinData1: TbsSkinData; bsCompressedStoredSkin1: TbsCompressedStoredSkin; bsSkinButton1: TbsSkinButton; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; procedure bsSkinButton1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form15: TForm15; implementation {$R *

заработать

Закачай файл и получай деньги