Howto Use TSaveDialog/fi

From Free Pascal wiki
Jump to: navigation, search

Deutsch (de) English (en) español (es) suomi (fi) français (fr) 日本語 (ja) polski (pl) русский (ru) slovenčina (sk)

Kuinka käytät tallenna-dialogia

tsavedialog.png

Yksinkertainen opastus

1. Laita SaveDialog-komponentti lomakkeelle eli Form:lle (Mihin tahansa paikkaan. Se ei ole varsinaisessa ohjelmassa näkyvissä).

 Component Palette Dialogs.png
 (Se on toinen vasemmalta dialogs välilehdellä)


2. Lisää memo- eli muistiokomponentti lomakkeelle.

tmemo.png


3. Lisää Button- eli painonappikomponentti lomakkeelle.

tbutton.png

Komponenttimuokkain näyttää Button1 olion (komponentin) ominaisuudet. Muuta ominaisuutta jota kutsutaan nimellä Caption. Se näyttää arvoa 'Button1'. Vaihda se 'Tallenna' nimiseksi.

Valitse komponenttimuokkaimen tapahtumat välilehti. Mene OnClick:n kohdalla oikealla puolella olevaan painikkeeseen joka on pieni laatikko kolmella pisteellä (...). Napsauta tätä niin siirryt automaattisesti tehtyyn koodirunkoon lähdekoodieditoriin. Täydennä koodi seuraavaksi:

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

Execute-metodi näyttää tallenna dialogin. Se palauttaa joko arvon true kun ohjelman käyttäjä valitsee tiedoston tai arvon false jos käyttäjä keskeyttää valinnan.

Filename property palauttaa tayden tiedostonimen polkuineen.


Katso myös