Italian Sfondo EditText

[GIS]

Salve a tutti, leggevo che molti si lamentavano del fatto, che non si può cambiare colore dello sfondo, con angoli smussati.
Io uso questo:

dim EditText as string
sub Colore_Sfondo

       EditText.Color = Color.Red

       Dim cdwColor as ColorDrawble
       cdwColor.Initialize(Color.Red, 5dip)
       EditText.Background = cdwColor

end sub

 

[Star-Dust]

Per cambiare colore al pannello

Panel.Color=Colors.Red

Activity
Activity.Color= Colors.Green

BACKGROUND si usa per inserire un immagine di sfondo

Activity.AddView(Panel.Color... è errato

Activity.AddView(Panel,left,top,width,Height)è corretto.
Solo oggetti che hanno un view, infatti si chiama Add View
E sono: Button, Label, EditText, Panel, ListView, Spinner, ecc... Sicuramente non un tipo colors

 

[GIS]

intendebo del EditText non del pannello

 

[GIS]

intendevo del EditText non del pannello. si fa un quadrato colorato e dentro ci metti L editText

 

[Star-Dust]

Correggi l'esempio
E comunque non è necessario mettere un panel.

EeitText1.Color=Colors.Gray
oppure
EditText1.BackGround=ColorDrawable
Ottieni stesso risultato

 

[GIS]

Bho, leggevo che non si poteva cambiate lo sfondo di un EditText. Cmq provero il tuo codice. Il mio codice non è errato semmai lungo.

 

[Star-Dust]

Non puoi dal design, che invece è possibile per gli altri oggetti.

A volte hai risultati imprevedibili se non setti il colore perché alcuni dispostivi mettono fondo bianco altri fondo nero. Quindi dal design a volte non sai che colore impostare per il testo, visto che lo sfondo non sai come appare... Da codice imposti il colore e sei sicuro.

Con ColorDraw di solito cerchi di ottenere i bordi smussati. La semplice colorazione basta cambiare le proprietà.. Tranquillo sei nuovo e stai imparando

 

[GIS]

Bhe nuovo nel forum e B4a di sicuro. Con l età non so ......lol

 

[Star-Dust]

Ehehe qui tutti ultra ottantenni siamo

 

[GIS]

E si tutti classe '30.

 

[GIS]

Grazie funziona alla grande. Mi toglie anche la linea del campo che era brutta. Magari sai anche se c e la funzione che controlla la lunghezza del campo. Ho devo usare:

Sub Nome_TextChange (Old as string, New as string)

If New.Lenght >15 then
Nome.Text = Old
End if
End sub

 

[Star-Dust]

devi usare la librerie IME, se lo fai col tuo codice potrebbe andare in errore.

Sub Globals
    Dim IME As IME
    Dim edtTest As EditText 
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("layout1")
    edtTest.Color=Colors.Red
    IME.Initialize("IME")
    IME.SetLengthFilter(edtTest, 20)
End Sub

Come vedi in questa risposta di @Erel : https://www.b4x.com/android/forum/threads/edittext-max-length.73179/#post-464990

Però quando hai una nuova domanda devi aprire un nuovo thread, altrimenti ti linciano.

 

[GIS]

Grazie....Non so come ringraziarti.....

 

[GIS]

Ok fatto.....