Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Возник вопрос: что лучше? [D6, IB6.x]


studentik ©   (2002-05-20 16:11:00) 

Мастера, подскажите!
Работаю с БД InterBase, используя компоненты: Database, DataSource, StoredProc, Query.
1)Чем лучше использование IBQuery, IBDatabase, IBStoredProc?
2)Что надо сделать, чтобы перейти на новые рельсы (кроме, собственно, замены компонентов и заполнения аналогичных параметров)?


studentik   (2002-05-20 19:36:00) [1]

Я смог исправить ошибку!!! При задании StoredProcName имеет значение РЕГИСТР.
Вот исправленный вариант:
function TfNew.GetElement: boolean;
begin
try
result:=true;
if IBStoredProc1.Active then IBStoredProc1.Close;
fDM.IBStoredProc1.StoredProcName:="GET_FA_KOD";
fDM.IBStoredProc1.Prepare;
fDM.IBStoredProc1.Params[1].AsString:= ComboBox1.Text;
fDM.IBStoredProc1.ExecProc;
vi_P_Kod:=Trim(fDM.IBStoredProc1.Params[0].AsString);
except
result:=false;
end;
end;

Продолжаю править программу...


studentik   (2002-05-20 18:21:00) [2]

Поменял компоненты и перестала работать функция:

function TfNew.GetElement: boolean;
begin
try
result:=true;
if IBStoredProc1.Active then IBStoredProc1.Close;
fDM.StoredProc1.StoredProcName:="get_Fa_Kod";
fDM.StoredProc1.Params.Clear;
with fDM.StoredProc1.Params.CreateParam(ftString, "v_Fa_Facultet", ptInput) do
begin
AsString:=ComboBox1.Text;
end;
fDM.StoredProc1.Params.CreateParam(ftSmallint, "Fa_Kod", ptOutput);
fDM.StoredProc1.Prepare;
fDM.StoredProc1.ExecProc;
vi_P_Kod:=Trim(fDM.StoredProc1.Params[1].AsString);
except
result:=false;
end;
end;

Как исправить?


pb   (2002-05-20 18:17:00) [3]

писалось уже
кроме того почитай хелп


studentik   (2002-05-20 18:15:00) [4]

Извините за повторы :-(


Наверх

Титульная страница Поиск, карта сайта Написать письмо