Zdravim. Mam formular Form1 v nom je dataset z tabulkami. Z tohto formulara otvaram dalsi formular Form2, dataset predavam ako ByRef. Pri odchode z formulara Form2 dam bindingsource.endedit a kontrolujem ci nedoslo k zmene v datasete. Ale ja chcem skontrolovat ci nedoslo k zmene bez bindingsource.endedit, ten totiz zapise udaje do datasetu a toto nechcem. Ako na to?
Public Class Form2
private ds as dataset
Public Sub New(ByRef d As dataS)
InitializeComponent()
ds = d
BindingSource1.DataSource = ds
End Sub
Private sub zatvor(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
BindingSource1.EndEdit()
If ds.HasChanges() Then
If MsgBox("Došlo k zmenám, zmenené údaje budú stratené. Pokračovať?", vbYesNo) = vbNo Then
e.Cancel = True
End If
End If
End Sub
End Class
|