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

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

TADOStoredProc входящий параметр...

Begin ©   (2005-06-09 10:02:00) 

Делаю так...

procedure TForm1.Button1Click(Sender: TObject);
begin
 if not ADOConnection1.Connected then ADOConnection1.Connected := True;
 with StProc.Parameters.AddParameter do
 begin
   DataType  := ftString;
   Direction := pdInput;
   Value     := '%'+Edit1.Text+'%';
 end;
 StProc.Open;
end;


После чего TDBGrid отображает данные, все ОК. Потом указываю в Edit1 любое другое значение, а набор данных в гриде все тот же. Чую, надо где-то что-то обновить, а вот что ? :) Пытался использовать StProc.Parameters.Refresh; - ошибку выдает...

P.S. Я очень недавно с БД столкнулся, знаний пока маловато... :)

---

ORMADA   (2005-06-09 10:56:00) [1]

сделай в датасете в sql параметры и заполняй их потом во время работы и ничё создавать не надо будет!
чё-то типа
SELECT 1
FROM system
WHERE x= :p1
OR x IS null//--- если параметр не указан

---

Begin   (2005-06-09 10:53:00) [2]

>>>ЮЮ ©   (09.06.05 10:12) [3]
Кстати, после каждого клика она будет добавлять ещё один параметр, а тебе это надо?
-------------

Не надо конечно... Эт я просто из хелпа взял почти целиком. Вынесу Add за onClick.

В целом получилось, посему большое, человеческое спасибо за подсказку ! :)))

---

ЮЮ   (2005-06-09 10:12:00) [3]

Кстати, после каждого клика она будет добавлять ещё один параметр, а тебе это надо?

---

ЮЮ   (2005-06-09 10:10:00) [4]

with StProc do begin
 Close;
 Paremeters.Items[0].Value := '%'+Edit1.Text+'%';
 Open;
end;

---

Johnmen   (2005-06-09 10:08:00) [5]

А после указания close-open делаешь ?

---

Наверх