51
Rozdział 4. ♦ Wprowadzanie danych, formatowanie i wyświetlanie na ekranie
Tabela 4.2. Funkcje zamieniające liczbą na tekst (łańcuch znaków, string)
Funkcja |
Znaczenie |
IntToStr |
Funkcja zamienia liczbę całkowitą na łańcuch znaków, np. Editl.Text := IntToStr *»(,liczba) —w okienku Editl wyświetlona zostanie wartość zmiennej liczba. |
“oatToStr |
Funkcja zamienia liczbę rzeczywistą na łańcuch znaków; separator dziesiętny jest taki jak w systemie Windows. |
“oatToStrF |
Funkcja zamienia liczbę rzeczywistą na łańcuch znaków formatowany, tzn. np. z określoną liczbą miejsc po przecinku; funkcja z parametrami ma postać: FIoattostrF! liczba, format, precyzja, dokładność), gdzie: 1 iczba — to liczba rzeczywista z kropką dziesiętną lub zmienna; format — to stała, od której zależy format liczby, np. ffFi xed — format stałoprzecinkowy; precyzja — to liczba cyfr znaczących; dla liczby typu singl e nie powinna przekroczyć wartości 7; dokładność — liczba cyfr po przecinku (kropce). Przykłady — przyjęto założenie, że separator w Windows to przecinek: Instrukcja Wynik FIoattoStrF(123.456, ffFixed,5.2); 123.46 FIoattoStrF(123.456. ffFixed,7,4); 123,4560 FIoattoStrF(123.456, ffFixed.5,4): 123,4600 - tylko 5 cyfr znaczących, reszta zera Informacje o pozostałych formatach dla funkcji FloatToStrF są dostępne w pomocy do Delphi. |
"onratFloat |
Podobnie jak poprzednia funkcja zamienia liczbę rzeczywistą na łańcuch znaków; posiada dwa parametry: format i liczba. Format jest zapisywany w postaci łańcucha znaków. Przykłady — przyjęto założenie, że separator w Windows to przecinek: Instrukcja Wynik FormatFloat(' 00.00'. 123.456): 123,46 FormatFloat('0.000'.123.456): 123.456 FormatFloat('0000.00'.123.456): 0123.46 FormatFloat('##00.0000',123.456); 123.4560 |
Format |
Funkcja umożliwia formatowanie liczb, a także łańcuchów znaków. W przykładach w tej książce wykorzystano ją do wyświetlania liczb wyrównanych do prawej strony za pomocą spacji, np. w tabeli Stri ngGri d. |
LolorToString |
Przykłady — przyjęto założenie, że separator w Windows to przecinek: Instrukcja Wynik: Format!'*7.2f',[123.456]): _123,46(lspacja przed liczbą) Format!''Liczba losowa W.[Random!10)]); Liczba losowa 0 Format!'X7s'.['Ala']); _Al a (4 spacje) Format!'%7s'.['Alicja']); _Alicja (1 spacja) Funkcjata — o składniColorToString (Color: TColor): string;—zwracanazwę koloru na podstawie liczby określającej kolor (typu TColor). Jeśli wartość będąca parametrem nie ma odpowiednika słownego, to zamiast nazwy koloru funkcja zwraca jego numer w postaci heksadecymalnej, np. ColorToString(255) —wynikiem będzie clRed; ColorToString(123456j ; —wynikiem będzie $0001E240. |