Хэндлы у Fire Monkey - Delphi FireMonkey

@RobinStone · Регистрация: 18.05.2015

Ребяты!... Хелп ми sos!..

Нужно узнать позицию прокрутки в ListBox, нашёл способ через Хэндл компонента, но как получить этот самый Хэндл - не знаю. Похоже у Горящей обезьяны проблемы с хэндлами. Может их чем заменили?..

Если кто может объяснить - буду очень благодарен.

@krapotkin · 26.10.2016, 14:32

"проблемы с хэндлами" это сильно )
в FMX есть свои, в каждой ОС - свои

Delphi

procedure TForm4.lst1VScrollChange(Sender: TObject);
begin
  lbl1.Text := floatToStr(lst1.ViewportPosition.y)
end;

@RobinStone · 27.10.2016, 16:44 **[ТС]**

Сообщение от krapotkin

DelphiВыделить код
1
2
3
4
procedure TForm4.lst1VScrollChange(Sender: TObject);
begin
* lbl1.Text := floatToStr(lst1.ViewportPosition.y)
end;

А как получить управление скролом? Я вижу у себя только TMemo, как мне добраться к скролу?

@krapotkin · 27.10.2016, 19:16

я не знаю, что нужно сделать
понятие "добраться" отсутствует
про мемо в первом посте вообще ничего не сказано
при чем оно тут?

@RobinStone · 03.11.2016, 11:43 **[ТС]**

ну как в программе узнать в какой позиции находится бегунок у TMemo?
Я даже не знаю как ещё объяснить...

Не силён я в формулировании своих запросов...

В общем, если Вы на этот раз меня поняли,- ответьте пожалуйста... Буду очень благодарен.

@RobinStone 0 / 0 / 0 Регистрация: 18.05.2015 Сообщений: 41
	27.10.2016, 16:44 [ТС]	#3
	Сообщение от krapotkin DelphiВыделить код 1 2 3 4 procedure TForm4.lst1VScrollChange(Sender: TObject); begin * lbl1.Text := floatToStr(lst1.ViewportPosition.y) end; А как получить управление скролом? Я вижу у себя только TMemo, как мне добраться к скролу? 0

@krapotkin 3071 / 2753 / 708 Регистрация: 14.04.2014 Сообщений: 13,104 Записей в блоге: 7
	27.10.2016, 19:16	#4
	я не знаю, что нужно сделать понятие "добраться" отсутствует про мемо в первом посте вообще ничего не сказано при чем оно тут? 0

@RobinStone 0 / 0 / 0 Регистрация: 18.05.2015 Сообщений: 41
	03.11.2016, 11:43 [ТС]	#5
	ну как в программе узнать в какой позиции находится бегунок у TMemo? Я даже не знаю как ещё объяснить... Не силён я в формулировании своих запросов... В общем, если Вы на этот раз меня поняли,- ответьте пожалуйста... Буду очень благодарен. 0

Опции темы

Delphi: FireMonkey

Хэндлы у Fire Monkey - Delphi FireMonkey