Версия для печати
Нажмите сюда для просмотра этой темы в оригинальном формате |
Форум на Исходниках.RU > Delphi: Общие вопросы > Конекция к базе |
Автор: ima 19.09.00, 11:36 |
Есть основная программа,в которой выполняются различные StoredProc,и DLL , в которой также используются StoredProc.Соответственно в каждом модуле есть компонент DataBase.Вопрос:каким образом сделать так чтобы StoredProc в главной программе и DLL выполнялись в одной конекции. |
Автор: Ra 23.10.00, 04:49 |
попробуйте передать их exe'шника в dll свойство DataBase.Session и присвоить его StoredProc.Session...StoredProc.Databasename при этом не задается.. |
Автор: kazus 25.10.00, 12:38 |
делай так. в ДЛЛ сделай процедуру в DM или там где лежат все твои StoredProc и всё такое, процедуру типа (это у меня в DM) procedure CreateDM(AliasName : PChar); begin DM := TDM.Create(Application); DM.Base.AliasName := AliasName; end; Теперь когда ты вызываешь из ЕХЕ ДЛЛ'ельную процедру тогда в саму процедуру вставь входной параметр типа ( AliasName ) или вот тебе пример (процедура в DLL'ке) procedure ShowSaldoParam(AliasName : PChar;DBHandle : HDBIDB;Handle : THandle); begin Application.Handle := Handle; CreateDM(AliasName); with TFormSaldoParam.Create(Application) do begin try DM.Base.Handle := DBHandle; ShowModal; finally if DM <> nil then FreeDM; Free; end; end; end; ( это в мэйн ЕХЕ'шнике вызов процедуры ) ShowClientDoc(PChar(DM.Base.AliasName),DM.Base.Handle,Application.Handle); |