32 урока по Делфи

Предишен ◈ Следващото

Отворете кутията комбо "Object Selector" в горната част на инспектор на обекта - в момента там има два компонента: TForm и TQuery.

Щракнете с десния бутон върху обекта TQuery и от контекстното меню изберете "Fields Editor". Щракнете върху бутона Add - Добавяне на диалоговия прозорец Fields да се появи, както е показано на фигура 1







Тези нови съоръжения ще бъдат използвани за визуално представяне на трапезата на клиента за потребителя.

Ето и пълния списък на обектите, които трябва са създадени:

Това споразумение може да бъде много полезно, когато работите с множество таблици и просто искам да знам, тази променлива се отнася до областта на масата.

Най-важното свойство се нарича стойност. Можете да получите достъп до него, както следва:

процедура TForm1.Button1Click (Sender: TObject);

Кодът е показано тук, първо задайте стойност на променливите г и S. следните два реда се променят тези стойности, а последните две са възложени нови стойности на обекти. Това не прави много смисъл да се напише код, подобен на този в програмата, но този код се използва само за да покаже синтаксис, използван от потомците на TField.

имущество на стойност винаги съответства на типа на полето, за който се отнася. Например при TStringFields - низ, TCurrencyFields - двойно. Въпреки това, ако Вие показвате поле тип TCurrencyField използвайки компонент на "чувствителни данни" (данни наясно: TDBEdit, TDBGrid и т.н.), това ще бъде представена от поредица, като например: "$ 5,00".

Това може да ви накара да мислите, че Delphi внезапно прекъснат силен пишете. След TCurrencyField.Value обявен за двойна, и ако се опитате да зададете низ, можете да получите съобщение за грешка "тип несъответствие" (вид несъответствие). Горният пример показва в действителност свойствата на обекти на визуализация на данни, а не тип отслабване проверка. (Въпреки това е възможно да се получи стойността на областта вече се превръща в друг вид. За тази TField и неговите потомци набор AsString или методи тип AsFloat. Разбира се, трансформацията се случва само, когато има смисъл.)

Ако искате да получите имената на полетата в сегашния набор от данни, а след това го използва FIELDNAME имотния един от двата начина, както е показано по-долу:







Ако искате да получите името на обекта, свързани с областта, а след това трябва да използвате името на собствеността:

Тази програма свързва трите таблици в един-към-много. По-специално, поръчки и предмети, свързани с OrderNo област. и части елементи и свързани чрез поле PartNo. (Таблица поръчките съдържа всички поръчки, в таблицата с ТОЧКИ - предмети, посочени в разпореждането; частите - предмети директория). В програмата можете да се придвижвате таблицата с поръчки и виж, свързани със списъка текущия ред на включените елементи. CALC_ SUM програма е доста сложно, но добре илюстрира силата на изчислените полета.

Последователността на създаване CALC_SUM проект:
  • Създаване на нов проект (File | New Project) и я извадете от формата (в Project Manager View | Ръководител на проекта)
  • Изберете експертни форми на бази данни от менюто Help.
  • На първия екран, изберете "Създаване на главен / подробно формата" и "Създаване на формуляр с помощта TQuery обекти".
  • Натиснете Next и изберете таблицата с псевдоним от базата данни ORDERS.DB DBDEMOS.
  • Натиснете Next и изберете полетата OrderNo, CustNo, SaleDate, ShipDate и ItemsTotal на ORDERS.DB маса.
  • Натиснете Next и изберете "Хоризонтално" от разположението на отделните компоненти на форма dbEdit на.
  • Натиснете Next и изберете таблицата ITEMS.DB.
  • В следващите два екрана, изберете всички полета от масата и ги поставя в една мрежа.
  • Натиснете Next и изберете Заповед № поле от чителят M и детайлност LisTB волове, и кликнете върху бутона Add.
  • Натиснете Next, и генерира форма.
Това отнема много думи, за да опише процеса, както е показано по-горе, но в действителност, изпълнението на команди в експертни форми на бази данни лесно и интуитивно.

Изберете първата от два обекта TQuery и инсталирате Active собственост на True. За Query2 в SQL имот напише текста на искането.

изберете * от артикули I, части P

където (I.OrderNo =: OrderNo) и

Прост метод е описан в предходния параграф, той показва как да създадете изчисленото поле. Ако се вгледате в DBGrid, можете да видите, че има вече има и друга празна кутия. За да се сложи стойност в тази област, отворете Object Inspector страница Събития Query2 обект и кликнете два пъти върху OnCalcFields. Напълнете метод е създаден, както следва:

Процедура TForm2.Query2CalcFields (набор от данни: TDataSet);

След стартиране на програмата Total поле ще съдържа низа $ 23.00.

Това показва колко лесно е да се създаде компютърна поле, което показва правилно форматирани данни. В действителност, това поле трябва да показва нещо друго - работа полета Количество (количество) и ListPrice (цена). За тази цел по-горе код за събитие OnCalcFields да се променя както следва.

Процедура TForm1.Query2CalcFields (набор от данни: TDataset);

Ако сега стартирате програмата, Общо поле ще съдържа желаната стойност.

В случай манипулатор OnCalcFields могат да изпълняват по-сложни изчисления (тя ще бъде показана по-късно), но трябва да се забравя, че това води до съответна забавяне на скоростта на програмата.

Процедура TForm1.Query1CalcFields (набор от данни: TDataset);

с Query2 направя започне







Предишен ◈ Следващото