Rozdział 6. ♦ Okienka dialogowe z karty Dialogs
83
Tabela 6.2. Komponenty umożliwiające korzystanie ze standardowych okien dialogowych | |
Komponent |
Znaczenie |
TSaveDialog |
Komponent umożliwia wyświetlenie okna do wyboru nazwy pliku do zapisu. Posiada właściwości takie jak komponent TOpendialog. Dodatkowo ustawiając w oknie Inspektora Obiektów właściwość Options ofOverwritePrompt na true, można zapobiec nadpisaniu plików. |
TOpenPictureDial og |
Komponent umożliwia wyświetlenie okna do wyboru nazwy pliku z ustawionym filtrem na pliki graficzne, np. bmp,jpg, wmf, ico itp. Dla jpg musi być zadeklarowany moduł o nazwie Jpeg. |
TSavePictureDialog |
Komponent podobny do TOpenPictureDialog. |
^ontDialog |
Komponent realizuje standardowy dialog do określania rodzaju i atrybutów czcionki. Wybrana czcionka reprezentowana jest przez właściwość Font. |
TColorDialog |
Umożliwia wyświetlenie okna do wyboru koloru. Wybrany kolor jest reprezentowany przez właściwość Color. |
TPrintDialog |
Okno dialogowe wyświetlane z wykorzystaniem tego komponentu umożliwia zdefiniowanie parametrów wydruku poprzez określenie wartości właściwości takich jak: PrintRange — określa zakres wydruku, czyli numery drukowanych stron: od strony do strony (FromPage-ToPage); Copies — określa liczbę (bukowanych kopii; PrintToFi le — właściwość umożliwia wydruk do pliku; Options — pozwala na modyfikację okna dialogowego, np. dodanie opcji umożliwiającej drukowanie zaznaczonego fragmentu. |
I ~T>rinterSetupDialog |
Okno dialogowe umożliwia skonfigurowanie drukarki, np. ustawienie rozmiaru strony, ustawienie orientacji poziomej lub pionowej strony, właściwości wydruku. |
~indDialog |
Umożliwia wyświetlenie okna dialogowego do wyszukiwania tekstu. |
""3eplaceDi al og |
Okno dialogowe umożliwia wyszukiwanie i zamianę tekstu. |
procedurę TForml.ButtonlClick(Sender: TObject); begin
Label1.Capti on:=BoolToStr(OpenOi alogł.Execute,true); end;
W przykładzie wykorzystano funkcję konwersji BoolToStr z modułu SysUtils, która zamienia wartość typu logicznego (boolean) na łańcuch znaków (string).
Wykorzystaj komponent TOpendialog do wczytania zawartości pliku tekstowego do pola TMemo.
Wstaw na formularzu komponent TMemo, TButton i TOpendialog. Treść procedury obsługi kliknięcia przycisku wygląda tak: