---

Suuuuukkkk.....

Er der nogen der kan fortælle mig hvorfor Increment i UpDown ikke virker som
jeg vil have det ??

Jeg har UpDown1.Increment := 3; - Men hvis jeg i min editbox skriver f.
eks. 10 (hvorefter UpDown1.Position := 10;) - så vil et tryk på op (i
UpDown) giver værdien 15.

Den runder åbenbart min værdi op til noget der kan divideres med 3.

Skal den virkelig gøre det ???? (Har spildt flere timer på at få det til at
virke :(

//:::::::::::::::::::::::
procedure TForm1.UpDown1Click(Sender: TObject; Button: TUDBtnType);
begin
Edit1.Text := IntToStr(UpDown1.Position);
end;

procedure TForm1.Edit1Change(Sender: TObject);
begin
UpDown1.Position := StrToInt(Edit1.Text);
UpDown1.Hint := IntToStr(UpDown1.Position);
end;
//:::::::::::::::::::::

På forhånd tak.... Nu vil jeg gå ind og trøstespise mens jeg ser Alien (kan
ikke ses for mange gange) - måske det vil hjælpe på humøret :)

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Esben Piltoft E-mail: piltoft@mail1.stofanet.dk