kodum çalışmıyor


   var
  notForm: TclStyleForm;
  edtOgrenci, edtDers, edtNot: TclEdit;
  btnKaydet: TclButton;
  ogrenciListesi: TStringList;  // Listeyi tanımlıyoruz

void BtnKaydetClick;
var
  satir: String;
{
  // Öğrenci, ders ve not bilgilerini alıp birleştiriyoruz
  satir = edtOgrenci.Text + ' ' + edtDers.Text + ' - ' + edtNot.Text;
  
  // Öğrencileri listeye ekliyoruz
  ogrenciListesi.Add(satir);
  
  // Kullanıcıya mesaj gösteriyoruz
  ShowMessage('Not kaydedildi: ' + satir);
}

{
  // Listeyi oluşturuyoruz
  ogrenciListesi = TStringList.Create;  

  // Formu ve diğer bileşenleri oluşturuyoruz
  notForm = TclStyleForm.Create(Self);

  edtOgrenci = TclEdit.Create(notForm);
  notForm.clGetChild(edtOgrenci);
  edtOgrenci.Text = 'Öğrenci Adı';
  edtOgrenci.Align = alTop;

  edtDers = TclEdit.Create(notForm);
  notForm.clGetChild(edtDers);
  edtDers.Text = 'Ders Adı';
  edtDers.Align = alTop;

  edtNot = TclEdit.Create(notForm);
  notForm.clGetChild(edtNot);
  edtNot.Text = 'Not';
  edtNot.Align = alTop;

  btnKaydet = notForm.AddNewButton(notForm, 'btnKaydet', 'Kaydet');
  btnKaydet.Align = alTop;
  notForm.AddNewEvent(btnKaydet, tbeOnClick, 'BtnKaydetClick');
  
  // Formu çalıştırıyoruz
  notForm.Run;
}

23,39da hata veriyor

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
gulizargergin4233 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 9 Saat 40 Dakika Önce Konum: SARAYÖNÜ Durum: Aktif Değil Puanlar: 2	Mesaj Seçenekleri Yanıt Yaz Alıntı gulizargergin4233 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: kodum çalışmıyor Gönderim Zamanı: 9 Saat 27 Dakika Önce Saat 16:18
	var notForm: TclStyleForm; edtOgrenci, edtDers, edtNot: TclEdit; btnKaydet: TclButton; ogrenciListesi: TStringList; // Listeyi tanımlıyoruz void BtnKaydetClick; var satir: String; { // Öğrenci, ders ve not bilgilerini alıp birleştiriyoruz satir = edtOgrenci.Text + ' ' + edtDers.Text + ' - ' + edtNot.Text; // Öğrencileri listeye ekliyoruz ogrenciListesi.Add(satir); // Kullanıcıya mesaj gösteriyoruz ShowMessage('Not kaydedildi: ' + satir); } { // Listeyi oluşturuyoruz ogrenciListesi = TStringList.Create; // Formu ve diğer bileşenleri oluşturuyoruz notForm = TclStyleForm.Create(Self); edtOgrenci = TclEdit.Create(notForm); notForm.clGetChild(edtOgrenci); edtOgrenci.Text = 'Öğrenci Adı'; edtOgrenci.Align = alTop; edtDers = TclEdit.Create(notForm); notForm.clGetChild(edtDers); edtDers.Text = 'Ders Adı'; edtDers.Align = alTop; edtNot = TclEdit.Create(notForm); notForm.clGetChild(edtNot); edtNot.Text = 'Not'; edtNot.Align = alTop; btnKaydet = notForm.AddNewButton(notForm, 'btnKaydet', 'Kaydet'); btnKaydet.Align = alTop; notForm.AddNewEvent(btnKaydet, tbeOnClick, 'BtnKaydetClick'); // Formu çalıştırıyoruz notForm.Run; } 23,39da hata veriyor

Nida Güvercin Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 12 Mayıs 2025 Durum: Aktif Değil Puanlar: 11	Mesaj Seçenekleri Yanıt Yaz Alıntı Nida Güvercin Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 9 Saat 25 Dakika Önce Saat 16:20
	23. satırdaki kodun 3 parametre alması lazım diye biliyorum...