| Bu kontrol elemani bir dosyanin kaydetme islemlerini yapan
standart penceredir. Ayrica OPEN DIALOG' un tasidigi tüm
özellikleri tasir.
Companent Palet / Dialogs / Save Dialog 
butonuna tiklanir. |
PROPERTIES |
| 1)Savedialog1.title: Açilan pencerenin
basligini belirleyen özelliktir. Basligi görmek için
savedialog1.execute ile çalistirilir. |
| 2)Savedialog1.Defaultext: Pencere açildiktan
sonra default olarak gelecek dosya uzantisi belirlenir. |
| 3)Savedialog1.Initialdir: Pencerenin default
olarak açilmasini istenen klasör bu özellikle
belirlenir. |
| 4)Savedialog1.Filter: Pencere açildigi
zaman tüm dosyalar degilde sadece belli uzantili dosyalari
listelemek için kullanilan özelliktir. |
| 5)Savedialog1.FilterIndex: Filterözelligi
ile belirlenen Filtre seçeneklerinin hangisinin default
olarak belirleyen özelliktir. |
ÖRNEK 1: Properti özelliklerinin
uygulanmasi. |
|
KODU:
procedure TForm1.Button1Click(Sender: TObject);
begin
saveDialog1.Title:='delphikursu';
//Baslik Ekleme
saveDialog1.DefaultExt:='txt'; // Default
Dosya uzantisi
saveDialog1.Filter:='Tüm Dosyalar|*.*|
txt dosyalari|*.txt';
//Dosya türünü belirler
saveDialog1.FilterIndex:=2; // 2.uzanti
ayarini default getiri.
saveDialog1.InitialDir:='c:\dersler'; //
Aktif Klasörü Belirler
saveDialog1.Execute; //saveDialogu Çalistirir.
if SaveDialog1.Execute then
begin
memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;
end; |
|
|
|
