Buchempfehlung
Visual Basic 6 Kochbuch
Visual Basic 6 Kochbuch
Viele praktische Tipps zum Programmieren mit Visual Basic 6, die sich oft auch auf FB übertragen lassen. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

QString mit FB (unvollständig, für nemored)

Uploader:MitgliedStueber
Datum/Zeit:15.08.2010 03:03:14

#include once "Qt.bi"

declare function QString_Constructor cdecl lib "QtWrapper" alias "QString_Constructor" () as any ptr
declare sub QString_Destructor cdecl lib "QtWrapper" alias "QString_Destructor" (byval i as any ptr)
declare sub QString_LET cdecl lib "QtWrapper" alias "QString_LET" (byval qs as any ptr, byval s as any ptr)
declare sub QString_LET_2 cdecl lib "QtWrapper" alias "QString_LET_2" (byval qs as any ptr, byval s as string)
declare function QString_EQ_2 cdecl lib "QtWrapper" alias "QString_EQ_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_EQ cdecl lib "QtWrapper" alias "QString_EQ" (byval qs as any ptr, byval s as string) as integer
declare function QString_NEQ_2 cdecl lib "QtWrapper" alias "QString_NEQ_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_NEQ cdecl lib "QtWrapper" alias "QString_NEQ" (byval qs as any ptr, byval s as string) as integer
declare function QString_GT_2 cdecl lib "QtWrapper" alias "QString_GT_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_GT cdecl lib "QtWrapper" alias "QString_GT" (byval qs as any ptr, byval s as string) as integer
declare function QString_GEQ_2 cdecl lib "QtWrapper" alias "QString_GEQ_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_GEQ cdecl lib "QtWrapper" alias "QString_GEQ" (byval qs as any ptr, byval s as string) as integer
declare function QString_ST_2 cdecl lib "QtWrapper" alias "QString_ST_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_ST cdecl lib "QtWrapper" alias "QString_ST" (byval qs as any ptr, byval s as string) as integer
declare function QString_SEQ_2 cdecl lib "QtWrapper" alias "QString_SEQ_2" (byval qs as any ptr, byval s as any ptr) as integer
declare function QString_SEQ cdecl lib "QtWrapper" alias "QString_SEQ" (byval qs as any ptr, byval s as string) as integer
declare sub QString_toAscii cdecl lib "QtWrapper" alias "QString_toAscii" (byval s as any ptr, byval s2 as zstring ptr)
declare sub QString_append cdecl lib "QtWrapper" alias "QString_append" (byval s as any ptr, byval s2 as any ptr)
declare sub QString_chop cdecl lib "QtWrapper" alias "QString_chop" (byval s as any ptr, byval n as integer)
declare function QString_capacity cdecl lib "QtWrapper" alias "QString_capacity" (byval s as any ptr) as integer
declare sub QString_clear cdecl lib "QtWrapper" alias "QString_clear" (byval s as any ptr)
declare function QString_compare cdecl lib "QtWrapper" alias "QString_compare" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_compare_2 cdecl lib "QtWrapper" alias "QString_compare_2" (byval s as any ptr,byval s2 as any ptr) as integer
declare function QString_contains cdecl lib "QtWrapper" alias "QString_contains" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_contains_2 cdecl lib "QtWrapper" alias "QString_contains_2" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_count cdecl lib "QtWrapper" alias "QString_count" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_count_2 cdecl lib "QtWrapper" alias "QString_count_2" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_count_3 cdecl lib "QtWrapper" alias "QString_count_3" (byval s as any ptr) as integer
declare function QString_endsWith cdecl lib "QtWrapper" alias "QString_endsWith" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_endsWith_2 cdecl lib "QtWrapper" alias "QString_endsWith_2" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_fill cdecl lib "QtWrapper" alias "QString_fill" (byval s as any ptr,byval s2 as any ptr, byval size as integer) as integer
declare function QString_indexOf cdecl lib "QtWrapper" alias "QString_indexOf" (byval s as any ptr,byval s2 as any ptr, byval from as integer, byval cs as integer) as integer
declare sub QString_insert cdecl lib "QtWrapper" alias "QString_insert" (byval s as any ptr,byval s2 as any ptr, byval p as integer)
declare function QString_lastIndexOf cdecl lib "QtWrapper" alias "QString_lastIndexOf" (byval s as any ptr,byval s2 as any ptr, byval from as integer, byval cs as integer) as integer
declare function QString_isEmpty cdecl lib "QtWrapper" alias "QString_isEmpty" (byval s as any ptr) as integer
declare function QString_isNull cdecl lib "QtWrapper" alias "QString_isNull" (byval s as any ptr) as integer
declare function QString_length cdecl lib "QtWrapper" alias "QString_length" (byval s as any ptr) as integer
declare function QString_mid cdecl lib "QtWrapper" alias "QString_mid" (byval s as any ptr, byval p as integer, byval n as integer) as any ptr
declare function QString_number cdecl lib "QtWrapper" alias "QString_number" (byval i as integer, byval b as integer) as any ptr
declare sub QString_prepend cdecl lib "QtWrapper" alias "QString_prepend" (byval s as any ptr, byval s2 as any ptr)
declare sub QString_remove cdecl lib "QtWrapper" alias "QString_remove" (byval s as any ptr, byval p as integer, byval n as integer)
declare sub QString_remove_2 cdecl lib "QtWrapper" alias "QString_remove_2" (byval s as any ptr, byval s2 as any ptr, byval cs as integer)
declare function QString_repeated cdecl lib "QtWrapper" alias "QString_repeated" (byval s as any ptr, byval n as integer) as any ptr
declare sub QString_replace cdecl lib "QtWrapper" alias "QString_replace" (byval s as any ptr, byval p as integer, byval n as integer, byval s2 as any ptr)
declare sub QString_replace_2 cdecl lib "QtWrapper" alias "QString_replace_2" (byval s as any ptr, byval s2 as any ptr, byval s3 as any ptr, byval cs as integer)
declare sub QString_reserve cdecl lib "QtWrapper" alias "QString_reserve" (byval s as any ptr, byval size as integer)
declare sub QString_resize cdecl lib "QtWrapper" alias "QString_resize" (byval s as any ptr, byval size as integer)
declare function QString_toUpper cdecl lib "QtWrapper" alias "QString_toUpper" (byval s as any ptr) as any ptr
declare function QString_toLower cdecl lib "QtWrapper" alias "QString_toLower" (byval s as any ptr) as any ptr
declare function QString_toDouble cdecl lib "QtWrapper" alias "QString_toDouble" (byval s as any ptr, byval ok as integer ptr) as double
declare function QString_toInt cdecl lib "QtWrapper" alias "QString_toInt" (byval s as any ptr, byval ok as integer ptr) as integer
declare function QString_toFloat cdecl lib "QtWrapper" alias "QString_toFloat" (byval s as any ptr, byval ok as integer ptr) as single
declare function QString_startsWith cdecl lib "QtWrapper" alias "QString_startsWith" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_startsWith_2 cdecl lib "QtWrapper" alias "QString_startsWith_2" (byval s as any ptr,byval s2 as any ptr, byval cs as integer) as integer
declare function QString_simplified cdecl lib "QtWrapper" alias "QString_simplified" (byval s as any ptr) as any ptr
declare sub QString_squeeze cdecl lib "QtWrapper" alias "QString_squeeze" (byval s as any ptr)
declare function QString_trimmed cdecl lib "QtWrapper" alias "QString_trimmed" (byval s as any ptr) as any ptr


