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

Нужно чделать отбор выделенных записей !   Найти похожие ветки 

← →
Alpine   (2005-09-08 00:01) [0]

Здраствуйте уважаемые мастаки. У меня к вам вопрос ..
Сделал я возможность мултиселекта в гриде. А теперь надо сделать отбор этих записей. Тобишь чтоб оставались только выделенные записи ! Помогите плиз кто чем может ))

Заранее благодарю всех откликнувшихся !

---

← →
Ильш ©   (2005-09-08 06:12) [1]

Bookmarkи мейби
а дальше пишем код

---

← →
BanderLog   (2005-09-08 06:50) [2]


  TmpBookMark := IBQuery.GetBookmark; //Запоминаем текущую позицию

  With DBGrid.SelectedRows do
   begin
    For i := 0 To Count - 1 Do
     If IndexOf( Items[i]) > -1 Then
      Begin
       ...
      End;
   end;

  IBQuery.Bookmark := TmpBookMark; // Восстанавливаем позицию


---

← →
Anatoly Podgoretsky ©   (2005-09-08 17:05) [3]

WHERE fld=ID1 OR fld=ID2 ... но можешь нарваться на ограничения.

---

← →
Alpine   (2005-09-09 15:57) [4]

Делаю так

 With DBGridEh1.SelectedRows do
  begin
   For i := 0 To Count - 1 Do
    If IndexOf( Items[i]) > -1 Then
     Begin
     DMFrm.TovarQuery.RecNo := IndexOf( Items[i]);
     if i=0 then otborsel := "Where ID="+DMFrm.TovarQuery.FieldByName("ID").AsString
     else otborsel := otborsel + " OR ID=" + DMFrm.TovarQuery.fieldbyname("ID").AsString;
      //otborsel
     End;
       DMFrm.TovarQuery.Close;
         DMFrm.TovarQuery.SQL.Clear;
           DMFrm.TovarQuery.SQL.Add("Select * from tovar");
         DMFrm.TovarQuery.SQL.Add(otborsel);
       DMFrm.TovarQuery.Open;
 end;

Работает с ошибками ... Отбираются или не все выделенные записи или выбираются некоторые не выделенные коороче не работает (( Помогите !

---

← →
Alpine   (2005-09-09 15:58) [5]

Очень надо плиззз

---

← →
Sergey13 ©   (2005-09-09 16:04) [6]

Ну тогда уж не через  fld=ID1 OR fld=ID2 а через IN. Всяко покороче будет, ИМХО.

---

← →
Desdechado ©   (2005-09-09 16:33) [7]

DBGridEh1 - случайно не к DMFrm.TovarQuery привязан?
for nCurr := 0 to gridSelect.SelectedRows.Count - 1 do
 begin
   qrySelectNagr.GotoBookMark( Pointer( gridSelect.SelectedRows.Items[ nCurr ] ) );
...
 end // for

---

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

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



Память: 0.46 MB
Время: 0.024 c