Текущий архив: 2005.11.27;
Скачать: CL | DM;

Вниз

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

← →
Ольга   (2005-11-08 12:18) [0]

Детский вопрос, а никак не могу сообразить. Подскажите, пожалуйста.

---

← →
Tonich ©   (2005-11-08 12:33) [1]

.first только у компонента снаборм данных

---

← →
Ega23 ©   (2005-11-08 12:34) [2]

DBGrid.DataSource.DataSet.First;

---

← →
Ольга   (2005-11-08 12:37) [3]

Это не совсем то, что мне надо. Нужно, чтобы DBGrid.SelectedRows.Count было > 0.

---

← →
Ega23 ©   (2005-11-08 12:43) [4]

Ну вот как в RX это реализовано.
procedure TRxDBGrid.SelectAll;
var
 ABookmark: TBookmark;
begin
 if MultiSelect and DataLink.Active then begin
   with Datalink.Dataset do begin
     if (BOF and EOF) then Exit;
     DisableControls;
     try
       ABookmark := GetBookmark;
       try
         First;
         while not EOF do begin
           SelectedRows.CurrentRowSelected := True;
           Next;
         end;
       finally
         try
           GotoBookmark(ABookmark);
         except
         end;
         FreeBookmark(ABookmark);
       end;
     finally
       EnableControls;
     end;
   end;
 end;
end;

procedure TRxDBGrid.UnselectAll;
begin
 if MultiSelect then begin
   SelectedRows.Clear;
   FSelecting := False;
 end;
end;


---

← →
Ольга   (2005-11-08 12:55) [5]

DBGrid.SelectedRows.CurrentRowSelected := True;
Вот до этой конструкции я и не могла доехать.
Спасибо.

---

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

Текущий архив: 2005.11.27;
Скачать: CL | DM;

Наверх

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