Posty bez odpowiedzi |oraz Aktywne tematy Dzisiaj jest 2018-04-23, 07:24x



Odpowiedz w temacie  [ Posty: 4 ] 
MxGrid i VBA 
Autor Wiadomość

Rejestracja: 2008-03-10, 14:01
Posty: 463
Post MxGrid i VBA
Jak zadeklarować MxGrida, żeby kolumny 'dzieci' były zwinięte?
VBA nie podpowiada mi metody RowExpanded

I jeszcze mam dziwną sytuację.
Komórki dzieci pokazują mi się poprawnie,
natomiast jak sumuję 'dzieci', 'rodzic' pokazuje mi się w tysiącach czyli np. 5 zamiast 5678
(mam wartości dzieci i rodziców w tej samej kolumnie)
kolumnę mam zadeklarowaną
G.Columns(2).FieldType ftInt, 1

_________________
zz


2018-03-22, 01:50
Wyświetl profil
Autor Wiadomość
 


Ekspert
Ekspert

Rejestracja: 2007-11-16, 15:08
Posty: 3422
Pomógł: 357
Post Re: MxGrid i VBA
G.Columns(2).FieldType ftInt, 4

_________________
Skontaktuj się z Ekspertem | Zamów dodatek

tel. 22 7 538 538
ekspert@mojaSymfonia.pl
http://www.mojaSymfonia.pl


2018-03-22, 09:00
Wyświetl profil

Rejestracja: 2008-03-10, 14:01
Posty: 463
Post Re: MxGrid i VBA
zmieniłem
Kod:
    G.Columns(2).Name = "Ilość m2"
    G.Columns(2).Locked = True
    G.Columns(2).hidden = False
    G.Columns(2).FieldType ftInt, 4
    G.Columns(2).Width = 100


wywołanie
Kod:
    RS2.MoveFirst
    Do While Not RS2.EOF
     strPotwTerminDost = RS2.Fields("potw_termin_dost").Value
     G.InsertRow (G.RowCount)
     intParentRow = (G.RowCount - 1)
     G.Rows(intParentRow).Value(1) = strPotwTerminDost
     SumDay = 0
     Do While RS2.Fields("potw_termin_dost").Value = strPotwTerminDost
        Set rowCh = G.Rows(intParentRow).InsertChildRow(-1) ' -1 - dodanie na końcu
        rowCh.Value(0) = RS2.Fields("jakosc").Value
        rowCh.Value(2) = Round(RS2.Fields("Suma").Value, 0)
        SumDay = SumDay + rowCh.Value(2)
        RS2.MoveNext
      Loop
      G.Rows(intParentRow).Value(2) = SumDay
      RS2.MoveNext
    Loop


a rezultat jak w screenie


Załączniki:
Bez tytułu.jpg
Bez tytułu.jpg [ 41.95 KiB | Przeglądany 122 razy ]

_________________
zz
2018-03-27, 10:37
Wyświetl profil

Rejestracja: 2008-03-10, 14:01
Posty: 463
Post Re: MxGrid i VBA
Zamieniam wszystko na stringi ;)

Pozostaje cz. I pytania: Jak zadeklarować MxGrida, żeby kolumny 'dzieci' były zwinięte?

_________________
zz


2018-03-28, 07:53
Wyświetl profil
Wyświetl posty nie starsze niż:  Sortuj wg  
Odpowiedz w temacie   [ Posty: 4 ] 
   Podobne tematy   Autor   Odpowiedzi   Odsłony   Ostatni post 
Na tym forum nie ma nowych nieprzeczytanych postów. [VBA] Wyłączenie HMF 2014a z poziomu VBA

w Programowanie

wars1977

11

1564

2014-05-16, 10:41

wars1977 Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. Załączniki Drzewo w MxGrid

w Programowanie

infonet

1

929

2012-09-24, 21:54

rafal Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. MxGrid i dropdown

w Programowanie

vectorcom

7

1437

2014-12-03, 23:34

vectorcom Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. Załączniki Własne bitmapy w mxgrid

w Programowanie

Adi

4

771

2013-04-04, 15:26

Adi Wyświetl najnowszy post



Kto jest online

Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 2 gości


Nie możesz tworzyć nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz dodawać załączników

Szukaj:
Przejdź do:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Support forum phpbb by phpBB Assistant