|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
создать dataset программно
Уважаемые, может кто подскажет каким образом решить задачу:
есть результат выполнения хранимой процедуры, но его нужно представить в дбгриде в другой форме - как я понимаю мне нужно создать программно датасет с нужной мне структурой и пробегаясь циклом по исходному датасету заполнить его соответствующими значениями. отсюда вопрос как создать датасет программно??? help в делфи прочитал, пробую, но ничего не получается, помогите примерчиком. может у меня вообще подход неверный , тогда подскажите вариант решения |
#2
|
|||
|
|||
база на чем?
надо чтоб хранимая процедура возвращала набор данных. и программно ничего создавать нет необходимости. Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение" |
#3
|
|||
|
|||
база на sql server2005
дак в том-то и дело что процедура возвращает набор данных, все нормально, но мне нужно чтобы это выводилось совсем в другом виде. собственно задумка в том чтобы из датасета хранимки читать и записывать в другой датасет, который и будет отображаться в гриде. Вот этот пустой датасет(или не датасет - не знаю ) мне и нужно сделать. |
#4
|
||||
|
||||
пример создания и использования "временного TDataSet" на основе TClientDataSet:
Код:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, DBClient, Grids, DBGrids; type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ClientDataSet1: TClientDataSet; procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin ClientDataSet1.FieldDefs.Add('id', ftInteger); ClientDataSet1.FieldDefs.Add('nick', ftString, 20); ClientDataSet1.FieldDefs.Add('note', ftString, 40); ClientDataSet1.CreateDataSet; end; end. Пишу программы за еду. __________________ |
#5
|
|||
|
|||
NumLock, спасибо, как раз то что нужно
|