Új hozzászólás Aktív témák

• Ispy nagyúr

  #2775

  #2774 BigBadPlaYeR

  2017-04-01 00:52:19

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Ispy

  nagyúr

  #2774 BigBadPlaYeR

  #2774 BigBadPlaYeR

  Üdv!

  A Combobox-os végül elengedtük, máshogy oldottuk meg az adatok beírását.
  Viszont a Datatable-től villám gyors lett a GridView! Köszönöm az ötletet!

  Lenne egy másik kérdésem is:
  VB.net-ben hogyan lehet megoldani, hogy két user form "egymáshoz tapadjon"? Van egy Main form, amiről több kiegészítő formot lehet indítani. Amikor a Form2 indul, egyből a Main Form mellett jelenik meg, eddig ok. Azt szeretném, ha mozgatom a main form-ot, akkor a form2 is mozduljon vele (az már csak a hab lenne a tortán, ha fordítva is működne).

  Form.LocationChanged eventel kell játszani.

• Ispy nagyúr

  #2772

  #2769 BigBadPlaYeR

  2017-03-28 18:42:03

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Ispy

  nagyúr

  #2769 BigBadPlaYeR

  #2769 BigBadPlaYeR

  Üdv!

  VB.NET-ben készítek a kollegámmal egy kiegészítőt egy CAD-programhoz. Adatokat akarunk megjeleníteni egy DaraGridView-ban (CustomInfoDataGrid néven fut a kódban). Ott van a probléma, hogy amikor a CAD-ből kiolvasott adatokat fel akarom tölteni a sorba, az késleltetéssel megy végbe. Bizonyos számú lépésen még túl kell mennie, mire ténylegesen megjelenik az új sor az adatokkal.

  For i As Integer = 0 To (myConfigsList.Count - 1)
' Változók behívása az aktuális config-ból
Dim ConfigName As String = myConfigsList.Item(i)

Dim PartNo As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "PartNo")
Dim Description As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Description")

Dim Finish As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Finish")
@ Dim Jelleg As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Jelleg")


' Aktuális DataGrid sorhoz infók hozzáadása
Debug.Print("----PrepareDataGridView - AddRowKezd")

# CustomInfoDataGrid.Rows.Add(ConfigName, PartNo, Description, Jelleg) 'MaterialValue, Finish)
Debug.Print("----PrepareDataGridView - AddRowVége")

Next i

  A #-el jelölt sorban van a parancs, hogy adja hozzá a sort az adatokkal. De ez nem történik meg, egészen addig, amíg a következő loop-ban el nem ér a @-al jelölt sorig. Ez alapból nem lenne baj, csak az értékek függvényében a további oszlopok más-más értéket kapnának. És amíg nincs kitöltve az összes érték, a következő folyamat hibára fut.

  Van valakinek ötlete, hogy ez így normális, vagy a kódunkban van valami hiba? Valahogyan azonosítani kellene, hogy mikor töltötte fel az új sort. Próbáltam az idővel is játszani, beállítottam a végén már 10 másodperces várakozást is, de egészen addig nem jelent meg a sor, amíg a @-al jelölt elemhez nem ér a program.

  Előre is köszönök minden ötletet!

  És ha csinálnál inkább egy datatable-t, azt feltöltöd és utána megadod a gridnek, DataSource=DT.

• Delila_1 veterán

  #2770

  #2769 BigBadPlaYeR

  2017-03-28 17:20:26

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Delila_1

  veterán

  #2769 BigBadPlaYeR

  #2769 BigBadPlaYeR

  Üdv!

  VB.NET-ben készítek a kollegámmal egy kiegészítőt egy CAD-programhoz. Adatokat akarunk megjeleníteni egy DaraGridView-ban (CustomInfoDataGrid néven fut a kódban). Ott van a probléma, hogy amikor a CAD-ből kiolvasott adatokat fel akarom tölteni a sorba, az késleltetéssel megy végbe. Bizonyos számú lépésen még túl kell mennie, mire ténylegesen megjelenik az új sor az adatokkal.

  For i As Integer = 0 To (myConfigsList.Count - 1)
' Változók behívása az aktuális config-ból
Dim ConfigName As String = myConfigsList.Item(i)

Dim PartNo As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "PartNo")
Dim Description As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Description")

Dim Finish As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Finish")
@ Dim Jelleg As String = swActiveModel.CustomInfo2(myConfigsList.Item(i), "Jelleg")


' Aktuális DataGrid sorhoz infók hozzáadása
Debug.Print("----PrepareDataGridView - AddRowKezd")

# CustomInfoDataGrid.Rows.Add(ConfigName, PartNo, Description, Jelleg) 'MaterialValue, Finish)
Debug.Print("----PrepareDataGridView - AddRowVége")

Next i

  A #-el jelölt sorban van a parancs, hogy adja hozzá a sort az adatokkal. De ez nem történik meg, egészen addig, amíg a következő loop-ban el nem ér a @-al jelölt sorig. Ez alapból nem lenne baj, csak az értékek függvényében a további oszlopok más-más értéket kapnának. És amíg nincs kitöltve az összes érték, a következő folyamat hibára fut.

  Van valakinek ötlete, hogy ez így normális, vagy a kódunkban van valami hiba? Valahogyan azonosítani kellene, hogy mikor töltötte fel az új sort. Próbáltam az idővel is játszani, beállítottam a végén már 10 másodperces várakozást is, de egészen addig nem jelent meg a sor, amíg a @-al jelölt elemhez nem ér a program.

  Előre is köszönök minden ötletet!

  A helyfoglalásokat (Dim) a ciklus elé írd, és csak a nevük és típusuk szerepeljen ott.

  Dim ConfigName As String, PartNo As String, Description As String

  A ciklusban már csak értéket adj ezeknek:

  ConfigName = myConfigsList.Item(i)
PartNo = swActiveModel.CustomInfo2(myConfigsList.Item(i), "PartNo")

  stb.

Új hozzászólás Aktív témák