|
DERS ANLATIMI OPEN DIALOG
< |
1
2
|> |
|
OPEN
DIALOG
Bu kontrolü kullanarak olusturmus oldugunuz dosyanizi bulmaniz
için size yardimci pencere açilmasini saglar.
Companent Palet / Dialogs / Opendialog 
butonuna tiklanir. |
PROPERTIES |
| 1)Opendialog1.title: Açilan pencerenin
basligini belirleyen özelliktir. Basligi görmek için
opendialog1.execute ile çalistirilir. |
| 2)Opendialog1.Defaultext: Pencere açildiktan
sonra default olarak gelecek dosya uzantisi belirlenir. |
| 3)Opendialog1.Initialdir: Pencerenin default
olarak açilmasini istenen klasör bu özellikle
belirlenir. |
| 4)Opendialog1.Filter: Pencere açildigi
zaman tüm dosyalar degilde sadece belli uzantili dosyalari
listelemek için kullanilan özelliktir. |
| 5)Opendialog1.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
OpenDialog1.Title:='delphikursu';
//Baslik Ekleme
OpenDialog1.DefaultExt:='txt'; // Default
Dosya uzantisi
OpenDialog1.Filter:='Tüm Dosyalar|*.*|
txt dosyalari|*.txt';
//Dosya türünü belirler
OpenDialog1.FilterIndex:=2; // 2.uzanti
ayarini default getiri.
OpenDialog1.InitialDir:='c:\dersler'; //
Aktif Klasörü Belirler
OpenDialog1.Execute; //OpenDialogu Çalistirir.
end;
|
|
|
|
|
|
