Скачать: CL | DM;

Как заставить думать 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 вся ветка

Скачать: CL | DM;



Память: 0.49 MB
Время: 0.026 c