type QString
    w_ptr as any ptr

    declare constructor ()
    declare constructor (byval other as string)
    declare constructor (byval p as any ptr)
    declare destructor ()

    declare sub append(byref s as QString)
    declare sub chop(byval n as integer)
    declare function capacity() as integer
    declare sub clear()
    declare static function compare (byref s as QString, byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare function compare (byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare function contains (byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare function count (byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare function count () as integer
    declare function endsWith (byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare sub insert (byref s2 as QString, byval p as integer)
    declare function indexOf (byref s as QString, byval from as integer, byval cs as integer = Qt.CaseSensitive) as integer
    declare function lastIndexOf (byref s as QString, byval from as integer, byval cs as integer = Qt.CaseSensitive) as integer
    declare function isEmpty () as integer
    declare function isNull () as integer
    declare function length () as integer
    declare function mid (byval p as integer, byval n as integer) as QString
    declare static function number (byval i as integer, byval b as integer) as QString
    declare sub prepend (byref s as QString)
    declare sub remove (byval p as integer, byval n as integer)
    declare sub remove (byref s as QString, byval cs as integer = Qt.CaseSensitive)
    declare function repeated (byval times as integer) as QString
    declare sub replace (byref s as QString, byref s2 as QString, byval cs as integer = Qt.CaseSensitive)
    declare sub replace (byval p as integer, byval n as integer, byref s as QString)
    declare sub reserve (byval size as integer)
    declare sub resize (byval size as integer)
    declare function startsWith (byref s2 as QString, byval cs as integer = Qt.CaseSensitive) as integer
    declare function simplified () as QString
    declare sub squeeze ()
    declare function trimmed () as QString

    declare function toAscii() as string
    declare function toUpper() as QString
    declare function toLower() as QString
    declare function toDouble(byval ok as integer ptr = 0) as double
    declare function toFloat(byval ok as integer ptr = 0) as single
    declare function toInt(byval ok as integer ptr = 0) as integer

    declare operator let (byval s as string)
    declare operator let (byref s as Qstring)
end type



constructor QString ()
    w_ptr = QString_Constructor()
end constructor



constructor QString (byval other as string)
    w_ptr = QString_Constructor()
    QString_LET_2(w_ptr,other)
end constructor



constructor QString (byval p as any ptr)
    w_ptr = p
end constructor



destructor QString ()
    QString_Destructor(w_ptr)
end destructor




























sub QString.append(byref s as QString)
    QString_append(w_ptr,s.w_ptr)
end sub



sub QString.chop(byval n as integer)
    QString_chop(w_ptr,n)
end sub



function QString.capacity() as integer
    return QString_capacity(w_ptr)
end function



function QString.toAscii() as string
    dim as zstring ptr s = allocate(QString_count_3(w_ptr)+1)
    QString_toAscii(w_ptr,s)
    dim as string s2 = *s
    deallocate(s)
    return s2
end function



sub QString.clear()
    QString_clear(w_ptr)
end sub



function QString.compare (byref s as QString, byref s2 as QString,byval cs as integer) as integer
    return QString_compare(s.w_ptr,s2.w_ptr,cs)
end function



function QString.compare (byref s2 as QString,byval cs as integer) as integer
    return QString_compare(w_ptr,s2.w_ptr,cs)
end function



function QString.contains (byref s2 as QString,byval cs as integer) as integer
    return QString_contains(w_ptr,s2.w_ptr,cs)
end function



function QString.count (byref s2 as QString,byval cs as integer) as integer
    return QString_count(w_ptr,s2.w_ptr,cs)
end function



function QString.count () as integer
    return QString_count_3(w_ptr)
end function



function QString.endsWith (byref s2 as QString,byval cs as integer) as integer
    return QString_endsWith(w_ptr,s2.w_ptr,cs)
end function



sub QString.insert (byref s2 as QString,byval p as integer)
    QString_insert(w_ptr,s2.w_ptr,p)
end sub



function QString.indexOf (byref s as QString, byval from as integer, byval cs as integer = Qt.CaseSensitive) as integer
    return QString_indexOf(w_ptr,s.w_ptr,from,cs)
end function



function QString.lastIndexOf (byref s as QString, byval from as integer, byval cs as integer = Qt.CaseSensitive) as integer
    return QString_lastIndexOf(w_ptr,s.w_ptr,from,cs)
end function



function QString.isEmpty () as integer
    return QString_isEmpty(w_ptr)
end function



function QString.isNull () as integer
    return QString_isNull(w_ptr)
end function



function QString.length () as integer
    return QString_length(w_ptr)
end function



function QString.mid(byval p as integer, byval n as integer) as QString
    dim as any ptr p2 = QString_mid(w_ptr,p,n)
    return p2
end function



function QString.number (byval i as integer, byval b as integer) as QString
    dim as any ptr p2 = QString_number(i,b)
    return p2
end function



sub QString.prepend(byref s as QString)
    QString_prepend(w_ptr,s.w_ptr)
end sub



sub QString.remove (byval p as integer, byval n as integer)
    QString_remove(w_ptr,p,n)
end sub



sub QString.remove (byref s as QString, byval cs as integer)
    QString_remove_2(w_ptr,s.w_ptr,0)
end sub



function QString.repeated (byval times as integer) as QString
    dim as any ptr p = QString_repeated(w_ptr,times)
    return p
end function



sub QString.replace (byref s as QString, byref s2 as QString, byval cs as integer)
    QString_replace_2(w_ptr,s.w_ptr,s2.w_ptr,cs)
end sub



sub QString.replace (byval p as integer, byval n as integer, byref s as QString)
    QString_replace(w_ptr,p,n,s.w_ptr)
end sub



sub QString.reserve (byval size as integer)
    QString_reserve(w_ptr,size)
end sub



sub QString.resize (byval size as integer)
    QString_resize(w_ptr,size)
end sub



function QString.toUpper() as QString
    dim as any ptr p = QString_toUpper(w_ptr)
    return p
end function



function QString.toLower() as QString
    dim as any ptr p = QString_toLower(w_ptr)
    return p
end function



function QString.toFloat(byval ok as integer ptr) as single
    dim i as integer ptr
    if ok = 0 then return QString_toFloat(w_ptr,i)
    return QString_toFloat(w_ptr,ok)
end function



function QString.toDouble(byval ok as integer ptr) as double
    dim i as integer ptr
    if ok = 0 then return QString_toDouble(w_ptr,i)
    return QString_toDouble(w_ptr,ok)
end function



function QString.toInt(byval ok as integer ptr) as integer
    dim i as integer ptr
    if ok = 0 then return QString_toInt(w_ptr,i)
    return QString_toInt(w_ptr,ok)
end function



function QString.startsWith (byref s2 as QString,byval cs as integer) as integer
    return QString_startsWith(w_ptr,s2.w_ptr,cs)
end function



function QString.simplified () as QString
    dim as any ptr p = QString_simplified(w_ptr)
    return p
end function



sub QString.squeeze ()
    QString_squeeze(w_ptr)
end sub



function QString.trimmed () as QString
    dim as any ptr p = QString_trimmed(w_ptr)
    return p
end function






operator QString.let (byref s as QString)
    QString_LET(w_ptr,s.w_ptr)
end operator



operator QString.let(byval s as string)
    QString_LET_2(w_ptr,s)
end operator