Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые обзорные » Створення ІС з обліку відомостей про обчислювальної техніки на підприємстві

Реферат Створення ІС з обліку відомостей про обчислювальної техніки на підприємстві





"justify"> end; TFor mВІ . Button1Click (Sender: TObject); d, s, f: integer;

// кнопка додати

form ВІ . Hide;

form5.show;. Edit2. Text: =''; mВІ . ADOQuery1.SQL. Text: = 'SELECT * FROM roomlist'; mВІ . ADOQuery1. Active: = True; d: = 1 to For mВІ . ADOQuery1. RecordCount do. ComboBox1. Items. Add (For mВІ . ADOQuery1. FieldbyName ('number'). Value); mВІ . ADOQuery1. Next;

////////////////////////////////////////// //////////////////////////// mВІ . ADOQuery2.SQL. Text: = 'SELECT * FROM hardtype'; mВІ . ADOQuery2. Active: = True; s: = 1 to For mВІ . ADOQuery2. RecordCount do. ComboBox2. Items. Add (For mВІ . ADOQuery2. FieldbyName ('name'). Value); mВІ . ADOQuery2. Next;

////////////////////////////////////////// //////////////////////////////////// mВІ < span align = "justify">. ADOQuery3.SQL. Text: = 'SELECT * FROM Polzovateli'; mВІ . ADOQuery3. Active: = True; f: = 1 to For mВІ . ADOQuery3. RecordCount do. ComboBox3. Items. Add (For mВІ . ADOQuery3. FieldbyName ('FIO'). Value); mВІ . ADOQuery3. Next;; end; end; end;

// вирівнювання форми по центру екранаTFor mВІ . FormShow (Sender: TObject);: = (screen. Width -Width) div 2;: = (Screen. Height-Height) div 2;; TFor mВІ . Button4Click (Sender: TObject);, Sheet, Colum: Variant;, i: Integer;: = CreateOleObject ('Excel. Application');. Visible: = true;

. Workbooks. Add (-4167);. Workbooks [1]. Worksheets [1]. Name: = 'Звіт';: = XLApp. Workbooks [1]. Worksheets ['Звіт']. Columns;. Columns [1]. ColumnWidth: = 20;. Columns [2]. ColumnWidth: = 20;. Columns [3]. ColumnWidth: = 20;. Columns [4]. C...


Назад | сторінка 11 з 17 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Phonetic peculiarities of the popular science text
  • Реферат на тему: Grammar of the Text: its Basic Units and Main Features (based on the novel ...
  • Реферат на тему: Технології аналізу даних (Text Mining, Data Mining)
  • Реферат на тему: Зміст і методика показників форми №2 &Звіт про прибутки і збитки&
  • Реферат на тему: Звіт з практики на підприємстві з постачання обладнання та програмного забе ...