powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TADODataSet
13 сообщений из 13, страница 1 из 1
TADODataSet
    #32086657
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поздравляю всех с прошедшим праздником.
У меня проблема такая:
Есть хранимая прцедура '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
TADODataSet
    #32086665
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Наверное, в процедуру передается пустая строка, а не Nil.
...
Рейтинг: 0 / 0
TADODataSet
    #32086671
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что за Nil?
...
Рейтинг: 0 / 0
TADODataSet
    #32086674
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Делфийское прозвище Нулла
...
Рейтинг: 0 / 0
TADODataSet
    #32086675
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В типах входных Value параметров компонента ничего не пишу.
...
Рейтинг: 0 / 0
TADODataSet
    #32086676
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пишу Null-не помогает.
...
Рейтинг: 0 / 0
TADODataSet
    #32086678
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если Combobox пустой, не присваивай ничего параметру
...
Рейтинг: 0 / 0
TADODataSet
    #32086680
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Или NIL присвой.
...
Рейтинг: 0 / 0
TADODataSet
    #32086681
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shark:

Ты имеешь в виду Values?Он пуст.
...
Рейтинг: 0 / 0
TADODataSet
    #32086684
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я имею ввиду
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
TADODataSet
    #32086686
Alkaloid
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shark:

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


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