Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TADODataSet / 13 сообщений из 13, страница 1 из 1
05.01.2003, 11:24
    #32086657
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Поздравляю всех с прошедшим праздником.
У меня проблема такая:
Есть хранимая прцедура 'Find' на сервере(MSSQL2000) и есть приложение на Delphi.
Процедура в Query работает хорошо,имеет 4 входных параметра,все по умолчанию Null.
Использую компонент TADODataSet.
Когда ввожу в поля ComboBox сразу все 4 значения,результат в Grid появляется.Если ввести одно значение или два,три Grid пуст,хотя как писал выше,значения по умолчанию Null.
Что у меня не правильно подскажите.


procedure TForm1.Button7Click(Sender: TObject);
begin
With MD.DataSet do begin
Active:=False;
CommandText:='Find';
Prepared:=True;
Parameters.Refresh;
Parameters.ParamByName('@A').Value:=ComboBox10.Text;
Parameters.ParamByName('@B').Value:=ComboBox11.Text;
Parameters.ParamByName('@C').Value:=ComboBox15.Text;
Parameters.ParamByName('@D').Value:=ComboBox13.Text;
Active:=True;
end;
end;
...
Рейтинг: 0 / 0
05.01.2003, 11:35
    #32086665
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Наверное, в процедуру передается пустая строка, а не Nil.
...
Рейтинг: 0 / 0
05.01.2003, 11:39
    #32086671
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Что за Nil?
...
Рейтинг: 0 / 0
05.01.2003, 11:46
    #32086674
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Делфийское прозвище Нулла
...
Рейтинг: 0 / 0
05.01.2003, 11:46
    #32086675
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
В типах входных Value параметров компонента ничего не пишу.
...
Рейтинг: 0 / 0
05.01.2003, 11:47
    #32086676
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Пишу Null-не помогает.
...
Рейтинг: 0 / 0
05.01.2003, 11:51
    #32086678
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Если Combobox пустой, не присваивай ничего параметру
...
Рейтинг: 0 / 0
05.01.2003, 11:52
    #32086680
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Или NIL присвой.
...
Рейтинг: 0 / 0
05.01.2003, 11:56
    #32086681
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Shark:

Ты имеешь в виду Values?Он пуст.
...
Рейтинг: 0 / 0
05.01.2003, 12:00
    #32086684
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Я имею ввиду
1)
If ComboBox10.Text<>'' Then
Parameters.ParamByName('@A').Value:=ComboBox10.Text;
2)If ComboBox10.Text<>'' Then
Parameters.ParamByName('@A').Value:=ComboBox10.Text
else
Parameters.ParamByName('@A').Value:=nil;
...
Рейтинг: 0 / 0
05.01.2003, 12:01
    #32086686
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Shark:

Nil ему не нравится.
...
Рейтинг: 0 / 0
05.01.2003, 12:07
    #32086688
Alkaloid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Shark,спасибо,все получилось.Стыдно.
...
Рейтинг: 0 / 0
08.01.2003, 11:37
    #32087308
tygra
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TADODataSet
Для обнуления параметров используется
Код: plaintext
Parameters.ParamByName('@A').Clear
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TADODataSet / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]