Скачать: CL | DM;

При SQL запросе запрос проходит 1 раз   Найти похожие ветки 

← →
alexvan ©   (2002-07-06 18:57) [0]

Ситуация такая. Я обращаюсь к полю таблицы значение которого забито в DBComboBox, вытаскиваю значение этого поля на переменную N и делаю запрос

SELECT поле1
FROM таблица
WHERE (поле 2=:переменная);

В данном случае запрос должен проходить на OnChange ComboBox при любом изменении. Но у меня он проходит всего лишь один только раз при первом вытаскивании значения.

procedure Tfm1.ComboBox1Change(Sender: TObject);
begin
<Переменная>:=ComboBox1.Text;
Query1.Active:=True;
Query1.last;
if Query1.Fields[0].AsString <>"" THEN
Edit1.Text:= Query1.Fields[0].AsString;
else
MaskEdit1:="";
end;
end;

---

← →
dimis   (2002-07-08 08:59) [1]

:) а в Query1 ТЫ НЕ ХОЧЕШЬ ПЕРЕДАТЬ ЗНАЧЕНИЕ ПЕРЕМЕННОЙ?

---

← →
alexvan ©   (2002-07-08 09:05) [2]

А что я делаю? Этой переменной значение присваивается при каждом OnChange, а в Query1.SQL
Select ...
From ...
Where (Field=:переменная)

---

← →
Johnmen ©   (2002-07-08 09:12) [3]

>alexvan ©

А ты не пробовал прочитать хотя бы одну книгу по основам программирования БД в Дельфи ? Скорее всего - нет ! А жаль...

---

← →
alexvan ©   (2002-07-08 09:23) [4]

Она у меня на столе

---

← →
Johnmen ©   (2002-07-08 09:27) [5]

Так я о том, где она находится, и не спрашивал !!!

---

← →
Anatoly Podgoretsky ©   (2002-07-08 09:29) [6]

alexvan © (08.07.02 09:23)
Ты лучше ответь пробовал или нет

---

← →
alexvan ©   (2002-07-08 09:33) [7]

Да!!!

---

← →
roottim   (2002-07-08 09:34) [8]

procedure Tfm1.ComboBox1Change(Sender: TObject);
begin
Query1.Close;
<Переменная>:=ComboBox1.Text;
Query1.Open;
Query1.last;
if Query1.Fields[0].AsString <>"" THEN
Edit1.Text:= Query1.Fields[0].AsString;
else
MaskEdit1:="";
end;
end;

PS
и непиши так <Переменная>:=ComboBox1.Text тока народ мутиш

---

← →
Anatoly Podgoretsky ©   (2002-07-08 09:43) [9]

alexvan © (08.07.02 09:33)
Отлично, теперь еще один раз и на этот раз вдумчиво

---

← →
alexvan ©   (2002-07-08 09:48) [10]

Я постараюсь!

---

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

Скачать: CL | DM;



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