Prikazi cijelu temu 01.11.2013 11:25
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Lokacija:Ohrid Makedonija


Predmet:User control
Pravam edna user controla koja treba da e identicna so textbox no ne znam kao treba da se vnesat parametri za DataSource i DataField.
jas kaj mene staviv
PreuzmiIzvorni kôd (Visual Basic):
  1. Public Property Get DataSource() As String
  2.     DataSource = txtNum.DataSource
  3. End Property
  4.  
  5. Public Property Let DataSource(ByVal New_DataSource As String)
  6.     txtNum.DataSource = New_DataSource
  7.     PropertyChanged "DataSource"
  8. End Property
  9.  
  10. 'Fild
  11.  
  12. Public Property Get DataField() As String
  13.     DataField = txtNum.DataField
  14. End Property
  15.  
  16. Public Property Let DataField(ByVal New_DataField As String)
  17.     txtNum.DataField = New_DataField
  18.     PropertyChanged "DataField"
  19. End Property
  20.  
  21. Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
  22.      PropBag.WriteProperty "DataSource", txtNum.DataSource, ""
  23.     PropBag.WriteProperty "DataField", txtNum.DataField, ""
  24. End Sub
  25.  
  26. Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
  27.      txtNum.DataSource = PropBag.ReadProperty("DataSource", "")
  28.     txtNum.DataField = PropBag.ReadProperty("DataField", "")
  29. End Sub
koga ke ja stavam kontrolata na forma dobivam poraka Metod od data member not faund i obelezano e
.DataSource=