7 4

Wydział Transportu PW

Laboratorium z. informatyki scm.IL/ ćw. 7

Pole wyboru - komponent CheckBox jj*

Komponent służy do zaznaczenia wyboru pewnej opcji. Właściwość Caption określa napis ' na komponencie. Właściwość Checked typu Boolean ma wartość True, gdy opcja jest zaznaczona (jak na rysunku), a wartość False, gdy opcja nie jest zaznaczona. Kliknięcie pola zmienia wartość Checked na przeciwną. W aplikacji użyliśmy właściwości Checked do określenia wartości właściwości Sorted (typu Boolean) pola listy ListBoxl.:

ListBoxl. Sorted: =Check.Boxl. Checked;

Zmienne systemowe - nazwy miesięcy i dni tygodnia

Delphi udostępnia zmienne systemowe zawierające nazwy miesięcy i dni tygodnia. Podobnie jak dla zmiennej DecimalSeparator, ich początkowe wartości są ustalane na podstawie rejestru systemu Windows, zgodnie z wersjąjęzykową.

LongMonthNames - 12-elementowa tablica zawierająca pełne nazwy miesięcy np. LongMonthNames[l]= ' styczeń'¹

LongDayNames - 7-elementowa tablica nazw dni tygodnia np. LongDayNames[l]- ' niedziela'

Instrukcja with

Odwołania do pól i metod obiektu mają postać kwalifikowaną, tzn. przed nazwą pola lub metody występuje nazwa obiektu z kropką, np, Labell .Caption lub ListBoxl. Items. Count. Jeśli w obrębie instrukcji wielokrotnie odwołujemy się do tego samego obiektu, to można uprościć zapis stosując instrukcję with with obiekt do instrukcja

W obrębie instrukcji (może to być też blok instrukcji begin ... end ) możemy pominąć kwalifikator.

Na przykład zamiast zapisu:

for i:=l to StringGridl.ColCount do StringGridl. Cells[0,i]:=''; możemy zastosować równoważny zapis z instrukcją with: with StringGridl do

for i:=1 to ColCount do Cells [0,i] :; instrukcja for w wersji downto Instrukcja pętli może mieć postać

for /:= wl downto w2 do instrukcja

W tym przypadku początkowa wartość wl zmiennej sterującej pętlą powinna być niemniej sza od wartości końcowej w2, a w każdym kroku pętli wartość zmiennej i zmniejsza się o 1.

Wybrane funkcje wbudowane operujące na łańcuchach

AnsiUpperCase( S ) - zwraca łańcuch utworzony z parametru S (typu string) przez zamianę liter na duże, zgodnie z zainstalowanym sterownikiem językowym

UpperCase( S ) - zwraca wynik zamiany łańcucha S na duże litery, bez uwzględnienia znaków narodowych

AnsiLowerCase(S) - zwraca łańcuch utworzony z S przez zamianę liter na małe, zgodnie z zainstalowanym sterownikiem językowym.

LowerCase( S ) - zwraca wynik zamiany łańcucha S na małe litery, bez uwzględnienia znaków narodowych

Dla pojedynczych znaków (typu char) dostępna jest funkcja UpCase:

UpCase(C) - zwraca znak C zamieniony na dużą literę.

Moduły bibłioteczne Delphi

Podczas tworzenia nowego modułu Delphi automatycznie umieszcza w klauzuli uses nazwy modułów potrzebnych do kompilacji np. Windows, SysUtils, Classes, Controls, Forms. Moduły te zawierają definicje typów, funkcji i procedur wbudowanych. Ponadto zgrupowane tematycznie funkcje i procedury znajdują się w modułach bibliotecznych, które nie są dołączane automatycznie i sami musimy umieszczać ich nazwy w klauzuli uses. Przykładami takich modułów są:

Math - zawierający podprogramy matematyczne

StrUtils - zawierający funkcje i procedury operujące na tekstach.

W module StrUtils zdefiniowana jest funkcja ReverseString, odwracająca kolejność znaków w tekście: ReverseString( S ) zwraca łańcuch S „wspak”