Verificare con le risorse del API di PulseAudio se una stringa contiene solo caratteri UTF8 validi

La funzione esterna "pa_utf8_valid()" della libreria PulseAudio consente di verificare se una stringa risponde totalmente alle caratteristiche del formato UTF-8; ossia se contiene solo caratteri UTF-8 validi.

E' necessario richiamare in Gambas la libreria dinamica condivisa: "libpulse.so.0.21.2 ".

Mostriamo un semplice esempio:

Library "libpulse:0.21.2"

' char *pa_utf8_valid(const char *str)
' Test if the specified strings qualifies as valid UTF8.
Private Extern pa_utf8_valid(strs As String) As String


Public Sub Main()

 Dim s, t As String
 
 s = Chr(190)
  
 t = pa_utf8_valid(s)
 If IsNull(t) then Print "La stringa non contiene solo caratteri UTF8 validi !"
  
End