Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];

Вниз

Как пробежаться по выделеным записям в Table?   Найти похожие ветки 

 
Rentgen ©   (2005-08-08 13:00) [0]

Здравствуйте.
Помогите пожалуйста решить задачку:

Есть
DBGrid1 (В нем выделено n записей)
Table1 (База MDB (ADO))
ListBox1 (Для вывода информации)
Нужно присвоить выделеным записям некоторые значения.

Как узнать номера записей в базе, если в привязаном Гриде выделено несколько записей?

Как пробежаться по выделеным записям в Table?

Т.е. как узнать какие записи "выделены"?

Копал в сторону:
var
s:String;
n:Integer;
for n:=0 to DBGrid1.SelectedRows.Count-1 do
Begin
 s:=?? //
 ListBox1.Items.Add(s);
end;


 
ANB ©   (2005-08-08 13:02) [1]

n := grList.SelectedRows.Count - 1;
for i := 0 to n do begin
 vtList.GotoBookmark(Pointer(grList.SelectedRows.Items[i]));
 // Здесь делаешь, чего тебе надо.
end;

Пример тестовый, извиняй, если что не так.


 
Anatoly Podgoretsky ©   (2005-08-08 13:16) [2]

Rentgen ©   (08.08.05 13:00)  
Т.е. как узнать какие записи "выделены"?

Так SelectedRows и есть выделеные, там просто других нет!!!


 
Slym ©   (2005-08-08 14:41) [3]

Не забудь DisableControls/EnableControls, а то без них выделение не надолго :)



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

Форум: "Базы";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.01 c
14-1124667340
Zer0
2005-08-22 03:35
2005.09.18
Quake 3 Engine Sources GPL ed


4-1122476693
Lito
2005-07-27 19:04
2005.09.18
Проблема с textout


1-1124861492
Pearled
2005-08-24 09:31
2005.09.18
Как избавиться от появления окна CPU?


1-1124925531
Kisha
2005-08-25 03:18
2005.09.18
Синтаксический анализатор


14-1124730114
Е-клмн
2005-08-22 21:01
2005.09.18
Загадка.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский