ďťż

Ładny brzuch

Jest może jakiś sposób aby przekonwertować Integer do np. Extended (albo dowolnego float'a), jakoś oszukac kompilator albo poslużyć się jakąś procedurką :rolleyes: (He,he :P może to i blache ale ostatnio nie daje mi spokoju). w żadnych helpach nie moge tego znaleść.


var i:integer; s:single; begin i:=1; s:=i;Tak nie działa?

Nieeeeee! Kompilator sygnalizuje że oba tyby są ze sobą niekompatybilne(Integer and Extended).
ProgressBar1.Position:=(FilePos(F)/FileSize(F))/100
Może Round?

Z float na integer wystarczy przypisać (tak napisałeś), a odwrotnie Round() ;)


IntToFloat - konwersja do extedded
Round - obcięcie liczby po przecinku

Taa... poco to pisalem wystarczylo troche se pascala przypomnieć :D


IntToFloat - konwersja do extedded
Round - obcięcie liczby po przecinku
IntToFloat - nie ma takiej funkcji ;)

Round - zaokrąglenie metodą bankiera (gdy mamy w części ułąmkowej 0,5 to zaokrągla do liczby parzystej). Można zmienić działanie round żeby zaokrąglało zawsze do góry - ale to wykracza poza ramy tego posta :P
Trunc - zaokrąglenie zawsze w dół.


IntToFloat - nie ma takiej funkcji ;)

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •