XPSE

{$iq}
{pushkeyword sizeof}

sizeof -Problem: habe ich dich da richtig verstanden, dass $pushkeyword bei nProcs keinen Einfluss hat, und ebenn nur selbst definierte, xpse-eigenen und api-Funktionen angewendet werden können

gibt es eigentlich per sizeof eine adäquate (kurze) api-Funktion ?
Saluto Ernst

@Nico - funkt leider nicht
die APIs schreibe ich gewohnheitsmäßig immer mit der Tilde; da man aber diese in xpse weglassen kann, liegt vieleicht eben darin das Problem. xpse kann dadurch sichtlich nicht zwischen eigenem drawtext und api-drawtext unterscheiden und will nur 4 Parameter. gibts dafür vielleicht einen workaround ?

Wenn Du zentrierten text willst usw dann kannst du ja mal die drawtextex api verwenden denn die geht gut dafür.

Statt globalfree usw würde ich die xpse funktionen nehmen die wie die xprofan funktionen lauten also dim und dispose, die gehen auch in nprocs und sind da auch gelistet.

Statt globalfree usw würde ich die xpse funktionen nehmen die wie die xprofan funktionen lauten also dim und dispose, die gehen auch in nprocs und sind da auch gelistet. [...] 

dim und dispose verwende ich ohnedies, aber mir ging/geht es um das sizeof
normalerweise würde ich schreiben
textlen& = ~GetWindowText(hWnd&, Text#, sizeof(#)-1)
aber wie mach ich es in einer nproc, die sizeof nicht kennt ? und eine passende api hab ich auch nicht gefunden

nproc TestGlobalSize

    parameters sizeOfMem&
    var mem& = Dim(sizeOfMem&)
    var result& = GlobalSize(mem&)
    Dispose(mem&)
    return result&

endproc

proc assert

    parameters param&
    print param&,
    print if(TestGlobalSize(param&) = param&, "OK", "Fail!")

endproc

cls
assert(4)
assert(23)
assert(42)
waitinput
end