|
28-01-2008, 12:17
|
#1 (permalink) |
|
Banlandı
  
Üyelik tarihi: 22-11-2007
Nerden: napıcan ziyaretemi geLcen!!
Mesajlar: 0
Konular: 2724
Üye No: 11416
Ruh halim:
Rep Gücü : 0
Rep Puanı : 0
Rep Seviyesi :
 
|
Open Save Dialog
procedure TForm1.Button1Click(Sender: TObject);
begin with AgOpenDialog1 do try Execute; finally end; end; procedure TForm1.Button2Click(Sender: TObject); begin with AgSaveDialog1 do try Execute; finally end; end; procedure TForm1.CheckBox1Click(Sender: TObject); begin AgOpenDialog1.ShowPlacesBar := (Sender as TCheckBox).Checked; AgSaveDialog1.ShowPlacesBar := (Sender as TCheckBox).Checked; end; end. |
|
  
|
|
|
 |
| Bu konunun kısa yolunu aşağıdaki sitelere ekleyebilirsiniz! |
| Konu Araçları | |
| Stil | |
|
|
Benzer Konular
|
||||
| Konu | Konuyu Başlatan | Forum | Cevaplar | son Mesaj |
| Save Flash 4.0 | bbiillaall | Programlar | 2 | 28-08-2008 01:59 |
| İngilizce Dialog | okan33 | Yabancı Dil | 3 | 30-01-2008 13:15 |
| IBM?den Open Office?e Desktek | Bilgisayarcı | Bilgisayar Haberleri | 0 | 18-09-2007 12:26 |
| IBM den Open Office?e Desktek | Bilgisayarcı | Bilgisayar Haberleri | 0 | 18-09-2007 12:10 |
| 59. Uluslararası TED Open Turnuvası'nı Alman sporcu Mıscha Zverev kazandı | ayş€ | Haberler | 0 | 12-08-2007 17:40 |
Normal
