XProfan

Français

Jac
de
Lad

allô Community.

Pour mon aktuelles projet bastel je à ComboboxEx-Controls (Choiceboxen avec Icônes). là Roland cela, soweit je sais, pas einbauen wird et es quelque chose compliqué ist, ici mon Frage:

Besteht intérêt, dass la fois comme Subproc avec Serviceprozeduren ici trop posten?

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Dietmar
Horn

mais toujours

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: [...]

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

Ok...dans den prochain Tagen.

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Dietmar
Horn

mon Posting: 22.49 montre

Dein Posting: 22.49 montre

peux Du Gedanken lesen?

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: [...]

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

Jo. Sei sur qui Hut!

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Dietmar
Horn

I love espace Jac-Boys of le world.

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: [...]

15.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

16.01.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

ici erstmal qui Grundfunktionen. sûrement encore verbesser- et erweiterungswürdig.
Kompilieren Marque Séparation

subproc create.choiceboxex

    Parameters hwnd&,il&,x&,y&,dx&,dy&
    übergeordnetes Fenster,Imagaliste,Position (x und y),Größe
    declare hdl&
    hdl&=Control(ComboBoxEx32,,$50010007,x&,y&,dx&,dy&,hwnd&,110,%hinstance,0)
    sendmessage(hdl&,$402,0,il&)
    Return hdl&

endproc

proc CBExAddString

    Parameters hdl&,s$,ic1&,ic2&
    Handle,String,Icon für nicht ausgewählt (Index in der Imagelist),Icon für ausgewählt (Index in der Imagelist)
    declare cb1#,cb2#
    Dim cb1#,255
    Dim cb2#,36
    Long cb2#,0=$F,-1
    String cb1#,0=s$
    long cb2#,8=cb1#,255,ic1&,ic2&
    sendmessage(hdl&,$401,0,cb2#)
    Dispose cb1#,cb2#

endproc

proc CBExSetCurSel

    Parameters hdl&,cur&
    Handle,Index des zu wählenden Eintrags
    Return sendmessage(hdl&,$14E,cur&,0)

endproc

proc CBExGetHandle

    ermittelt das Handle der beinhalteten ComboBox (zum Beispiel für Getfocus())
    Parameters hdl&
    Return sendmessage(hdl&,$406,0,0)

endproc

proc CBExGetCurSel

    Handle
    Parameters hdl&
    Return sendmessage(hdl&,$147,0,0)

endproc

proc CBExGetString

    Handle,Index
    Parameters hdl&,i&,p$
    declare cb1#,cb2#
    Dim cb1#,255
    Dim cb2#,36
    Long cb2#,0=$F,i&,cb1#,255
    sendmessage(hdl&,$404,0,cb2#)
    p$=String$(cb1#,0)
    Dispose cb1#,cb2#
    Return p$

'./../../function-references/XProfan/endproc/'>endproc