English
Forum

GridBOX in Choicebox

 
- Page 1 -



Ralph
Theobald
Hello ,

I have a GridBOX in a Choicebox gebastelt , unfortunately is the GridBOX
Not Available, how can I these enable.
CompileMarkSeparation
Set(FastMode,1)
 $H windows.ph
 $H messages.ph
Declare  oldcallback&,static&,brush&,raus&,hGrid&,titel$
cls
oldcallback&=~SetWindowLong(%hwnd,~GWL_WNDPROC,ProcAddr(newcallback,4))
static&=Create(choicebox,%hwnd,Choicebox,16,16,560,180)

WhileNot raus&

    WaitInput

EndWhile

End

PROC setcolor

    Parameters col&,bk&,wParam&
    declare Brush&

    IF Brush&

        ~DeleteObject(Brush&)

    endif

    Brush& = ~CreateSolidBrush(bk&)
    ~SetBkMode(wParam&, ~TRANSPARENT)
    ~SetBKColor(wParam&,RGB(195,116,95))
    ~SetTextColor(wParam&,col&)
    RETURN Brush&

endproc

Proc newcallback

    Parameters wnd&,msg&,wparam&,lparam&

    IF msg&=~WM_CTLCOLOREDIT

        RETURN SetColor(rgb(255,0,0),rgb(255,255,0),wParam&)

    Endif

    IF msg&=~WM_CTLCOLORLISTBOX

        Titel$ = Links;0;80;Mitte;2;100;Rechts;1;80
        hGrid&=Create(GridBox,lparam&, Titel$, 3,1,1,549,140)
        AddString(hGrid&, AB|DEF|0123)
        AddString(hGrid&, GHI|J23KL|012345)

        IF brush&

            ~DeleteObject(brush&)

        EndIf

        brush&=~CreateSolidBrush(Rgb(0,0,255))
        RETURN brush&

    Endif

    If msg&=~WM_CLOSE

        ~DeleteObject(brush&)
        raus&=1

    Endif

    RETURN ~CallWindowProc(oldcallback&,wnd&,msg&,wparam&,lparam&)

s4 href='./../../Function-References/XProfan/endproc/'>ENDPROC


Greeting Ralph
 
Xprofan 10 , AMD Athlon 3000+, 1GB
03/08/07  
 



 
- Page 2 -



Dietmar
Horn
by me XP-Home runs it tadellos.

will be it tommorrow evening in the cabinet times under Win 95, Win 98, Win ME and Win 2000 testing.

Greeting
Dietmar
 
Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V.  [...] 

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch:  [...] 
03/08/07  
 




Jörg
Sellmeyer
one kanns naturally too simply so make:
CompileMarkSeparation
Declare cb&,lv&
Cls
cb&=Create(ChoiceBox,%hwnd,0,10,10,500,20)
lv&=Create(GridBox,%hwnd,Spalte 1;0;100;Spalte 2;0;100;Spalte 3;0;100,0,10,30,500,0)

While 1

    WaitInput

    If GetFocus(cb&)

        WhileLoop 100

            SetWindowPos lv&=10,30 - 500,&Loop * 3;0

        Wend

        WaitInput

        WhileLoop 100,0,-1

            SetWindowPos lv&=10,30 - 500,&Loop * 3;0

        Wend

        SetWindowPos lv&,10,30 - 500,0;0

    EndIf

Wend

 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
03/08/07  
 



by me under windows2000 remaining The Choicebox ditto not correctly. open and is to the Aufklappen empty. can unfortunately only The EXE testing.
 
03/08/07  
 



I kanns by me unfortunately not to check on - but could time someone The Versionsresource 24 from IFs EXE Remove and the Proggi thereafter XP again testing?
 
03/08/07  
 




Ralph
Theobald
under Win XP ,XProfan 10 runs both
The Griddboxspalten can not move and dye itself too
not at touching with the mouse.

under Win2k , XProfan 8 How with Andreas .

me would nevertheless interested , Why the Focus at grid not functions.
I try time one Static under the Grid To settle , Perhaps GEHTS then.

thanks

Ralph
 
Xprofan 10 , AMD Athlon 3000+, 1GB
03/08/07  
 



yet time I...

have furthermore whom local, that the on the Version the COMCTL32 lying. to that testing please times with of/ one PRFRUN32.EXE compilieren, from the The Versionsresource 24 removes watts. Runs it then too yet XP?
 
03/08/07  
 



Why kompilierst not self?
 
03/08/07  
 



Moin...

no XProfan 10, You Schlaumeier...
Why testing your not self? so a windigen Kram use I so or so not .
 
03/08/07  
 



As I said - Have gestestet. it hats too tested. Win98 & 2000? For which testing ifs none for Win98 wants? I said already - tested and run for WinXP. would be Yes beautiful if you rausbekommst as under not-More-supporteten Betriebssystemen working - but yet wished it nobody for middle-aged crutches except You.


so a windigen Kram use I so or so not lach .


... but yet wished it nobody for middle-aged crutches except You.

alas Yes - and what windy is to determine others... because if I me into whole Message & WProc-Gedöns reinversetze then power z.B. the small Codechen there supra exakt what it should. Vorrausgesetzt naturally the system operates too so How I it me thereby virtual have.
 
03/08/07  
 




Rolf
Koch
*hüstel* iF? Ähem but under Vista is too no Content in the Choicebox.
 
03/08/07  
 



well Yes - apparently is not famous, Why the on older crutches not runs - means standing neither solid, whether it on neueren crutches always walk becomes. or I see the wrong?
 
03/08/07  
 




Rolf
Koch
parent contains the value 0
 
03/08/07  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

no Systemprofil laid out. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Please register circa a Posting To verfassen.
 

Topic-Options

11.333 Views

Untitledvor 0 min.
RudiB.10/26/21
Christof Neuß09/18/18
rquindt04/25/18
Rainer Hoefs06/02/16
More...

Themeninformationen



Admins  |  AGB  |  Applications  |  Authors  |  Chat  |  Privacy Policy  |  Download  |  Entrance  |  Help  |  Merchantportal  |  Imprint  |  Mart  |  Interfaces  |  SDK  |  Services  |  Games  |  Search  |  Support

One proposition all XProfan, The there's!


My XProfan
Private Messages
Own Storage Forum
Topics-Remember-List
Own Posts
Own Topics
Clipboard
Log off
 Deutsch English Français Español Italia
Translations

Privacy Policy


we use Cookies only as Session-Cookies because of the technical necessity and with us there no Cookies of Drittanbietern.

If you here on our Website click or navigate, stimmst You ours registration of Information in our Cookies on XProfan.Net To.

further Information To our Cookies and moreover, How You The control above keep, find You in ours nachfolgenden Datenschutzerklärung.


all rightDatenschutzerklärung
i want none Cookie