 |
|
Strona 1 z 1
|
[ Posty: 7 ] |
|
MxGrid - jak dodać listę rozwijaną
| Autor |
Wiadomość |
|
keczer
Rejestracja: 2008-10-11, 23:35
Posty: 8
|
 MxGrid - jak dodać listę rozwijaną W jaki sposób do kontrolki MXGRID dodać listę rozwijaną
Ostatnio zmieniony 2008-10-29, 14:21 przez keczer, łącznie zmieniany 1 raz
|
| 2008-10-29, 13:17 |
|
|
| Autor |
Wiadomość |
|
Mix-soft.pl
|
|
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Kod: dispatch dGrid
int sub OnCommand(int id, int msg)
int i
if id == 0 && msg == 0 then
dGrid.ColumnCount = 1
dGrid.Columns(0).name = "Nazwa"
dGrid.Columns(0).fieldtype(0+128,40)
for i = 1 to i > 100
dGrid.InsertRow(-1)
next i
endif
endsub
int sub dGrid_OnDropDown(dispatch q)
if dGrid.CurCol == 0 then
dGrid.Execute(35, "Opcja 1","Opcja 1")
dGrid.Execute(35, "Opcja 2","Opcja 2")
dGrid.Execute(35, "Opcja 3","Opcja 3")
dGrid.Execute(35, "Opcja 4","Opcja 4")
dGrid.Execute(35, "Opcja 5","Opcja 5")
endif
endsub
FORM "Test MxGrid Drop Down", 200,400
CONTROL "grid",dGrid, 5,5,185,365
int rv = ExecForm( OnCommand )
|
| 2008-10-29, 14:13 |
|
|
|
wojtek
Rejestracja: 2010-02-10, 21:24 Posty: 260 Pomógł: 4
|
Witam,
Bawię się właśnie MxGridem istaram siędodać bitmapy do menu rozwijanego:
Kod: #include "sosGrDef.sci"
dispatch dGrid
int endFrm
int sub OnCommand(int id, int msg)
int i
if id == 0 && msg == 0 then
dGrid.ColumnCount = 3
dGrid.Columns(0).name = "Nazwa"
dGrid.Columns(0).fieldtype(0+128,40)
dGrid.Columns(1).name = "Nazwa"
dGrid.Columns(1).fieldtype(7,2)
dGrid.Columns(2).name = "Znacznik"
dGrid.Columns(2).fieldtype(17+0x80,0)
for i = 1 to i > 100
dGrid.InsertRow(-1)
next i
endif
endsub
int sub dGrid_OnDropDown(dispatch q)
if dGrid.CurCol == 2 then
[color=red]dGrid.Execute (EC_DROPMENUITEM, "Znacznik A","Znacznik A"+81)[/color] dGrid.Execute (EC_DROPMENUITEM, "Znacznik B",82)
dGrid.Execute (EC_DROPMENUITEM, "Znacznik C",83)
dGrid.Execute (EC_DROPMENUITEM, "Znacznik D",84)
endif
endsub
FORM "MxGrid kontrolka", 800,400
button " X ",700,100,30,26,endFrm=-1
CONTROL "grid",dGrid, 5,5,685,365
int rv = ExecForm( OnCommand )
if endFrm==-1 then error ""
Zasadniczo wszytsko działa tylko:
1) Jak spowodować by w polu rozijanym pojawiła się bitmapa i tekst
w powyższym kodzie na menurozwijanym mam tekst a w komórce pojawia się bitmapa,
A chce mieć zarówno w menu rozwijanym jak i w komórcedtekst i bitmape
pozdrawiam
|
| 2011-10-14, 10:38 |
|
|
|
wojtek
Rejestracja: 2010-02-10, 21:24 Posty: 260 Pomógł: 4
|
Sam sobie odpowiem:
należy użyć następującej formuły
Kod: dGrid.Execute (EC_DROPLISTITEM, "Znacznik A" + "~#81",81)
Walcze jeszcze z jedną sprawą:
Jak spowodować aby dla zaznaczonych na niebiesko wierszy w mxGrid coś się stało,
np. korzystjąc z SHIFT + zakres wierszy, pod prawym przyciskiem powinna być możliwość zmiany wartości pól w określonej kolumnie.
Chodzi mi o to by dla zaznczonych wierszy hurtowo zmienić wartość danych w ostatniej kolumnie na wybieraną z listy.
|
| 2011-10-14, 16:12 |
|
|
|
wrob
Ekspert
Rejestracja: 2008-04-18, 18:52 Posty: 5169 Pomógł: 59
|
Hmm... takie cuda to tylko jak sobie zamiast MxGrid uzyjesz Excela jako kontrolki :) :) :)
|
| 2011-10-16, 02:21 |
|
|
|
TS
Rejestracja: 2008-10-16, 20:50
Posty: 65
|
Jest to możliwe ... każdy zaznaczony wiersz będzie miała ustawione Tagged na true nawet dla trybu nagłówka wierszy innego niż htTag. Wystarczy wykonać iterację dla RowCount-1 i zastosować dodatkowe akcje dla wiersza na wskazanej kolumnie.
_________________
pozdrawiam
TS
|
| 2011-10-17, 22:42 |
|
|
|
wojtek
Rejestracja: 2010-02-10, 21:24 Posty: 260 Pomógł: 4
|
Dzieki za info, znalazlem dwa dni temu rzyklad z tagged - em i faktycznie dziala tak jak chce
|
| 2011-10-19, 11:08 |
|
|
|
|
Strona 1 z 1
|
[ Posty: 7 ] |
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 14 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
|
|
|
|
