![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Возник вопрос: что лучше? [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]Извините за повторы :-(