UTF-8, ISO-8859-1 e Html

[Gianluigi]

Ho l'esigenza di apportare piccole modifiche al sorgente di un file html già esistente.
Se il file html è stato creato con caratteri UTF-8 riesco nel mio intento, ma se il file html è codificato charset=ISO-8859-1 non riesco.
Ho provato in tanti modi usando Conv$() anche in abbinamento a Html(), usando TextArea ma non sono riuscito a nulla, qualche suggerimento?

Allego test dimostrativo

 

[vuott]

...ma se il file html è codificato charset=ISO-8859-1 non riesco.

Prima che mi metta a rovistare nella iibreria esterna GLIB-2.0, prova ad usare la proprietà .RichText dell'oggetto TextEdit (al posto di TexEditor) , dopo aver attivato gli espliciti necessari componenti del sistema grafico QT4.

[Gianluigi]

[
Prima che mi metta a rovistare nella iibreria esterna GLIB-2.0, prova ad usare la proprietà .RichText dell'oggetto TextEdit (al posto di TexEditor) , dopo aver attivato gli espliciti necessari componenti del sistema grafico QT4.

Ma non è roba obsoleta che è stata abbandonata e fra poco non funzionerà più, o ho capito male?

 

[Gianluigi]

Ho detto una cosa non precisa TextEdit esiste per QT4 e QT5 ora rammento la discussione sulla ML a tale proposito. 
Mi metto a studiare e poi riferisco.

Grazie

Ps: Ora è tardi domani ho da fare ma appena posso studio e riferisco 

 

[Gianluigi]

Si, lo so il codice del Button2 postato ieri sera è sbagliato, forse così sarebbe meglio 

Codice: [Seleziona]

  Dim s As String  
  
  s = "/tmp" &/ $sPath  
  File.Save(s, TextEditor1.Text)
  WebView1.Url = s

Ma il vino a cena era così fresco e buono (Corvo bianco)...

Comunque pensandoci bene non mi va di implementare qualcosa che non sia prettamente Gambas attuale.
Mi sa che non ne farò nulla.
 

[vuott]

Mi sa che non ne farò nulla.

...  ...ma... a me funziona utilizzando l'oggetto TextEdit !

Codice: [Seleziona]

Private $sPath As String


Public Sub Button1_Click()

  $sPath = "AccentiIso.html"
  WebView1.Url = $sPath

End

Public Sub WebView1_Load()
  
   TextEdit1.RichText = WebView1.HTML

End


Public Sub Button2_Click()

   File.Save("/tmp" &/ $sPath, TextEdit1.RichText)
  
   WebView1.Url = "/tmp" &/ $sPath

End

[Gianluigi]

Ciao Vuott,
si funziona anche a me, ma qui tu stai lavorando solo sul testo, mentre io avrei la necessità di agire sui markup e quindi di vederli, cambiarli, salvarli e rivedere il file sorgente cambiato per eventuali altri cambiamenti.
Ma ripeto la cosa perde di importanza in quanto non voglio cambiare il componente gb.gui.qt e pertanto non ho la possibilità di usare textedit.
Ma non importa, ho cambiato strategia e questa cosa non serve più.
Ti ringrazio molto per l'aiuto.
 

[Gianluigi]

Volendo ritornare a l'idea iniziale, per il mio fabbisogno questa soluzione parrebbe funzionare bene.