PureBasic - Linker error
POLINK: fatal error: Zugriff verweigert
Code: Alles auswählen
; Variablen
Global QuellGrafik
Global ZielGrafik
Global FileName$
; Initialisierung
UsePNGImageDecoder()
UsePNGImageEncoder()
; Hauptprogramm
FileName$ = OpenFileRequester("Wählen Sie die Screenshots aus","", "PNG-Datei | *.png", 0, #PB_Requester_MultiSelection)
While FileName$
QuellGrafik = LoadImage(#PB_Any, FileName$)
ZielGrafik = GrabImage(QuellGrafik, #PB_Any, 470, 230, 630, 350)
SaveImage(ZielGrafik, GetPathPart(FileName$) + "small " + GetFilePart(FileName$),#PB_ImagePlugin_PNG)
FreeImage(QuellGrafik)
FreeImage(ZielGrafik)
FileName$ = NextSelectedFileName()
Wend