Sign in Join
Wiki copytemporary

Revision 1 of 3, by WikiArchive on 11-4-2026. The page as it is now.

Howto Use TSaveDialog/pl

Jak używać TSaveDialog?

tsavedialog.png

Podstawowe wytyczne:

1. Umieść obiekt SaveDialog na swojej formie (gdziekolwiek, gdyż nie będzie on widoczny).

pascal
[![Component Palette Dialogs.png](/wiki-images/7/72/Component_Palette_Dialogs.png)](</File:Component_Palette_Dialogs.png>)
     (Jest to drugi od lewej obiekt dialogowy na [[Dialogs tab/pl|zakładce Dialog]])

2. Dodaj obiekt memo na swoją formę.

tmemo.png

3. Dodaj przycisk na swoją formę.

tbutton.png

Okno Inspektor Obiektów wyświetli właściwości obiektu Button1. Zmień właściwość o nazwie 'Caption', która domyślnie wyświetla wartość 'Button1' na 'Save'. Kliknij na zakładkę Zdarzenia w Inspektorze Obiektów. Wybierz przycisk na prawo od OnClick: mały przycisk z trzema kropkami (... odsyłacz). Kliknij na niego, aby automatycznie przejść do Edytora źródeł. Twój kursor będzie umieszczony wewnątrz kawałka gotowego kodu. Kompletny kod:

pascal
procedure TForm1.Button1Click( Sender: TObject );
     begin
       if SaveDialog1.Execute then
        Memo1.Lines.SaveToFile( SaveDialog1.Filename );
     end;

Metoda Execute wyświetla okno dialogowe zapisu pliku. Zwraca ono wartość true, gdy użytkownik wybierze jakiś plik lub false, gdy użytkownik anuluje operację.

Właściwość Filename zwraca pełną nazwę pliku wraz ze ścieżką i literą napędu (jeśli istnieje).

Zobacz także

Tłumaczenie

Na język polski przełożył: --Sławomir Załęcki 13:00, 9 September 2010 (CEST)


From the Free Pascal wiki, page "Howto Use TSaveDialog/pl", as the Internet Archive kept it on 2024-09-20. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.