nedir bu CurrencyManager

CurrencyManager sizin BindingContext yerinize calışır. kod yazarken , kayıt gezintisi yaparken ve yerinizi bulmanızda size kolaylık sağlar.

nasıl kullanılır.

ilk once tanımlıyoruz.

Dim cm As CurrencyManager

daha sonra form load olayına aşağıdaki kodu yazıyoruz. once database i fill edip ondan sonra CurrencyManager ile eşleştiriyoruz.

Me.SqlDataAdapter1.Fill(DsUrun1, "URUN")
cm = Me.BindingContext(DsUrun1, "URUN")

şimdi geldi sırasıyla kodlarımıza

yeni kayıt eklemek ;

cm.EndCurrentEdit()
cm.AddNew()
Me.SqlDataAdapter1.Update(DsUrun1)

kaydetmek ;

cm.EndCurrentEdit()
Me.SqlDataAdapter1.Update(DsUrun1)

sil ;

Dim row As DsUrun.URUNRow
row = DsUrun1.URUN.FindByID(Convert.ToInt32(EditBox1.Tex t))
row.Delete()
Me.SqlDataAdapter1.Update(DsUrun1)

onceki kayıt ;

cm.Position -= 1

sonraki kayıt ;

cm.Position += 1

ben nerdeyim ;

Dim i As Integer
i = cm.Position

şu kayda git ;

cm.Position = 5
__________________