Delphi Dünyası Facebook'ta

Duyurular

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

« önceki sonraki »
Sayfa: [1]   Aşağı git

Gönderen Konu: OpenDialog Penceresindeki Buton Başlıklarının(Caption) Değiştirilmesi  (Okunma sayısı 1470 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı NeverFear

  • Delphi 1 Level 2
  • **
  • İleti: 11
  • Rep: +0/-0
  • Cinsiyet: Bay
OpenDialog Penceresindeki Buton Başlıklarının(Caption) Değiştirilmesi
« : 17 Kasım 2008 01:08:02 »
Kod:  (Unknown Language)
  1. procedure TForm1.OpenDialog1Show(Sender: TObject);
  2. begin
  3.    {"OPEN" - > "Aç"}
  4.    SetDlgItemText (GetParent (OpenDialog1.Handle),
  5.                    IDOK, PChar ('&Aufmachen')) ;
  6.    {"Cancel" - > "İptal"}
  7.    SetDlgItemText (GetParent (OpenDialog1.Handle),
  8.                    IDCANCEL, PChar ('&Widerruf')) ;
  9. end;
  10.  
  11. procedure TForm1.Button1Click(Sender: TObject);
  12. begin
  13.   if OpenDialog1.Execute then OpenDialog1Show(Button1);
  14. end;
  15.  
« Son Düzenleme: 27 Haziran 2009 02:33:59 by Kocaturk »
Kayıtlı
Bilgi paylaşımı ve öğrenmenin yaşı olmaz
Sayfa: [1]   Yukarı git
« önceki sonraki »