Differenze tra le versioni di "Convertire un file immagine PCX in un file immagine PNG mediante le funzioni esterne del API di SDL2"
Da Gambas-it.org - Wikipedia.
Riga 15: | Riga 15: | ||
− | + | Public Sub Main() | |
− | + | ||
Dim surf As Pointer | Dim surf As Pointer | ||
− | + | ||
− | + | surf = IMG_Load("<FONT Color=gray>''/percorso/del/file.pcx''</font>") | |
− | + | If surf == 0 Then Error.Raise("Impossibile caricare il file 'PCX' !") | |
+ | |||
+ | IMG_SavePNG(surf,("<FONT Color=gray>''/percorso/del/file.png''</font>") | ||
− | + | End | |
− | |||
− | |||
Versione delle 17:43, 26 dic 2023
Per generare un file immagine di tipo PNG da un file immagine di tipo PCX, è possibile usare alcune risorse della libreria SDL2.
Per poter fruire in Gambas delle funzioni della libreria SDL2, è necessario avere installata nel sistema e richiamare la seguente libreria condivisa: "libSDL2_image-2.0.so.0.2.3"
Mostriamo un esempio pratico:
Library "libSDL2_image-2.0:0.2.3" ' SDL_Surface * IMG_Load(const char *file) ' Load file for use as an image in a new surface. Private Extern IMG_Load(Sfile As String) As Pointer ' int IMG_SavePNG(SDL_Surface *surface, const char *file) Private Extern IMG_SavePNG(surface As Pointer, Sfile As String) As Integer Public Sub Main() Dim surf As Pointer surf = IMG_Load("/percorso/del/file.pcx") If surf == 0 Then Error.Raise("Impossibile caricare il file 'PCX' !") IMG_SavePNG(surf,("/percorso/del/file.png") End