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

Вниз

UpDown   Найти похожие ветки 

 
appendix ©   (2004-08-26 18:32) [0]

Никак не могу сделать чтоб при нажатии на UpDown значения в Position менялись как надо т.е
по нажатию вверх 0 1 2 3 4 5
потом по нажатию вниз 4 3 2 1 0

Пока работает так:
по нажатию вверх 0 1 2 3 4 5
потом по нажатию вниз 6 5 4 3 2 1 0


 
clickmaker ©   (2004-08-26 18:34) [1]

поменяй Max и Min местами


 
appendix ©   (2004-08-26 18:53) [2]

в каком месте?


 
TUser ©   (2004-08-26 18:57) [3]


> в каком месте?

YourProgram.Strings[17-1];


 
GuAV ©   (2004-08-26 21:24) [4]

а не надо OnChanging обрабатывать, другое обрабатывай.


 
appendix ©   (2004-08-27 20:29) [5]

Удалось сделать то что требовалось используя обработчик события OnChangingEx

procedure TForm1.UpDown3ChangingEx(Sender: TObject;
 var AllowChange: Boolean; NewValue: Smallint;
 Direction: TUpDownDirection);

begin
UpDown3.Tag:=NewValue;
if ((Direction=updNone) and (UpDown3.Position=UpDown3.min)) then UpDown3.Tag:=UpDown3.min;
if ((Direction=updNone) and (UpDown3.Position=UpDown3.max)) then UpDown3.Tag:=UpDown3.max;
end;

Но честно говоря мне кажется это извращение.
Тем более, что пришлось использовать UpDown3.Tag вместо UpDown3.Position

Может кто знает лучший способ??


 
GuAV ©   (2004-08-27 22:37) [6]


> NewValue: Smallint

Чем не нравится это?
А ваще имхо ОнКлик.



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
9-1085123883
Bond
2004-05-21 11:18
2004.09.12
Аналоги TBitMap


9-1084908537
WinLamka
2004-05-18 23:28
2004.09.12
PowerDraw>>вывод спрайта.


3-1092750216
Jey
2004-08-17 17:43
2004.09.12
Резервное копирование баз данных


1-1093537914
Yr2
2004-08-26 20:31
2004.09.12
Как скопировать файл из Delphi в web-папку или по URL-адресу?


14-1093108613
able
2004-08-21 21:16
2004.09.12
PHP. Проверка валидности e-mail a