[Risolto] Aggiungere contenuto stringa a una textarea già contenente una stringa

[Lotz]

Salve sono ancora io sto finendo di fare un mio programma che poi verrà pubblicato (serve per la creazione dei layout) ma non mi aggiona la textarea come faccio? il codice che ho ora io è questo

Codice: [Seleziona]

        txt_css.text = txt_css.text & divs(name_div, pc_1[y])
        txt_html.text = txt_html.text & htmls(name_div)

funzioni

Codice: [Seleziona]

Private Function divs(name As String, width As Integer) As String
Dim f As String
Return f = "." & name & "{background-color: trasparent; margin:0;float:left; width:" & CStr(width) & "%;padding:0;}\n "
End
Private Function htmls(name As String) As String
Dim f As String
Return f = " < div class = " & name & " >Argomento Colonna </div>\n"
End

grazie in anticipo, praticamente manca questo è il mio software è pronto per la creazione della versione 1

[milio]

Forse per il testo formattato in quel modo dovresti usare l'oggetto TextEdit e passargli la stringa nella proprietà RichText.

[Lotz]

esempio?

[milio]

TextEdit.RichText = Tuo_testo_html

[Lotz]

quindi faccio
TextEdit.RichText= prima stringa & seconda stringa
txt_css= textEdit.richtext

[milio]

Facciamo cosi'... passami i sorgenti o comunque codice funzionante di quello che tu vuoi fare e poi vediamo, anche' perche' non so che tipo di oggetto sia txt_css 

[Lotz]

arrivano tramite mp^^

[milio]

Ok, ora e' tutto piu' chiaro... e ho anche capito che non avevo capito un tubo 

L'errore stava nelle due funzioni... correggi in questo modo:

Codice: [Seleziona]

Private Function divs(name As String, width As Integer) As String
  Return "." & name & "{background-color: trasparent; margin:0;float:left; width:" & CStr(width) & "%;padding:0;}\n "
End

Private Function htmls(name As String) As String
  Return " < div class = " & name & " >Argomento Colonna </div>\n"
End

[Lotz]

ok non ci sono altri errori di blasfemia totale? comunque ti mando un mp per chiederti una cosa privata

[andy60]

Il controllo texedit è tilizzato in un grande esempio contenuto in g3. Se si riuscisse ad inserirci anche immagini, oltre al testo sarebbe un grande html editor.

[Ceskho]

ok non ci sono altri errori di blasfemia totale? comunque ti mando un mp per chiederti una cosa privata

Ricordate che i vostri dubbi di oggi possono essere i dubbi di qualcun altro domani. Il forum è un bello strumento poichè chiarendo i propri dubbi è possibile aiutare altri utenti in futuro. Se avete domande (per quanto semplici o banali) postatele sempre e comunque. Agevolerete altre persone. Con i messaggi privati ciò non è possibile!

Prima di tutto collaborazione....