Скачать: CL | DM;

динамическое создание TDataModule   Найти похожие ветки 

← →
morfey-night   (2004-01-20 17:00) [0]

почему я не могу динамически создать  TDataModule, если на нем расположен любой ADO-шный компанент?

---

← →
имя   (2004-01-20 18:36) [1]

Удалено модератором

---

← →
just me   (2004-01-26 21:15) [2]

Часом не в консольной аппликации?
Скорее всего просто не инициирована исполняющая среда OLE - надо ручками.

---

← →
alex_*** ©   (2004-01-28 09:38) [3]

какая еще исполнительная среда OLE? Причем здесь OLE? Приводи код - как создаешь

---

← →
Artem03   (2004-01-28 10:01) [4]

А  зачем создавать TDataModule?
Куда проще создавать сами компоненты для доступа к данным.

var
 ADOCon,ADOCon_Fil: TADOConnection;
 QR: Array [1..MAX_DS] Of TADODataSet;
 ADOC: Array [1..MAX_DS] Of TADOCommand;
 DS: Array [1..MAX_DS] Of TDataSource;
...
ADOCon:=TADOConnection.Create(ADOCon);
ADOCon.ConnectionTimeout:=300;
ADOCon.ConnectionString:="FILE NAME="+UDLFile;
ADOCon.KeepConnection:=False;
ADOCon.LoginPrompt:=False;
ADOCon.Provider:=UDLFile;

For i:=1 To MAX_DS Do
Begin
 QR[i]:=TADODataSet.Create(QR[i]);
 ADOC[i]:=TADOCommand.Create(ADOC[i]);
 DS[i]:=TDataSource.Create(DS[i]);
 QR[i].Connection:=ADOCon;
 ADOC[i].Connection:=ADOCon;
 QR[i].BlockReadSize:=0;
 QR[i].MaxRecords:=0;
 QR[i].CursorType:=ctDynamic;
 DS[i].DataSet:=QR[i];
End;

---

← →
alex_*** ©   (2004-01-28 10:21) [5]

может автор хотел создать вручную DM уже сделанный в designer?

---

← →
just me   (2004-01-28 13:08) [6]

> alex_*** [3]
OLE (или вернее COM) здесь очень даже причем - если понимать, в чем суть...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.047 c