Differenze tra le versioni di "Filtrare i caratteri invalidi UTF8 ed ASCII da una stringa con le funzioni esterne del API di PulseAudio"
Da Gambas-it.org - Wikipedia.
| (2 versioni intermedie di uno stesso utente non sono mostrate) | |||
| Riga 1: | Riga 1: | ||
La libreria di ''PulseAudio'' ci consente anche di filtrare una determinata stringa depurandola dai caratteri invalidi che siano di formato UTF8 e/o di formato ASCII. | La libreria di ''PulseAudio'' ci consente anche di filtrare una determinata stringa depurandola dai caratteri invalidi che siano di formato UTF8 e/o di formato ASCII. | ||
| − | Per fruire | + | Per fruire di tale risorsa in Gambas, è necessario dichiarare e richiamare la libreria condivisa: "''libpulse.so.0.24.3'' ". |
Mostriamo un esempio pratico essenziale: | Mostriamo un esempio pratico essenziale: | ||
| − | Library "libpulse:0. | + | Library "libpulse:0.24.3" |
<FONT Color=gray>' ''char *pa_ascii_filter(const char *str)'' | <FONT Color=gray>' ''char *pa_ascii_filter(const char *str)'' | ||
| Riga 15: | Riga 15: | ||
| − | + | Public Sub Main() | |
| − | + | Dim s, t As String | |
| − | + | ||
| − | + | s = "abc" & Chr(190) & "dèf" | |
| − | + | Print s | |
| − | + | Print | |
| − | + | Wait 1 | |
| − | + | t = pa_ascii_filter(s) | |
| − | + | Print t | |
| − | + | t = pa_utf8_filter(s) | |
| − | + | Print t | |
| − | + | End | |
| − | |||
Versione attuale delle 17:23, 28 giu 2024
La libreria di PulseAudio ci consente anche di filtrare una determinata stringa depurandola dai caratteri invalidi che siano di formato UTF8 e/o di formato ASCII.
Per fruire di tale risorsa in Gambas, è necessario dichiarare e richiamare la libreria condivisa: "libpulse.so.0.24.3 ".
Mostriamo un esempio pratico essenziale:
Library "libpulse:0.24.3" ' char *pa_ascii_filter(const char *str) ' Filter all invalid ASCII characters from the specified string. Private Extern pa_ascii_filter(strs As String) As String ' char *pa_utf8_filter(const char *str) ' Filter all invalid UTF8 characters from the specified string. Private Extern pa_utf8_filter(strs As String) As String Public Sub Main() Dim s, t As String s = "abc" & Chr(190) & "dèf" Print s Print Wait 1 t = pa_ascii_filter(s) Print t t = pa_utf8_filter(s) Print t End
