interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, XPMan, ExtCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Edit1: TEdit;
Button1: TButton;
Button2: TButton;
Edit2: TEdit;
Image1: TImage;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit3, Unit2;
{$R *.dfm}
procedure TForm1.Button2Click(Sender: TObject);
begin
Close;
procedure TForm1.Button1Click(Sender: TObject);
DataModule2.ADOConnection1.Connected := True;
DataModule2.ADOConnection1.Connected := False;
DataModule2.ADOConnection1.ConnectionString:=
'Provider=SQLOLEDB.1;'+
'Password='+Edit2.Text+';'+
'Persist Security Info=True;'+
'User ID='+Edit1.Text+';'+
'Initial Catalog=Studio;'+
'Data Source=KIMMERIY\SERGIO';
try
except
Form1.Tag := Form1.Tag - 1;
If Form1.Tag<>0 then
Begin
ShowMessage('Ви невірно ввели ім"я користувача або пароль!!! У вас залишилося '+IntToStr(Form1.Tag)+' спроби. ');
End
Else
ShowMessage('Ви не користувач системи !!!');
End;
If DataModule2.ADOConnection1.Connected then
DataModule2.ADOT1.Active := True;
DataModule2.ADOT2.Active := True;
DataModule2.ADOT3.Active := True;
DataModule2.ADOT4.Active := True;
DataModule2.ADOT5.Active := True;
DataModule2.ADOT6.Active := True;
DataModule2.ADOTable1.Active := True;
DataModule2.ADOTable2.Active := True;
DataModule2.ADOTable3.Active := True;
DataModule2.ADOTable4.Active := True;
DataModule2.ADOTable5.Active := True;
DataModule2.ADOTable6.Active := True;
DataModule2.ADOTable7.Active := True;
DataModule2.ADOTable8.Active := True;
DataModule2.ADOTable9.Active := True;
Form1.Label1.Visible:=False;
Form1.Label2.Visible:=False;
Form1.Label3.Visible:=False;
Form1.Edit1.Visible:=False;
Form1.Edit2.Visible:=False;
Form1.Button1.Visible:=False;
Form1.Button2.Visible:=False;
Form1.Align := alClient;
Image1.Visible := True;
Form3.ShowModal;
procedure TForm1.FormActivate(Sender: TObject);
Image1.Visible := False;
end.
Доступ до робочої бази даних повністю заблоковано для обліковий записів Microsoft SQL Server крім розробника системи.
Текст програми - див. графічні матеріали.
3.5 Інструкція користувача системи
Розроблена програма має зручний інтерфейс і є простою в користуванні.
Після запуску програми та введення логіну та паролю, з'являється головне меню
При виборі пункту меню "Проекти" завантажиться журнал проектів
Меню «Проекти» дозволяє переглянути, добавити та відредагувати інформацію по проектам, перейти до задач по проектам, прогнянути контрагентів по проектам, добавити надходженні кошти.
Кнопка плюс біля поля Тип проекту відкриває вікно Довідника типів проекту
Вікно типів проекту
Кнопка плюс біля поля Стадії проекту відкриває вікно Довідника стадій проекту
Вікно стадій проекту
Форма формування переліку задач по обраному проекту.
Поле задача: Назва задачі в дужках її виконавець.
Опис: Короткий опис задачі
Дата оплати и Дата доплати це поля в яких заносимо кошти які будемо перераховувати виконавцю задачі
Для додавання задачі натискаємо «Добавити» з'являється наступне вікно
В даній формі обираємо спочатку Вид послуги. Як тільки оберемо вид послуги автоматично відобразиться перелік виконавців, які її можуть виконати. В полі вартість послуги буде відображатися вартість послуги, якщо вона є фіксованою. Необхідно обрати Виконавця та натиснути кнопку Вибрати. Ця форма закриється та в попередній формі внесеться обрана задача, яка буде відображатися в полі Задача у вигляді виду послуги та в дужках її виконавець.
Вікно для введення параметрів пошуку по проектах, яке викликається з форми Проекти натиснувши кнопку пошук. В поля Назва проекту та Адреса можна ввести не повністю певне значення, а його частину.
Виводиться вікно з переліком знайдених проектів. Обираємо потрібний та натискаємо Перейти і ми переходимо до вікна Проекти в якому буде відображена інформація про необхідний проект
Форма для внесення записів про надходження коштів по проекту від замовника, викликається натисканням кнопки Надходження коштів.
В головному меню при натисканні кнопки звіти з'являється вікно
При натисканні кнопки Проекти з'являється наступне вікно
При натисканні кнопки Контрагенти з'являється наступне вікно
Варто відзначити, що в програмі можливо робити копіювання/вставку в будь-яких полях талицы й текстових полях. Щоб зробити копіювання виділите текст і натисніть Ctrl+c. Вставка відбувається за допомогою клавіш Ctrl+v. Також копіювання/вставку можна производитс допомогою контекстного меню, викликуваного натисканням правої кнопки миші на відповідний осередок.
Не завжди всі заголовки таблиці вміщаються у видимій області. Для цього існує горизонтальне прокручування. При натисканні на символ /, буде зроблене прокручування вправо. Якщо нажати на символ /- то вліво. Те ж саме ставиться й до вертикального прокручування.
Для додавання нового запису натисніть кнопку "Додати". У таблиці з'явиться порожній запис, у неї заносяться новы дані.
Вийти з будь-якого вікна програми можна декількома способами:
- нажати на кнопку Вихід у правому нижньому куті вікна;
- нажати на значок /у правому верхньому куті вікна;
- просто вийти із програми.
Розділ 4. Комп'ютерні мережі
На сьогоднішній день у світі існує більш 130 мільйонів комп'ютерів і більше 80 % із них об'єднані в різноманітні інформаційно-обчислювальні мережі від малих локальних мереж в офісах до глобальних мереж типу Internet. Всесвітня тенденція до об'єднання комп'ютерів у мережі обумовлена рядом важливих причин, таких як прискорення передачі інформаційних повідомлень, можливість швидкого обміну інформацією між користувачами, одержання і передача повідомлень (факсів, E - Mail листів і іншого ) не відходячи від робочого місця, можливість миттєвого одержання будь-якої інформації з будь-якої точки земної кулі, а так само обмін інформацією між комп'ютерами різних фірм виробників, що працюють під управлінням різного програмного забезпечення.
Під ЛОМ розуміють спільне підключення декількох окремих комп'ютерних робочих станцій до єдиного каналу передачі даних. Завдяки обчислювальним мережам з'явилась можливість одночасного використання програм і баз даних декількома користувачами.
Поняття - локальна обчислювальна мережа - ЛОМ (англ. LAN - Lokal Area Network) відноситься до географічно обмеженого (територіально або виробничо) апаратно-програмним реалізаціям, у котрих декілька комп'ютерних систем з'язані одна з одною за допомогою відповідних засобів комунікацій. Завдяки такому з'єднанню користувач може взаємодіяти з іншими робочими станціями, залученими до цієї ЛОМ.
У виробничої практиці ЛОМ грають дуже велику роль. За допомогою ЛОМ у систему об'єднуються персональні комп'ютери, що розташовані на багатьох віддалених робочих місцях, що використовують спільне обладнання, програмні засоби й інформацію. Робочі місця співробітників перестають бути ізольованими й об'єднуються в єдину систему.
Переваги, які одержують при мережному об'єднанні персональних комп'ютерів у вигляді внутрішньої виробничої обчислювальної мережі, полягають в наступному:
Розподіл ресурсів.
Розподіл ресурсів дозволяє ощадливо використовувати ресурси, наприклад, управляти периферійними пристроями, такими як лазерні друкувальні пристрої, із усіх приєднаних робочих станцій.
Розподіл даних.
Розподіл даних надає можливість доступу і керування базами даних із периферійних робочих місць, що потребують інформації.
Розподіл програмних засобів.
Розподіл програмних засобів надає можливість одночасного використання централізованих, раніше встановлених програмних засобів.
Розподіл ресурсів процесора.
При розподілі ресурсів процесора можливе використання обчислювальних потужностей для опрацювання даних іншими системами, що входять у мережу. Надана можливість полягає в тому, що до наявних ресурсів отримують доступ не моментально, а тільки лише через спеціальний процесор, доступний кожній робочій станції.
Багатокористувальний режим.
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13
