Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

переработать метод SetActive компонента TADOQuery [D7]

DenisWW © (2005-01-25 12:03:00)
Добрый день мастера

Задача переработать метод SetActive компонента TADOQuery

Вот до чего я добрался

procedure TADOQueryRKO.SetActive(Value: Boolean);
var
MyField, MyFields: TStrings;
begin
……
if Value then Begin
if Value and (not Active) then try
Screen.Cursor := crSQLWait;
MyField:=TStringList.Create;
MyFields:= TStringList.Create;

………

// Тут в переменную MyField заносятся данные, которые я должен вернуть через ADO. 1 запись = 1 строка.
// В MyFields описание и количество столбцов
// Люди дайте пример как мне грамотно заполнить ADO!!!!! или принципы, или что ни будь!!!Помогите!!!!

????????????????????????????

finally
MyFields.Free;
MyField.Free;
Screen.Cursor := crDefault;
end
end else inherited SetActive(Value);
end;

denisww (2005-02-04 13:17:00) [1]
спасибо
дельно

sniknik (2005-01-26 13:26:00) [2]
> Предложите пожалуйста технологию!!
> я переписываю ADO потомучто поменялся источник .
> раньше я получал данные из MSQL
> теперь через веб сервис
> данные он передаёт в виде длинной строки
> а поля разделены запятой
> как мне быть?
с этого надо было начинать, в таком виде задача имеет элементарное решение, до этого был бред больного диплодока (потому и вымерли, что самцы аналогично с самками разговаривали на предмет размножения... ;о))).

посмотри хелп по ClientDataSet - CreateDataSet, там пример, то же самое можно делать и с ADODataSet (просто примера в хелпе на методе нет)
так вот не подключая ADODataSet ни к какому конекту (оторванный датасет) создаеш у него рекордсет нужной структуры как в примере и заполняеш его из своей строки... и даже переопределять ничего не нужно (хотя это дело хозяйское).

denisww (2005-01-26 12:38:00) [3]
Предложите пожалуйста технологию!!
я переписываю ADO потомучто поменялся источник .
раньше я получал данные из MSQL
теперь через веб сервис
данные он передаёт в виде длинной строки
а поля разделены запятой
как мне быть?

Ольга (2005-01-26 06:54:00) [4]
ADOQuery не предназначен для чтения из TStringList
Это идея фикс. Придумайте другое решение.

DenisWW (2005-01-25 20:56:00) [5]
я хочу чтобы ADOQuery читал данные из MyField

Ольга (2005-01-25 15:49:00) [6]
Что вы имеете ввиду под "переписать ADOQuery"?
ADOQuery должен читать откуда-то данные по запросу.
Вы хотите, чтобы ADOQuery читал данные из MyField (???) или создать текст запроса (к чему?), читая MyFields?

denisww (2005-01-25 14:59:00) [7]
Требуется переписать ADOQuery
дабы он возвращал мои данные находящиеся в MyField и MyFields

denisww (2005-01-25 14:55:00) [8]
помогите!!!

denisww (2005-01-25 12:45:00) [9]
как мне заполнить имеющимися данными RecordSet???
может я неправильно вопрос задал?

Соловьев (2005-01-25 12:42:00) [10]
[2]

denisww (2005-01-25 12:40:00) [11]
а вот это мне ничего не говорит
к моему сожалению

Соловьев (2005-01-25 12:39:00) [12]
>хочу переписать компонент дабы он конектился к веб клиенту
т.е.?

Соловьев (2005-01-25 12:35:00) [13]
...
ADOQuery.Recordset := ADOCommand.Execute;
...

denisww (2005-01-25 12:33:00) [14]
>Задача переработать метод SetActive компонента TADOQuery
ну обьяви свой класс на его основе, и вперед...

с этим проблем нет
как заполнить правильно RecordSet?

DenisWW (2005-01-25 12:29:00) [15]
писал приложение используя компонент ADOQuery
теперь я пытаюсь изменить способ доступа к БД
хочу переписать компонент дабы он конектился к веб клиенту

ответ от клиента я получаю как описал выше.
теперь надо правильно заполнить recordset как я понимаю

Соловьев (2005-01-25 12:26:00) [16]
>Задача переработать метод SetActive компонента TADOQuery
ну обьяви свой класс на его основе, и вперед...

> // Тут в переменную MyField заносятся данные, которые я должен
>вернуть через ADO. 1 запись = 1 строка.
> // В MyFields описание и количество столбцов
> // Люди дайте пример как мне грамотно заполнить ADO!!!!! или >принципы, или что ни будь!!!Помогите!!!!
Читать до посинения: http://www.delphikingdom.com/asp/itemq.asp?mode=1&itemid=128

Ольга (2005-01-25 12:22:00) [17]
Это что самоцель -
> переработать метод SetActive компонента TADOQuery
?
Конкретизируйте задачу.
Что за метод SetActive? Что-то я не встречалась с таким.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »