Español
Fuente/ Codesnippets

Defs Características Listbox Prozeduren

 

KompilierenMarcaSeparación
!Source wurde am 23.05.2006 in die Babyklappe auf XProfan.Com abgelegt:

proc Selectchoice

    Parameters handl%,num%
    Sendmessage(handl%,$014E, num% ,1)

Endproc

proc LB_ClearFast

    Parameters handl%
    sendmessage(handl%,$0184,0,0)

23.05.2006  
 




KompilierenMarcaSeparación
!Source wurde am 23.05.2006 in die Babyklappe auf XProfan.Com abgelegt:

proc LB_SETPOS

    Parameters Handl%,Num%

    if lt(num%,getcount(Handl%))

        Selectstring(Handl%,Num%-1,Getstring$(Handl%,Num%))

    else

        sub num%,1
        Selectstring(Handl%,Num%,Getstring$(Handl%,Num%))

    endif

EndProc

proc LB_SETSTRING

    Parameters Handl%,String$
    Selectstring(Handl%,-1,String$)

EndProc

proc LB_DELPOS

    Parameters Handl%,Num%
    DeleteString(Handl%,Num%)

EndProc

proc LB_MOVEPOS

    Parameters Handl%,Num%,Numto%
    Declare s$
    s$=Getstring$(Handl%,Num%)
    DeleteString(Handl%,Num%)
    Insertstring(Handl%,Numto%,S$)

EndProc

proc LB_COPYPOS

    Parameters Handl%,Num%,Numto%
    Insertstring(Handl%,Numto%,Getstring$(Handl%,Num%))

EndProc

proc LB_DELLAST

    Parameters Handl%
    LB_DELPOS HANDL%,sub(GETCOUNT(HANDL%),1)

EndProc

proc LB_DELFIRST

    Parameters Handl%
    LB_DELPOS HANDL%,0

EndProc

proc LB_DELSTRING

    Parameters Handl%,String$
    Declare Num%
    NUM%=Selectstring(Handl%,-1,String$)
    DeleteString(Handl%,Num%)
    LB_SETPOS HANDL%,NUM%

EndProc

proc LB_UP

    PARAMETERS HANDL%
    LB_SETPOS HANDL%,Add(GETCURSEL(HANDL%),-1)

EndProc

proc LB_DOWN

    PARAMETERS HANDL%
    LB_SETPOS HANDL%,Add(GETCURSEL(HANDL%),01)

EndProc

proc LB_INSERT

    Parameters Handl%,String$,Num%
    Insertstring(Handl%,Num%,String$2>)

ENDPROC

 
23.05.2006  
 



Zum Quelltext


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

2.669 Views

Untitledvor 0 min.
Gast.081506.09.2024
RudiB.14.03.2021
Manfred Barei06.06.2014
AndreasS17.07.2012
Más...

Themeninformationen

Dieses Thema ha 1 subscriber:

unbekannt (2x)


Admins  |  AGB  |  Applications  |  Autores  |  Chat  |  Política de Privacidad  |  Descargar  |  Entrance  |  Ayuda  |  Merchantportal  |  Pie de imprenta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Juegos  |  Búsqueda  |  Support

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Yo möchte no Cookie