/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
SpinEdit trin 10 20 ...100 ?
Fra : Monie Jacobsen


Dato : 26-08-02 14:36

Hej
Jeg har et problem med SpinEdit, som her er navngivet serRadius.
SpinEdit starter hele tiden med trin 2. Hvor ønsket var 1.

Dvs. 20,30, 40 osv.
Hvor der skulle startes med: 10, 20, 30 40 osv.

Komponent SpinEdit, serRadius er sat med følgende værdier:

serRadius.Increment:=10;
serRadius.MaxLength:=100;
serRadius.MaxValue:=100;
serRadius.MinValue:=10;

Har du en løsning på dette problem

Her følger coden hvor serRadius optræder.

procedure TForm1.serRadiusChange(Sender: TObject);
Var
Rkonstant,Radius:Real;
begin

radius:=5000;
Rkonstant:= (serRadius.Value/100)*radius;;

Memo1.Lines.Add('Rkonstant r/R: '+ FormatFloat('#0',Rkonstant));

Listbox1.Items.Add(FormatFloat('#0',serRadius.Value));

end;

MVH
Monie




 
 
Peter Vrist (26-08-2002)
Kommentar
Fra : Peter Vrist


Dato : 26-08-02 22:00

Du mangler muligvis at sætte værdien serRadius.Value til 10.

Hilsen Peter Vrist

"Monie Jacobsen" <monie@tdcadsl.dk> skrev i en meddelelse
news:3d6a2ed4$0$53653$edfadb0f@dspool01.news.tele.dk...
> Hej
> Jeg har et problem med SpinEdit, som her er navngivet serRadius.
> SpinEdit starter hele tiden med trin 2. Hvor ønsket var 1.
>
> Dvs. 20,30, 40 osv.
> Hvor der skulle startes med: 10, 20, 30 40 osv.
>
> Komponent SpinEdit, serRadius er sat med følgende værdier:
>
> serRadius.Increment:=10;
> serRadius.MaxLength:=100;
> serRadius.MaxValue:=100;
> serRadius.MinValue:=10;
>
> Har du en løsning på dette problem
>
> Her følger coden hvor serRadius optræder.
>
> procedure TForm1.serRadiusChange(Sender: TObject);
> Var
> Rkonstant,Radius:Real;
> begin
>
> radius:=5000;
> Rkonstant:= (serRadius.Value/100)*radius;;
>
> Memo1.Lines.Add('Rkonstant r/R: '+ FormatFloat('#0',Rkonstant));
>
> Listbox1.Items.Add(FormatFloat('#0',serRadius.Value));
>
> end;
>
> MVH
> Monie
>
>
>



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste