Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2005.07.18;
Скачать: [xml.tar.bz2];

Вниз

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

 
Begin   (2005-06-09 10:02) [0]

Делаю так...

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. Я очень недавно с БД столкнулся, знаний пока маловато... :)


 
Johnmen ©   (2005-06-09 10:08) [1]

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


 
ЮЮ ©   (2005-06-09 10:10) [2]

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


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

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


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

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

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

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


 
ORMADA ©   (2005-06-09 10:56) [5]

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



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

Форум: "Базы";
Текущий архив: 2005.07.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.04 c
14-1119344907
Иксик
2005-06-21 13:08
2005.07.18
Оранжевые в Баку


14-1119803589
Tirex
2005-06-26 20:33
2005.07.18
Сколько стрелок на будильнике?


1-1119688041
syte_ser78
2005-06-25 12:27
2005.07.18
Label по центру


1-1119604820
heckfy1
2005-06-24 13:20
2005.07.18
Свойства принтера


1-1119682185
syte_ser78
2005-06-25 10:49
2005.07.18
проверка на наличие в списке комбобокса записи





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский