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

Вниз

Как заставить думать TMEmo Или Windows что в ТМемо есть много стр   Найти похожие ветки 

 
TeNY ©   (2004-08-31 15:43) [0]

Как заставить думать TMEmo Или Windows что в ТМемо есть много строк хотя там 1 строчка то есть 1 строка а поставить прокрутку на 1000 строк


 
KSergey ©   (2004-08-31 16:21) [1]

Добавить туда пустые?
А вообще - зачем такое надо?


 
GuAV ©   (2004-08-31 17:14) [2]

Скролбар кинь рядом, а стандартный убери, и не прарься.


 
GrayFace ©   (2004-08-31 17:21) [3]

SetScrollRange можно.


 
TeNY ©   (2004-08-31 19:41) [4]

а стандартный на сккролл от мемо не реагирует


 
TeNY ©   (2004-08-31 20:23) [5]


> GrayFace ©   (31.08.04 17:21) [3]
> SetScrollRange можно.

он выставляет только параметры которые тут же обновляются и к тому же скрол бар выключен


 
wicked ©   (2004-08-31 22:44) [6]

навскидку
SetWindowLong(Edit1.Handle, GWL_STYLE, GetWindowLong(Edit1.Handle, GWL_STYLE) or WS_VSCROLL)
может и не сработать...


 
GrayFace ©   (2004-09-01 15:55) [7]

TeNY ©   (31.08.04 20:23) [5]
и к тому же скрол бар выключен

Включить легко. F1 -> Group поищи.


 
TeNY ©   (2004-09-06 11:00) [8]

не нашел что-то


 
TeNY ©   (2004-10-04 06:12) [9]

Проблема вся в том что на мемо отображается только часть массива длинной несколько строк и из за этого вертикальная прокрутка не работает когда над ним крутится скрол а горизонтальная работает,то есть скрол автоматически прокручивает по горизонтали а мне нужно прокрутку по вертикали.Можно сделать отдельныю прокрутку но тогда как сделать так чтоб она реагировала на прокрутку колесика над мемо?


 
KSergey ©   (2004-10-04 11:21) [10]

Я так понял, что надо что-то вроде виртуального Memo (т.е. когда данные не в нем самом, а хранятся "снаружи", в него отображается лишь часть)? Верно?

Про колесико - отлавливать WM_MOUSEWHEEL над мемо


 
TeNY ©   (2004-10-05 07:47) [11]

Все верно понял. только у меня мышь такая если есть верт прокрутка она её крутит а если гор то её а так как верт нет то он крутутит гориз. вот в чем проблема


 
KSergey ©   (2004-10-05 10:22) [12]

Ну так перехватывай и крути сам. Методику перехвата (не помню чего) подсказали в другом посте, вроде тебе же


 
TeNY ©   (2004-10-05 12:59) [13]

мне про WM_MOUSEWHEEL  и говорили а перехватывать не получается


 
KSergey ©   (2004-10-05 13:22) [14]

Как делаешь? Что толку говорить "не получается"??


 
TeNY ©   (2004-10-06 07:55) [15]

Поле типа RIchEdit,событие

procedure TForm1.RichEdit1MouseWheel(Sender: TObject; Shift: TShiftState;
 WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
ShowMessage("dd");
end;

включен
один горизональный Скрол.Мышь A4Tech c 2 Roll,на прокрутку обоих роликов откликается только горизонтальный Ролл событие RichEdit1MouseWheel не реагирует


 
TeNY ©   (2004-10-06 19:13) [16]

>
> KSergey ©   (05.10.04 13:22) [14]
> Как делаешь? Что толку говорить "не получается"??

Млжет поможеш?


 
KSergey ©   (2004-10-06 19:57) [17]

> TeNY ©   (06.10.04 19:13) [16]
> Млжет поможеш?

Лень ;)

Кинь подробный код, можно будет глянуть.


 
XProger ©   (2004-10-07 19:15) [18]


 WM_MOUSEWHEEL  :
  delta := HIWORD(wParam) - $7FFF;


 
TeNY ©   (2004-10-11 14:14) [19]


> XProger ©   (07.10.04 19:15) [18]
>
>  WM_MOUSEWHEEL  :
>   delta := HIWORD(wParam) - $7FFF;

Это к чему?



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

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

Наверх





Память: 0.49 MB
Время: 0.03 c
3-1098344203
rogiram
2004-10-21 11:36
2004.11.21
QuickReport без DataSet


1-1099939597
lomman
2004-11-08 21:46
2004.11.21
TWebBrowser


4-1097056444
BVV
2004-10-06 13:54
2004.11.21
Получения списка файлов


1-1099924974
Polycom
2004-11-08 17:42
2004.11.21
Listbox и чтение из файла


3-1098563512
Wint_
2004-10-24 00:31
2004.11.21
You have an error in your SQL syntax





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