powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Где мое ADO?
9 сообщений из 9, страница 1 из 1
Где мое ADO?
    #32082803
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня на VBA был такой милый код: Я без Connectionа кодом создавал в Recordset поля, наталкивал туда данные и цеплял это все на форму. Delphi Dataset динамический(без Connectionа) может жить или обязательно под него таблички подкладывать?
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082805
Фотография KirillovA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Без TADOConnection - ни как - хошь сам создавай. Хошь визуально на форму бросай.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082807
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Т.е. таблицу для моего Recordsetа надо где-то положить? Я и сам так думаю. Спросил для очистки совести. Неохота таблицы плодить.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082808
Фотография KirillovA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Короче - пиши по асе - чем смогу - помогу.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082814
Фотография ziktuw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все, что можно было на VBA, конечно же возможно и на дельфи. Просто отличай ActiveX-объекты ADO и дельфовые классы TADO*. Для того, чтобы сморозить то же самое, что было на VBA, достаточно повторить это же в дельфовом синтаксисе:

var rs:OleVariant
...
rs:=CreateOleObject("ADODB.Recordset");
rs.Fields.Add .........
и так далее, точно то же самое, что и в VBA

Но таблицу в памяти можно создать и средствами TADODataSet. 2-мя путями:
1) Создать рекордсет, как указано выше и сделать присвоение
AdoDataSet1:=TAdoDataSet.Create(nil);
AdoDataSet1.Recordset:=rs;
2) Использовать метод CreateDataSet. Насколько помню, в хелпе его нет. Надо по коду смотреть.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082816
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>1) Создать рекордсет, как указано выше и сделать присвоение
>AdoDataSet1:=TAdoDataSet.Create(nil);
>AdoDataSet1.Recordset:=rs;

Спасибо.
Я так пробовал, не получилось с разбегу. Сейчас еще попробую. Трудно без Hintов(подсказок вылезающих):(. Привык, разбаловался.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32082907
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
бросаешь на форму TADODataSet
(или создаешь в процедуре ADODataSet1:= TADODataSet.Create(nil);)
а дальше определяешь поля , и забиваешь данными
ADODataSet1.FieldDefs.Add('ID',ftinteger);
ADODataSet1.FieldDefs.Add('Name',ftString,50);
ADODataSet1.CreateDataSet;
ADODataSet1.AppendRecord([1,'Test1']);
ADODataSet1.AppendRecord([1,'Test2']);
ADODataSet1.AppendRecord([1,'Test3']);
ADODataSet1.Open;
// цепляй к гриду или еще куда
...
Рейтинг: 0 / 0
Где мое ADO?
    #32083076
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>LexusR
Спасибо большое, пашет.
...
Рейтинг: 0 / 0
Где мое ADO?
    #32083081
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TADODataSet.CreateDataSet

TADODataSet
Creates the recordset for an ADO dataset.

procedure CreateDataSet;

Description

Applications should not need to call CreateDataSet themselves . CreateDataSet is called automatically by an ADO dataset to create its recordset.

Комичный Help. Cамому бы мне до этого кода застрелиться не допереть.
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Где мое ADO?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]