2 (2496)

74 Aplikacje w Delphi. Przykłady

Wyświetlanie komunikatów z napisami stałymi w języku systemowym — MessageBox

Metoda obiektu Application o nazwie MessageBox ma następującą składnię:

function MessageBox(const Text, Caption: PChar; Flags: Longint = MB_0K): Integer: gdzie:

Text to treść komunikatu, łańcuch znaków wyświetlany w oknie. Można wyświetlać tekst w kilku wierszach, dodając na końcu każdej linii znak #13.

Caption to tytuł okienka, na pasku nazwy.

Flags to parametr określający typ okna, liczbę i rodzaje przycisków, numer aktywnego przycisku, domyślnie jeden przycisk OK. Wybrane wartości tego parametru przedstawiono w tabeli 5.1.

Tabela 5.1. Wybrane wartości parametru Flags

Parametr Flags    Znaczenie

MB_0K	Jeden przycisk z napisem Tak.
MB OKCancel	Dwa przyciski: Tak i Anuluj.
MB_YesNo	Dwa przyciski: Tak i Nie.
MB_YesNoCancel	Trzy przyciski: Tak, Nie, Anuluj.
MB_RetryCancel	Dwa przyciski: Ponów próbą, Anuluj.
MB_AbortRetryIgnore	Trzy przyciski: Przerwij, Ponów próbą, Zignoruj.

Parametr Flags może zawierać jeszcze informacje dotyczące ikon wyświetlanych w oknie lub aktywnego przycisku. Informacje te można znaleźć w pomocy kontekstowej po napisaniu MessageBox i naciśnięciu klawisza FI (podczas edycji).

W tabeli 5.2 przedstawiono wartości zwracane przez funkcję MessageBox w zależności od rodzaju przycisku wybranego w okienku komunikatów. Tabela 5.2. Wartości zwracane przez funkcją MessageBox
Wartość	Znaczenie
IdOk	Po naciśnięciu przycisku OK.
IdCancel	Po naciśnięciu przycisku Anuluj
IdAbort	Po naciśnięciu przycisku Przerwij.
IdRetry	Po naciśnięciu przycisku Ponów próbą.
Idlgnore	Po naciśnięciu przycisku Zignoruj.
IdYes	Po naciśnięciu przycisku Tak.
IdNo	Po naciśnięciu przycisku Nie.

Przykładowy wygląd okien typu MessageBox przedstawiono na rysunku 5.1.