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

Вниз

Определение компонентов на окнах   Найти похожие ветки 

 
Diamond Cat   (2002-06-04 02:00) [0]

Каким манером можно определить что окно имеет Scrollbar, вроде как в некоторых окнах это не отдельный компонент (т.е. он не определяется как дочерний, и вообще не отличается ни по хендлу ни по чему-либо еще), а в некоторых это действительно контрол имеющий и имя класса и свой хендл, хотелось бы знать как определить что полоса прокрутки существует не зависимо от того , что это за окно.


 
MBo   (2002-06-04 07:23) [1]

Как я понял, это не подходит
if (GetWindowlong(Handle, GWL_STYLE) and WS_VSCROLL) <> 0 then
ShowMessage("Vertical scrollbar is visible!");

тогда что-нибудь такое (это работает для положенного на форму VCL-TScrollbar, а в общем случае наверное, надо findwindowex, enumwindows, enumchildwindows, и смотреть название класса найденных окон на вхождение "scrollbar")

if findwindowex(handle,0,pchar("TSCROLLBAR"),nil)<>0 then
ShowMessage("True TScrollBar has been found!");


 
Song   (2002-06-04 09:09) [2]

GetScrollInfo()
GetScrollPos()

MBo, GetWindowLong() вернёт WS_VSCROLL даже если последний неактивный.


 
MBo   (2002-06-04 09:14) [3]

>Song
это работает для "scrollbar", появляющегося, например, на форме при сокращении ее размеров (пока не появился - не возвращает ;))



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

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

Наверх




Память: 0.44 MB
Время: 0.006 c
1-35365
Kurt
2002-07-29 18:19
2002.08.12
Поиск вверх/вниз по RichEdit (Memo)! и чтоб было выделение и пока


1-35291
Aleksandr
2002-07-29 14:06
2002.08.12
Можно ли трассировать в Делфи


14-35406
Malder
2002-07-13 13:04
2002.08.12
CIAcomander


7-35486
alehan
2002-05-28 11:32
2002.08.12
Сервис SRV


14-35416
Дмитрий Баранов
2002-07-16 13:23
2002.08.12
Забодал VC 6





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