Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.18;
Скачать: CL | DM;

Вниз

Работа с информацией из выбранных строк в DbGrid   Найти похожие ветки 

 
Karlson   (2004-06-21 18:26) [0]

Добрый день! Как работать с каждой записью грида, которые были выбраны пользователем (select). Заранее спасибо!


 
Плохиш ©   (2004-06-21 19:00) [1]

SelectedRows


 
Karlson   (2004-06-21 19:29) [2]

А дальше что? вот мне нужно узнать, что записано в 10 столбце каждого рядочка выделенного. Беру SelectedRows.Items[i], проганяю i от 0 до Count и активным остается только последний ряд, а как прогнать все?


 
Ярослав   (2004-06-21 20:51) [3]

Возвращает список содержимого первого поля набора данных (SourceDBGrid.DataSource.DataSet.Fields[0]) при желании можно брать любое поле.
Функция универсальная, в качестве параметра нужно указать нужную DBGrid

function MultiSelectDBG(SourceDBGrid: TDBGrid): TStrings;
var x: integer;
   TempBookmark: TBookmark;
begin
Result:=TStringList.Create;
Result.Clear;
Result.Add(IntToStr(SourceDBGrid.DataSource.DataSet.Fields[0].AsInteger));
SourceDBGrid.DataSource.DataSet.DisableControls;
with SourceDBGrid.SelectedRows do
  begin
    if Count <> 0 then  begin
      Result.Clear;
      TempBookmark := SourceDBGrid.DataSource.DataSet.GetBookmark;
        for x := 0 to Count - 1 do begin
          if IndexOf(Items[x]) > -1 then begin
            SourceDBGrid.DataSource.DataSet.Bookmark := Items[x];
            Result.Add(IntToStr(SourceDBGrid.DataSource.DataSet.Fields[0].AsInteger));
          end;
        end;
      SourceDBGrid.DataSource.DataSet.GotoBookmark(TempBookmark);
      SourceDBGrid.DataSource.DataSet.FreeBookmark(TempBookmark);
    end;
  end;
SourceDBGrid.DataSource.DataSet.EnableControls;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
9-1075890529
AlexT1000
2004-02-04 13:28
2004.07.18
Как найти все сервера игры в лок.сети через DirectPlay8


14-1088587668
Amit
2004-06-30 13:27
2004.07.18
Вот блин, люди вы даёте >:-(


6-1084549441
Nic2
2004-05-14 19:44
2004.07.18
Запуск exe по сети


14-1088405639
PVOzerski
2004-06-28 10:53
2004.07.18
Кто-нибудь от "Лесной" до "Мужества" на метро уже прокатился?


6-1084509491
r9000
2004-05-14 08:38
2004.07.18
Помогите, пожалуйста разобраться с trap сообщениями