Forums

by MichaelHill >> Thu, 11 Apr 2002 1:54:51 GMT

Afternoon,

I have a problem with the first time I click the "UP" arrow of the scrollbar. It's returning the value of the text box as the value of the 'scroll.value' field, but everytime after that it is working fine. Has anyone seen this happen before?

I've included the scrolled method which is the one responsible for updating the text field.

vscrHour_scrolled(scroll: ScrollBar input; scrollBar: Integer) updating;

vars

tempValue : Integer;
begin



tempValue := txtHour.text.Integer;

if scroll.value > 1 then
if tempValue > 0 then
tempValue := txtHour.text.Integer - 1;
endif;
scroll.value := 1;
elseif scroll.value < 1 then
if tempValue.Integer < 23 then
tempValue := txtHour.text.Integer + 1;
endif;
scroll.value := 1;
endif;

if (tempValue < 10) then
txtHour.text := 0.String & tempValue.String;
else
txtHour.text := tempValue.String;
endif;

end;

The "down" is working fine.

Anyone have any ideas.

Cheers

Michael Hill
Gallagher Group Ltd