|
|
|
|
Команды ADO
Команде ADO, которой мы уделяли так много внимания в этой главе в VCL Delphi, соответствует компонент TADOCormand. Методы этого компонента во многом совпадают с методами класса TCustomADODataSet, хотя этот класс не является предком компонента (рис. 19.8). Он предназначен для выполнения команд, которые не возвращают наборы данных.
Рис. 19.8. Иерархия классов компонента TADOCommand
Так как компоненту TADOCommand нет необходимости обеспечивать работу набора записей, его непосредственным предком является класс TComponent. К его функциональности просто добавлен механизм соединения с БД через ADO и средства представления команды.
Команда передается в хранилище данных ADO через собственное соединение или через компонент TAOocormection, аналогично другим компонентам ADO (см. выше).
Текстовое представление выполняемой команды должно содержаться в свойстве
property CommandText: WideString;
Однако команду можно задать и другим способом. Прямая ссылка на нужный объект команды ADO может быть задана свойством
property CommandObject: _Command;
Тип команды определяется свойством
type TCommandType = (cmdUnknown, cmdText, cmdTable, cmdStoredProc, cmdFile, cmdTableDirect);
property CommandType: TCommandType;
Так как тип TCommandType также используется в классе TCustomADODataSet, где необходимо представлять все возможные виды команд, по отношению к компоненту TADOcommand этот тип обладает избыточностью. Здесь нельзя установить значения cmdTable, cmdFile, cmdTableDirect, а тип cmdStoredProc должен обозначать только те хранимые процедуры, которые не возвращают набор данных.
Если команда должна содержать текст запроса SQL, свойство CommandType должно иметь значение cmdText.
Для вызова хранимой процедуры необходимо задать тип cmdStoredProc, a в свойстве CommandText ввести имя процедуры.
Если для выполнения команды необходимо задать параметры, используется свойство
property Parameters: TParameters;
Выполнение команды осуществляется методом Execute:
function Execute: _RecordSet; overload;
function Execute(const Parameters: OleVariant): _Recordset;
overload;
function Execute(var RecordsAffected: Integer; var Parameters: OleVariant; ExecuteOptions: TExecuteOptions = []): _RecordSet; overload;
Разработчик может использовать любую из представленных нотаций перегружаемого метода:
TExecuteOption = (eoAsyncExecute, eoAsyncFetch, eoAsyncFetchNonBlocking, eoExecuteNoRecords); TExecuteOptions = set of TExecuteOption;
eoAsyncExecute — асинхронное выполнение команды;
eoAsyncFetch — асинхронная передача данных;
eoAsyncFetchNonBlocking — асинхронная передача данных без блокирования потока;
eoExecuteNoRecords — если команда возвращает набор записей, то они не передаются в компонент.
При работе с компонентом TADOConnection желательно использовать опцию eoExecuteNoRecords.
Для прерывания выполнения команды используется метод
procedure Cancel;
Текущее состояние команды можно определить свойством
type
TObjectState = (stClosed, stOpen, stConnecting, stExecuting, stFetching);
TObjectStates = set of TObjectState; property States: TObjectStates;
|
|
|
|
Дело в том, что в его постановке и выводах произведена подмена, аналогичная подмене в школьной шуточной задачке на сообразительность, в которой спрашивается:
- Cколько яблок на березе, если на одной ветке их 5, на другой ветке - 10 и так далее
При этом внимание учеников намеренно отвлекается от того основополагающего факта, что на березе яблоки не растут, в принципе.
В эксперименте Майкельсона ставится вопрос о движении эфира относительно покоящегося в лабораторной системе интерферометра. Однако, если мы ищем эфир, как базовую материю, из которой состоит всё вещество интерферометра, лаборатории, да и Земли в целом, то, естественно, эфир тоже будет неподвижен, так как земное вещество есть всего навсего определенным образом структурированный эфир, и никак не может двигаться относительно самого себя.
Удивительно, что этот цирковой трюк овладел на 120 лет умами физиков на полном серьезе, хотя его прототипы есть в сказках-небылицах всех народов всех времен, включая барона Мюнхаузена, вытащившего себя за волосы из болота, и призванных показать детям возможные жульничества и тем защитить их во взрослой жизни. Подробнее читайте в FAQ по эфирной физике.
|
|
 |
