Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBGRID.MultiSelect [D6, MSSQL]


surkis ©   (2005-08-02 13:36:00) 

как в DBGRID у которого свойство MultiSelect установлено в True можно можно програмно выделить все записи и убрать с них выделение


surkis   (2005-08-02 14:05:00) [1]

Спасибо!!!


Ega23   (2005-08-02 14:03:00) [2]

TRxDBGrid.SelectAll   :о)


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;


surkis   (2005-08-02 14:02:00) [3]


> CurrentRowSelected. Ещё одно свойство.

Спасибо большое. я его видел но почемуто подумал что оно readonly, и предназначено только для проверки выделена ли текущая запись


Johnmen   (2005-08-02 14:00:00) [4]

CurrentRowSelected. Ещё одно свойство.


surkis   (2005-08-02 13:47:00) [5]


> SelectedRows. Есть такое свойство.

ну то что убрать все то видимо .SelectedRows.Clear а как добавить я не совсем понял методов типа .Add я не заметил


Johnmen   (2005-08-02 13:43:00) [6]

SelectedRows. Есть такое свойство.


Ega23   (2005-08-02 13:42:00) [7]

Пробежаться с первой до послежней и выделять по одной.


Наверх

Титульная страница Поиск, карта сайта Написать письмо