procedure TForm1.btnEkleClick(Sender: TObject);
const s:integer=0;
begin
if lvwkisiler.items.count=0 then s:=0
lvwOgrencilistesi.Items.Add;
//satır icerikleri
lvwOgrencilistesi.items.item[s].Caption:=edAdSoyad.Text;
lvwOgrencilistesi.Items.Item[s].SubItems.Add(cboBolumu.Text);
lvwOgrencilistesi.items.Item[s].SubItems.Add(DateToStr(dtpKayitTarihi.Date));
s:=s+1;
end;
end.
ben bi delphi kitabı aldım icinde bu kod vardı.(bu kodun tamamı deil tabiki) ordan bi program yazarken s:=s+1 ve if lvwkisiler.items.count=0 then s:=0
satırlarında hata veriyor.Nerede yanlış yaptım??
__________________
Arkadaşlar nerde hata yapıyorum??
Programlama0 Mesaj
●32 Görüntüleme
- ReadBull.net
- Programlama ve Yazılım
- Programlama
- Arkadaşlar nerde hata yapıyorum??