Текущий архив: 2002.06.13;
Скачать: CL | DM;

Вниз

Возник вопрос: что лучше?   Найти похожие ветки 

← →
studentik ©   (2002-05-20 16:11) [0]

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

---

← →
studentik ©   (2002-05-20 18:15) [1]

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

---

← →
pb   (2002-05-20 18:17) [2]

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

---

← →
studentik ©   (2002-05-20 18:21) [3]

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

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;

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

---

← →
studentik ©   (2002-05-20 19:36) [4]

Я смог исправить ошибку!!! При задании 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;

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

---

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

Текущий архив: 2002.06.13;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.011 c