• Web sitemizin içeriğine ve tüm hizmetlerimize erişim sağlamak için Web sitemize kayıt olmalı ya da giriş yapmalısınız. Web sitemize üye olmak tamamen ücretsizdir.
  • Sohbetokey.com ile canlı okey oynamaya ne dersin? Hem sohbet et, hem mobil okey oyna!
  • Soru mu? Sorun mu? ''Bir Sorum Var?'' sistemimiz aktiftir. Paylaşın beraber çözüm üretelim.

Savedialog

Üyelik Tarihi
7 Ocak 2015
Konular
4,091
Mesajlar
4,274
MFC Puanı
40
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.

Kod:
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;
 
Üst