Seite 1 von 1
PeeKS - Fehler ohne optionales Flag
Verfasst: 29.11.2012 20:59
von _JON_
Mir gerade aufgefallen, das PeeKS ohne gesetztes Flag cashed anstatt einen leeren String wieder zugeben
Code: Alles auswählen
*buffer = AllocateMemory(8)
PeekS(*buffer, -1, #PB_Unicode)
PeekS(*buffer, -1, #PB_Ascii)
PeekS(*buffer, -1) ;crash
Compiler: PB 5.00 x86/x64 Ascii/Unicode
Re: PeeKS - Fehler ohne optionales Flag
Verfasst: 29.11.2012 21:18
von bobobo
macht nichts.
am 21.12. ist eh Schluß

Re: PeeKS - Fehler ohne optionales Flag
Verfasst: 29.11.2012 21:36
von ts-soft
Re: PeeKS - Fehler ohne optionales Flag
Verfasst: 29.11.2012 22:15
von _JON_
bobobo hat geschrieben:macht nichts.
am 21.12. ist eh Schluß

Ach können wir das nicht etwas verschieben? Obwohl wir könnten ja auch Weihnachten vorziehen
@ts-soft
Danke

Re: PeeKS - Fehler ohne optionales Flag
Verfasst: 30.11.2012 13:03
von mk-soft
Der 21.12.2012 ist nur der Übungstag für den nächsten Untergang
Workaround:
Code: Alles auswählen
;- Workaround Peeks PB v5.00
#PB_ModePeeks = #PB_Compiler_Unicode + 8
Procedure.s MyPeeks(*buffer, len, type)
ProcedureReturn PeekS(*buffer, len, type)
EndProcedure
Macro PeekS(buffer, len = -1, type = #PB_ModePeeks)
MyPeekS(buffer, len, type)
EndMacro
; --------------------------
*buffer = AllocateMemory(8)
Debug PeekS(*buffer, -1)