3 4

Wydział Transportu PW

Laboratorium z informatyki sem.II. ćw. 3

Zdarzenie OnCreate dla formy

Zdarzenie OnCreate występuje w chwili uruchamiania aplikacji, gdy forma jest tworzona instrukcją Application. CreateForm, zapisaną w części wykonywalnej pliku projektu (pliku .dpr). Zdarzenie OnCreate jest domyślnym zdarzeniem dla formy. W procedurze obsługi zdarzenia OnCreate wpisujemy instrukcje ustalające początkowy stan aplikacji, np. widoczność komponentów na formie.

Zdarzenie OnChangę

Zdarzenie OnChange występuje dla niektórych komponentów okienkowych przy zmianie przez użytkownika w czasie wykonania programu wyróżnionych właściwości, np. tekstu, obrazu lub położenia. Zdarzenie to występuje również przy programowej zmianie odpowiednich właściwości. Przykładem jest zdarzenie OnChange komponentu Edit, które jest związane ze zmianą tekstu w polu edycyjnym. Jest to zdarzenie domyślne dla komponentu Edit.

Parametr Sender

Parametr Sender typu TObject występuje w każdej procedurze obsługi zdarzenia. Oznacza on komponent, którego dotyczy zdarzenie obsługiwane przez procedurę, na przykład przycisk, który został kliknięty. W przypadku programowego wywołania procedury obsługi zdarzenia (jak np. wywołanie procedury EditChange wewnątrz procedury SpeedButtonClick) należy przekazać parametr Sender: EditChange (Sender) ;    //wywołanie procedury obsługi zdarzenia

Zagnieżdżone instrukcje if

W celu sprawdzenia szeregu warunków można stosować zagnieżdżone instrukcje if. Wewnętrzna instrukcja jest wykonywana w przypadku, gdy spełniony jest warunek zewnętrznej. W poniższym przykładzie kontrola semantycznej poprawności parametrów następuje tylko w przypadku poprawnego wczytania danych:

if CzytajR(Editl_/x) and CzytajC(Edit2,n) then

if (x=0) and (n<=0) then Loperacja.Caption:= 'operacja niewykonalna' else ... else ...

Jeżeli w tak zagnieżdżonych instrukcjach if występuje część else, jest ona wiązana z najbliższą kontekstowo częścią then. W obu częściach mogą występować dowolne instrukcje wewnętrzne, w szczególności bloki instrukcji begin ... end.

Właściwości Color i FontColor

Właściwość Color komponentu wizualnego (np. Form, Label, Edit) określa kolor tła komponentu, a właściwość Font.Color określa kolor czcionki tekstu wyświetlanego w komponencie. Właściwościom tym można nadać wartości wyrażone za pomocą predefiniowanych stałych. Delphi udostępnia następujące stałe kolorów: clAqua, cIBIack, cIBIue, cICream, clDkGray, cIFuchsia, cIGray, cIGreen, clLime, cILtGray, cIMaroon, cIMedGray, clMoney Green, clNavy, clOlive, cl Purple, cl Red, clSilver, dSkyBlue, cITeal, dWhite, clYellow

Ponadto są dostępne nazwy kolorów wykorzystywanych w systemie Windows do wyświetlania elementów okien: clActiveBorder, clActiveCaption, clAppWorkSpace, cIBackground, cIBtnFace, dBtnHighlight, cIBtnShadow, clBtnText, clCaptionText, dGrayText, dHighlight, dHighlightText, cllnactiveBorder, cllnactiveCaption, dlnadiveCaptionText, cl Menu, clMenuText, cIScrollBar, dWindow, dWindowFrame, clWindowTexł.

Przykład:

Label 1 .Color: =clRed;    //wyświetla tlo etykiety w kolorze czerwonym

Label l. Font. Color: =ciGreen ; //wyświetla napis na etykiecie w kolorze zielonym

Funkcja Abs

Funkcja Abs zwraca wartość bezwzględną (moduł) liczby. Parametrem tej funkcji może być wartość zmiennej lub wyrażenia arytmetycznego typu całkowitego lub rzeczywistego.

Konkatenacja tekstów

Wartości typu string można łączyć ze sobą operatorem +, wykonującym składanie (konkatenację) tekstów. Na przykład napis intToStr (n) +' po ’ +lntToStr (k) składa się z dwóch liczb w postaci tekstowej, zwracanej przez funkcje konwertujące, rozdzielonych stałą tekstową ' po '. Jeśli n=6, k=3, to otrzymamy napis: '6 po 3'