DBGrid - Multiselect

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

Ответить
Dr_Grizzly
Сообщения: 407
Зарегистрирован: 13 сен 2004, 12:05
Откуда: Курган
Контактная информация:

всем привет! включил в опциях мультиселект, стало возможно выбирать некоторые записи, а как к ним обратиться??? т.е. пользователь выбрал 1-ю, 2-ю и 4-ю, и хочет изминить у них статус, как такое реализовать? нашел пока как узнать сколько пользователь выбрал строк, а вот обратиться хотябы к одной из них и внести изменения не могу найти. помогите люди добрые :)
Чем проще - тем оригинальней, а значит гениально, т.к. все гениальное - просто! ;) Да! Кстати! Ctrl+V реально вставляет!!! ХDD
Аватара пользователя
somewhere
Сообщения: 1858
Зарегистрирован: 31 авг 2006, 17:14
Откуда: 71 RUS
Контактная информация:

TCustomDBGrid.SelectedRows.Count
TCustomDBGrid.SelectedRows.Items[]
It's a long way to the top if you wanna rock'n'roll
Dr_Grizzly
Сообщения: 407
Зарегистрирован: 13 сен 2004, 12:05
Откуда: Курган
Контактная информация:

&quot писал(а):TCustomDBGrid.SelectedRows.Items[]
Что-то не совсем получается, она какой-то иероглиф возвращает и все, я так думаю как она может вернуть значения всей строки если в строке более 1-ого столбца?
Чем проще - тем оригинальней, а значит гениально, т.к. все гениальное - просто! ;) Да! Кстати! Ctrl+V реально вставляет!!! ХDD
Dr_Grizzly
Сообщения: 407
Зарегистрирован: 13 сен 2004, 12:05
Откуда: Курган
Контактная информация:

Нашел что и как!!!

procedure TForm1.Button1Click(Sender: TObject);
var
i, j: Integer;
s: string;
begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items));
for j := 0 to FieldCount-1 do
begin

if (j>0) then s:=s+', ';
s:=s+Fields[j].AsString;
end;
Listbox1.Items.Add(s);
s:= '';
end;
end;
Чем проще - тем оригинальней, а значит гениально, т.к. все гениальное - просто! ;) Да! Кстати! Ctrl+V реально вставляет!!! ХDD
Ответить