mestnyi hat geschrieben: ↑24.11.2022 06:51Code: Alles auswählen
If *widget = #Null Select Position Case #PB_List_First : *widget = *this\_parent( )\first\widget Case #PB_List_Before : *widget = *this\before\widget Case #PB_List_After : *widget = *this\after\widget Case #PB_List_Last : *widget = *this\_parent( )\last\widget EndSelect EndIf If *widget = #Null Select Position Case #PB_List_First : *widget = *this\_parent( )\first\widget Case #PB_List_Before : *widget = *this\before\widget Case #PB_List_After : *widget = *this\after\widget Case #PB_List_Last : *widget = *this\_parent( )\last\widget EndSelect EndIf
Code: Alles auswählen
a$ = "UwBlAGgAcgAgAGkAbgB0AGUAcgBlAHMAcwBhAG4AdAAhAAoAVwBvAGwAbAB0AGUAcwB0ACAARAB1ACAAbQBpAHIAIABkAGEAbQBpAHQAIABlAHYAdABsAC4AIABpAHIAZwBlAG4AZAB3AGEAcwAgAHMAYQBnAGUAbgA/AAAA"
OpenConsole()
b$ = Space(200)
Base64Decoder(a$, @b$, 200)
PrintN(b$)
Input()