¨ Wielkoci fizyczne. Procedury przeliczania wielkoci fizycznych. Moduły...
29
ConvTypeToDescription() — funkcja
Składnia
>$(!:*):()(!:!:)(2#
Opis
Funkcja zwraca łańcuch znaków reprezentujący pełną nazwę (bez przedrostka) określonej jednostki. Wyszczególniona jednostka musi być elementem zarejestrowanego układu
jednostek.
Przykład
:0$A$(( 8%09F(#
2
0(E(" $%#''#
0#
Patrz równie
!", !", )*!",
!", $%!"
ConvTypeToFamily() — funkcja
Składnia
>$(!: !)(!:!: !#
0#
>$(!: !)(D!: !#
0#
Opis
Funkcja !" zwraca identyfikator układu jednostek, którego elementy podlegają przeliczaniu. Parametr jest zarejestrowanym typem jednostki. Jeżeli ist-
nieje potrzeba sprawdzenia, czy dwie jednostki należą do tego samego układu, należy skorzystać z drugiej postaci funkcji. Jeżeli parametr nie jest zarejestrowany lub
oraz nie są zarejestrowane w tym samym układzie jednostek, funkcja &
!" generuje wyjątek ((.
Przykład
:0$A$(( 8%09F(#
2
0(E("?%( ## %#
0(E("?%( ## %(#)*#
0#
30
Delphi 6. Nowe narzdzia obliczeniowe
Patrz równie
!", !", !", $%!", !"
ConvUnitAdd() — funkcja
Składnia
>$(5(00)(? $*$ #)(!:!:#
)(? $*$ #)(!:D
1)$ (!:!:*$ #
Opis
Funkcja ) ++!" dodaje dwie wartości oraz . Parametry
oraz reprezentują czynniki przeliczeniowe należące do układu jednostek, w któ-
rych wyrażone są odpowiednio wartości oraz . $ jest jednostką,
w której chcemy otrzymać wynik. Trzeba zwrócić uwagę na to, iż korzystając z przedsta-wionej funkcji należy rozsądnie wybierać czynniki przeliczeniowe wielkości, które mają być dodane (np. nie można otrzymać sensownego wyniku z dodania 1 litra do 1 kilo-grama), oraz jednostkę, w której chcemy otrzymać wynik. Funkcja ta nie działa poprawnie przy próbie dodania do siebie dwóch wielkości posiadających identyczne czynniki przeliczeniowe (jednostki). Wyjątkiem są podstawowe jednostki danego zbioru
wielkości, np. metr, stopień Kelvina, itp. Dokładniej z tym zagadnieniem Czytelnik może zapoznać się testując projekt Kody\Rozdzial1\ConvUniAdd\p_ConvUniAdd.dpr, którego główny moduł został przedstawiony w poniższym przykładzie.
Przykład
;;*00CQ.QO!.C 8R:S($FT!.
;;QO)8 (:($
$(5(B5(00#
(>
$))
<0C)D'))2)D%!)5( )D?()D )))D
3:.)D( )D)D
* 2)D%(0( )D5( )D%(0)#
(!:
" ))
6)(AE6)(AE#
6)(AE6)(AE#
A$((A$((#
0(0(#
0(0(#
0(0(#
6)(AE6)(AE#
6 6 #
6 6 #
Rozdział 1. ¨ Wielkoci fizyczne. Procedury przeliczania wielkoci fizycznych. Moduły...
31
6 6 #
:0$(%09F(#
:0$A$(( 8%09F(#
:(
G7(0 ()H
:$
G7$ 0 ()H
0#

#
: ((
GI1J0>H
:0$(%09F(#
2
6)(AE-(-0E"#
6)(AE-()KL"M )$)M#;;
6)(AE-()KL"M, M#;;
6)(AE-()KL"M..(M#;;
6)(AE-()KL"M18M#;;
6)(AE-()K L"M1$M#;;
6)(AE-(-0E"#
6)(AE-()KL"M )$)M#;;
6)(AE-()KL"M, M#;;
6)(AE-()KL"M..(M#;;
6)(AE-()KL"M18M#;;
6)(AE-()K L"M1$M#;;
6)(AE-(-0E"#
6)(AE-()KL"M )$)M#;;
6)(AE-()KL"M, M#;;
6)(AE-()KL"M..(M#;;
6)(AE-()KL"M18M#;;
6)(AE-()K L"M1$M#;;
0#
;;
:0$A$(( 8%09F(#
2
0(E(" (%( + !
!

,#
0#
;;
0
Patrz równie
)!", )!", ),!"
32
Delphi 6. Nowe narzdzia obliczeniowe
ConvUnitCompareValue() — funkcja
Składnia
>$(5(:? $)(? $*$ #)(!:
!:#)(? $*$ #)(
!:!:? $1 ().:#
Opis
Funkcja ) !" porównuje dwie wartości ze względu na ich aktualne jednostki. Testowane wartości muszą reprezentować wyniki pomiarów tych samych wielkości należących do tego samego układu jednostek. oraz są warto-
ściami, które poddawane są operacji porównania. oraz są jednostkami
odpowiednio dla oraz .
Funkcja ) !" zwraca wartość:
-# . (/) jeżeli jest mniejsze niż ;
(0 .( ) jeżeli jest równe ;
# () — jeżeli jest większe niż .
Jeżeli zechcemy jawnie korzystać z przedstawionych predefiniowanych stałych, w dekla-
racji głównego modułu aplikacji należy włączyć moduł .
Przykład
Aplikacja projektu Kody\Rozdzial1\ConvUnitComparevalue\p_ConvUnitComparevalue
.dpr przedstawia jeden ze sposobów porównania długości mierzonego czasu.
$(5(B5(: $#
(>
$))
<0C)D'))2)D%!)5( )D?()D )))D
3:.)D( )D)D!:)D
* 2)D%(0( )D5( )D%(0)#
(!:
" ))
6)(AE6)(AE#
6)(AE6)(AE#
A$((A$((#
0(0(#
0(0(#
:0$(%09F(#
:0$A$(( 8%09F(#
:(
G7(0 ()H
:$
G7$ 0 ()H
0#
Rozdział 1. ¨ Wielkoci fizyczne. Procedury przeliczania wielkoci fizycznych. Moduły...
33

#
: ((
GI1J0>H
:0$(%09F(#
2
6)(AE-(-0E"#
6)(AE-()KL"M' %0)M#;;U
6)(AE-()KL"M%0)M#;;
6)(AE-()KL"M'$()M#;;
6)(AE-()KL"M+$)M#;;
6)(AE-()K L"M*!)M#;;
6)(AE-()KL"M<8)M#;;
6)(AE-()K L"M(2.()M#;;
6)(AE-()KUL"M'(.)M#;;
6)(AE-(-0E"#
6)(AE-()KL"M' %0)M#;;U
6)(AE-()KL"M%0)M#;;
6)(AE-()KL"M'$()M#;;
6)(AE-()KL"M+$)M#;;
6)(AE-()K L"M*!)M#;;
6)(AE-()KL"M<8)M#;;
6)(AE-()K L"M(2.()M#;;
6)(AE-()KUL"M'(.)M#;;
0#
;;
:0$A$(( 8%09F(#
2
) +- # !
.
!
.>
6)).? $
%.C'))2(MN2N)N)N2N)MD
K)%( (0(E(D
6)(AE-()K6)(AE-(-0ELD
MC(RVF)STOMD
)%( (0(E(D
6)(AE-()K6)(AE-(-0ELL#
&$ )? $
%.C'))2(MN2N)N)N2N)MD
K)%( (0(E(D
6)(AE-()K6)(AE-(-0ELD
MF)(QCMD
)%( (0(E(D
6)(AE-()K6)(AE-(-0ELL#
3(.? $
%.C'))2(MN2N)N)N2N)MD
K)%( (0(E(D
6)(AE-()K6)(AE-(-0ELD
MC(RVCW8)STOMD
34
Delphi 6. Nowe narzdzia obliczeniowe
)%( (0(E(D
6)(AE-()K6)(AE-(-0ELL#
0#
0#
;;
0
Patrz równie
!", )* !", $#
ConvUnitDec() — funkcja
Składnia
>$(5(*)(? $*$ #)(!:!:#
)($(*$ #)($(!:
!:*$ # 0#
>$(5(*)(? $*$ #)(!:D$(!:
!:*$ # 0#
Opis
Funkcja )!" zmniejsza wartość wyspecyfikowanej wielkości o zadaną liczbę.
Parametry oraz są odpowiednio oryginalną wyjściową wartością wielkości
oraz jej jednostką. jest wartością, którą odejmujemy od wartości wyjściowej.
W przypadku, gdy nie została ona ustalona domyślnie przyjmuje się 1.
jest typem jednostki, w której wyrażany jest parametr .
Przykład
Poniższy fragment kodu obrazuje prosty sposób manipulacji czasem.
:0$(%09F(#
2
6)(AE-(-0E"#
6)(AE-()KL"M'$()M#;;
6)(AE-()KL"M+$)M#;;
6)(AE-()KL"M*!)M#;;
6)(AE-()KL"M<8)M#;;
6)(AE-()K L"M(2.()M#;;
6)(AE-()KL"M'(.)M#;;
6)(AE-()K L"M/)M#;;
6)(AE-()KUL"M*0)M#;;
6)(AE-()K L"M($)M#;;U
6)(AE-()KL"M' M#;;
6)(AE-()KL"M*(M#;;
6)(AE-(-0E"#
6)(AE-()KL"M'$()M#;;
6)(AE-()KL"M+$)M#;;
Rozdział 1. ¨ Wielkoci fizyczne. Procedury przeliczania wielkoci fizycznych. Moduły...
35
6)(AE-()KL"M*!)M#;;
6)(AE-()KL"M<8)M#;;
6)(AE-()K L"M(2.()M#;;
6)(AE-()KL"M'(.)M#;;
6)(AE-()K L"M/)M#;;
6)(AE-()KUL"M*0)M#;;
6)(AE-()K L"M($)M#;;U
6)(AE-()KL"M' M#;;
6)(AE-()KL"M*(M#;;
0#
;;
:0$%:0(.2%09F(#
2
0(E(" (%( +$% !
/
!- #
/#
0#
Patrz równie
) ++!", )!", ),!"
ConvUnitDiff() — funkcja
Składnia
>$(5(*>>)(? $*$ #)(!:!:#
)(? $*$ #)(!:D
1)$ (!:!:*$ #
Opis
Funkcja )!" wylicza różnicę pomiędzy dwiema wartościami.