DBEdit

← →
bushmen © (2004-03-11 16:10) [0]

Можно ли с помощью компонента TUpDown изменять значения DBEdit и если да, то каким способом?

← →
V-A-V © (2004-03-11 16:13) [1]

А какие значения надо изменять?

← →
Vlad © (2004-03-11 16:20) [2]

Это из хелпа.
Up-down controls allow users to change the size of a numerical value by clicking on arrow buttons.
Каким способом - сказано там же.

← →
bushmen © (2004-03-11 16:30) [3]

2 V-A-V ©:

У меня там даты стоят

← →
Vlad © (2004-03-11 16:39) [4]

Только тип SmallInt, это можно увидеть в исходниках.

← →
bushmen © (2004-03-11 16:49) [5]

2 Vlad © (11.03.04 16:39) [4]
Ты, наверное, смотришь на вкладку Samples. А я говорю про компонент TUpDown, который лежит на вкладке Win32. Ему там пофигу, что у тебя лежит Просто в хелпе я не нашел примера на этот компонент, поэтому и спросил.

← →
Vlad © (2004-03-11 16:54) [6]

> bushmen © (11.03.04 16:49) [5]

Нет, я говорю не про SpinEdit, а именно про TUpDown.
И его реализацию ты можешь посмотреть в модуле ComCtrls.pas, там ты увидишь, что он оперирует только типом SmallInt, никакого отношения к датам он не имеет.

← →
bushmen © (2004-03-11 17:45) [7]

2 Vlad ©:
Естественно, он не имеет, но имеет инкремент или дикремент, так что после его изменения можно программно изменить все что угодно. Вот я и хочу узнать как мне узнать, произошло увеличение или уменьшение. А дальше, это уже дело не TUpDown"a

← →
Алхимик © (2004-03-11 17:47) [8]

procedure TfrmMain.UpDown1ChangingEx(Sender: TObject; var AllowChange: Boolean; NewValue: Smallint; Direction: TUpDownDirection); begin ляля end;
Пойдет?

← →
Vlad © (2004-03-11 17:52) [9]

По моему ты ошибаешься.
Смотрим описание класса:
TCustomUpDown = class(TWinControl) private .... FNewValue: SmallInt;

В переменной FNewValue он хранит новое значение(т.е. значение после инкремента/декремента), как видишь даты там быть не может.

> bushmen © (11.03.04 17:58) [11]

Да, похоже Алхимик прав, можно просто не привязывать контрол к компоненту TUpDown. Просто смотреть дирекшн при нажатии на стрелки, и уменьшать или увеличивать твою дату в Edit"е

Старое значение TDBEdit.Field.OldValue

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