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

Вниз

Как в DBGrid е такую штуковину сделать...   Найти похожие ветки 

 
SSGuest   (2004-10-15 18:03) [0]

Есть W2000, MSSQL, D7, ODBC, TDataBase, TQuery, TDataSource и TDBGrid.

Есть SELECT t.* FROM Table1 t

Есть Query.Open;

Делаем Время от времени Query.Next;

После достижения курсором (выделяет всю строку) середины DBGrid"а хочется чтобы не курсор падал дальше вниз, а датасет поднимался как бы вверх, то есть курсор оставался посередине, а данные менялись под курсором, после операции *.Next...

Есть оригинальное решение у кого-нибудь?


 
SSGuest   (2004-10-15 19:26) [1]

?


 
46_55_41_44 ©   (2004-10-16 10:03) [2]

Не получится ничего


 
sniknik ©   (2004-10-16 13:13) [3]

почему же сразу не получится? исходники грида открыты, в крайнем случае можно и полностью переписать, другое дело стоит ли заморачиваться только ради "такую фиговину сделать...".

> Есть оригинальное решение у кого-нибудь?
это что, пару строчек кода или имеется ввиду извращение подобное желаниям? если второе то пожалуйста, запоминай значение записи, переоткрывай рекордсет и локейтом ищи запись, встает как раз на середину, если может. предется на каждый next делать.


 
SSGuest   (2004-10-17 20:08) [4]

Вот спасибо так спсибо. Выручил. Достаточно было сделать локейт по ключу и курсор сам после|перед Next шёл куда надо.

По поводу оригинального решения - это и есть одна-пара строчек.
Влезать в оригинальный код просто нет времени.

Ещё раз спасибо. :)



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

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

Наверх




Память: 0.45 MB
Время: 0.061 c
14-1098972852
VolanD666
2004-10-28 18:14
2004.11.14
Почему так плохо живем.


14-1098896574
Настенька!!!
2004-10-27 21:02
2004.11.14
Корешик "Вика"


14-1098755050
Думкин
2004-10-26 05:44
2004.11.14
С днем рождения! 26 октября.


8-1092082366
Константинов
2004-08-10 00:12
2004.11.14
Run time вставить субтитры в фильм реально ли?


14-1098942290
ИМХО
2004-10-28 09:44
2004.11.14
Рекордная серия Арсенала оборвалась...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский