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.
| (Una versione intermedia di uno stesso utente non è mostrata) | |||
| Riga 1: | Riga 1: | ||
Per generare un file immagine di tipo PNG da un file immagine di tipo PCX, è possibile usare alcune risorse della libreria ''SDL2''. | 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 | + | 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.800.2'' ". |
Mostriamo un esempio pratico: | Mostriamo un esempio pratico: | ||
| − | Library "libSDL2_image-2.0:0.2 | + | Library "libSDL2_image-2.0:0.800.2" |
<FONT Color=gray>' ''SDL_Surface * IMG_Load(const char *file)'' | <FONT Color=gray>' ''SDL_Surface * IMG_Load(const char *file)'' | ||
| Riga 17: | Riga 17: | ||
Public Sub Main() | Public Sub Main() | ||
| − | + | Dim surf As Pointer | |
| − | + | surf = IMG_Load("<FONT Color=darkgreen>''/percorso/del/file.pcx''</font>") | |
| − | + | If surf == 0 Then Error.Raise("Impossibile caricare il file 'PCX' !") | |
| + | |||
| + | IMG_SavePNG(surf,("<FONT Color=darkgreen>''/percorso/del/file.png''</font>") | ||
| − | |||
| − | |||
End | End | ||
Versione attuale delle 14:23, 18 lug 2024
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.800.2 ".
Mostriamo un esempio pratico:
Library "libSDL2_image-2.0:0.800.2"
' 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
