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

Реферат База даних "Серіали"





Поіскnot (Edit1.Text="") then.SQL.Add («WHERE Name like"%" + Edit1.Text +"% »») ;. SQL.Add («OR NameOrig like"%" + Edit1.Text +"% »»);. SQL.Add («OR Country like"%" + Edit1.Text + «%» »);. SQL.Add (« OR CreatedBy like" %" + Edit1.Text +" %» »);. SQL.Add (« OR Chanel like « % »+ Edit1.Text +"% »»);;

/ / Сортіровкаnot (FieldName="") and (Pos (FieldName, CheckString)> 0) then.SQL.Add («ORDER BY» + FieldName); (SortedAsc= 1) then Query1.SQL.Add («ASC») if (SortedAsc=2) then Query1.SQL.Add («DESC»);;. Prepare;. Open;. FillingColums (Form3.DBGrid1); i:=0 to DBGrid1.Columns.Count - 1 doFieldName=DBGrid1.Columns [i]. FieldName thenSortedAsc=1 then.Columns [i]. Title.Caption:=DBGrid1.Columns [i]. Title.Caption + «/ «; SortedAsc=2 then.Columns [i]. Title.Caption:=DBGrid1.Columns [i]. Title.Caption +» / «;;;; TForm3.FormCreate (Sender: TObject);:=0;: =» »;

/ / ExecuteSQL;; TForm3.Edit1KeyUp (Sender: TObject; var Key: Word;: TShiftState);;; TForm3.BitBtn1Click (Sender: TObject);:=«»;:= 0;;; TForm3.FormShow (Sender: TObject);. TableMy.Active:=False;. TableMy.Active:=True;;; TForm3.Button1Click (Sender: TObject);. Checked:=true;. Checked:= true;. Checked:=true;. Checked:=true;;; TForm3.CheckBox1Click (Sender: TObject);;; TForm3.CheckBox2Click (Sender: TObject);;; TForm3.CheckBox3Click (Sender: TObject);;; TForm3 . CheckBox4Click (Sender: TObject);;; TForm3.CheckBox5Click (Sender: TObject);. Enabled:=not CheckBox5.Checked;. Enabled:=not CheckBox5.Checked;. Enabled:=not CheckBox5.Checked;. Enabled:= not CheckBox5.Checked;;;.

В.4.

unit Unit4;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, ExtCtrls, MPlayer, StdCtrls, DBCtrls, ExtDlgs, ComCtrls, Buttons,;=class (TForm): TDBImage; : TOpenPictureDialog;: TDBNavigator;: TDBText;: TLabel;: TDBRichEdit;: TBitBtn;: TBitBtn;: TFontDialog;: TLabel;: TLabel;: TLabel;: TLabel;: TDBEdit;: TDBEdit;: TDBEdit;: TDBEdit;: TLabel ;: TBitBtn;: TLabel; FormClose (Sender: TObject; var Action: TCloseAction); BitBtn1Click (Sender: TObject); BitBtn2Click (Sender: TObject); BitBtn3Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm5; Unit1;

{$ R *. dfm} TForm5.FormClose (Sender: TObject; var Action: TCloseAction);. Hide;. Show;; TForm5.BitBtn1Click (Sender: TObject); OpenPictureDialog1.Execute then.TableMy.Edit;.Picture.LoadFromFile(OpenPictureDialog1.FileName);.TableMy.Post;;;TForm5.BitBtn2Click(Sender: TObject); FontDialog1.Execute then.SelAttributes.Assign (FontDialog1.Font);. SetFocus;; TForm5.BitBtn3Click (Sender: TObject);. Hide;. Show;

end;.


Назад | сторінка 9 з 9





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

  • Реферат на тему: 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)
  • Реферат на тему: Phraseological unit as a newspaper title
  • Реферат на тему: Прикладне додаток &Розробка проекту для створення нового класу Auto і елеме ...