Italian [OT DA BAR] ragazzi tutti spenti con febbre o siete al mare a scassezzare!!!

LucaMs · Mar 7, 2023

ivanomonti said:
Una cosa e certa, un progetto l'ho messo giù ma non sento il desiderio di fare squadra

Vedi? Ci hai già ripensato, anche se la proposta l'hai fatta meno di 7 giorni fa, mi pare.

Oh, non stavo criticando il tuo progetto e nemmeno la IA in generale; solo che sono molto più bravo io, alla "Ghigliottina", rispetto a quei siti ?

ivanomonti · Mar 7, 2023

LucaMs said:
Vedi? Ci hai già ripensato, anche se la proposta l'hai fatta meno di 7 giorni fa, mi pare.

Oh, non stavo criticando il tuo progetto e nemmeno la IA in generale; solo che sono molto più bravo io, alla "Ghigliottina", rispetto a quei siti ?

non ho detto che stai criticando, non mi permetterei mai nemmeno a pensarlo, ma mi piace rompere i maroni come fanno le brave suocere del nord hahahah, parte gli scherzi poi posto il codice Stick2023 magari ci aggiungete qualcosa o migliorate

udg · Mar 7, 2023

posto il codice Stick2023

Mettilo a pagamento..magari al prezzo di un caffé, ma a pagamento e nella sezione internazionale.
Hanno venduto roba meno valida nel tempo, quindi ci sta che raccogli qualche soddisfazione..

Edit: Ooops, visto ora; sono arrivato tardi..

ivanomonti · Mar 8, 2023

ragazzi non sarà quanto sembra ma credetemi mi sto veramente divertendo e imparando a sfruttare al massimo la chatgpt avendo grosse soddisfazioni, ho implementato una sorta di contenitore come nel suo sito dove posso impostare un tema e approfondire il tutto senza perdere il segno tra domande e risposte, e i risultati sono eccellenti a mio dire... certo non sono attendibili al 100% ma un ottimo risultato

LucaMs · Mar 8, 2023

A quanto pare, giusto ieri c'è una nuova API ChatGPT; a te funziona ancora?
https://www.b4x.com/android/forum/threads/help-with-chatgpt-api-released-today.146626/

ivanomonti · Mar 8, 2023

LucaMs said:
A quanto pare, giusto ieri c'è una nuova API ChatGPT; a te funziona ancora?
https://www.b4x.com/android/forum/threads/help-with-chatgpt-api-released-today.146626/

si ha funzionato fino alle 3 di notte

ivanomonti · Mar 8, 2023

Sagenut said:
E' davvero notevole.
L'effetto visivo è molto bello.
Ti mando, solo per tua info, un esempio di come può essere una CLV.
Basta fare qualche impostazione corretta nel Designer.

View attachment 140016

Gli Item li fai come vuoi senza troppi limiti, sono dei layout completi.
La CLV l'ho resa totalmente trasparente quindi è come fluttuante sullo sfondo principale.
I pannelli degli Item sono anche semitrasparenti perchè........... mi piacevano così per far intravedere lo sfondo anche durante lo scorrimento.

Mi fai un esempio solo della cvl trasparente per cortesia

LucaMs · Mar 8, 2023

ivanomonti said:
Mi fai un esempio solo della cvl trasparente per cortesia

https://www.b4x.com/android/forum/threads/perplexity.146649/post-929737

Sagenut · Mar 9, 2023

ivanomonti said:
Mi fai un esempio solo della cvl trasparente per cortesia

Oggi pomeriggio se riesco lo faccio.

LucaMs · Mar 9, 2023

ivanomonti · Mar 9, 2023

Allora chiedo un aiuto non in battute se possibile in modo che completo il gioco, ma ho diffilcoltà con CLV e non so perchè non trovo soluzioni

1) libre

LucaMs said:
View attachment 140072

ma scusa una cosa...

B4X:

MainForm.Stylesheets.Add(File.GetUri(File.DirAssets, "CLVTransparent.css"))

IN QUESTO MODO tutte le clv saranno trasparenti perchè tu passi il css al mainform e non alla clv, certo il risultato e giusto ma in parte, perchè se volessi tenere una clv normale questo non lo sarebbe se lo spazio cv fosse 5 (esempio), inoltre lo scroll non non vorrei vederlo quindi lavoro sempre di css.

grazie davvero non ci sarei arrivato fino al mainform

LucaMs · Mar 9, 2023

Codice di @stevel05 (funzionante)

B4X:

Private Sub SetScrollPaneBackgroundColor(View As CustomListView, Color As Int)
    Dim SP As JavaObject = View.GetBase.GetView(0)
    Dim V As B4XView = SP
    V.Color = Color
    Dim V As B4XView = SP.RunMethod("lookup",Array(".viewport"))
    V.Color = Color
End Sub

LucaMs · Mar 9, 2023

ivanomonti said:
1) libre

???

ivanomonti said:
se lo spazio cv fosse 5 (esempio)

???

ivanomonti said:
inoltre lo scroll non non vorrei vederlo

La barra?

LucaMs · Mar 9, 2023

LucaMs said:
La barra?

B4X:

Sub SetCLVScrollBars(clv As CustomListView, Visible As Boolean)
   Dim nsv As ScrollPane = clv.sv
   If Visible Then
       nsv.SetVScrollVisibility("ALWAYS")
   Else
       nsv.SetVScrollVisibility("NEVER")
   End If
   Dim jo As JavaObject = clv 'ignore
   jo.SetField("_scrollbarsvisible", Visible)
   clv.Base_Resize(clv.AsView.Width, clv.AsView.Height)
End Sub

LucaMs · Mar 9, 2023

LucaMs · Mar 9, 2023

Se vuoi che la CustomListView faccia anche un buon cappuccino, devi aspettare almeno fino a dopodomani ?

ivanomonti · Mar 9, 2023

@LucaMs

Il mio risultato non cambia molto, nel senso che quando inseriscogli elementi

1) rosso button

B4X:

    Dim bt0 As Button
    bt0.Initialize("Button_help")
    bt0.Text="Fatti aiutare"
    bt0.PrefHeight=30
    bt0.Alpha=1
    CSSUtils.SetBackgroundColor(bt0,xf.Colors.Transparent)
    CustomListView_quiz.Add(bt0,bt0)

2) blu elementi di clv

B4X:

    Dim value As String = "question 2"
     question2=value
     ListQuestion.Add(value)
     CustomListView_quiz.AddTextItem(value,value)

Questo è il risultato ottenuto, io invece vorrei avere i bottoni colorati esempio uno verde, uno rosso, uno giallo e le domande etichette trasparenti... ora guardo il controllo clv e me lo studio, ma spero di aver descritto bene il mio obiettivo.

ivanomonti · Mar 9, 2023

LucaMs said:
??? cavoli non ricordo nemmeno io

??? lo spazio tra le righe elemento 1, elemento 2, ho scritto male come al solito, Pardon

La barra? si esatto ma hai già risposto

LucaMs · Mar 9, 2023

ivanomonti said:
@LucaMs

Il mio risultato non cambia molto, nel senso che quando inseriscogli elementi

1) rosso button

B4X:

Dim bt0 As Button bt0.Initialize("Button_help") bt0.Text="Fatti aiutare" bt0.PrefHeight=30 bt0.Alpha=1 CSSUtils.SetBackgroundColor(bt0,xf.Colors.Transparent) CustomListView_quiz.Add(bt0,bt0)

2) blu elementi di clv

B4X:

Dim value As String = "question 2" question2=value ListQuestion.Add(value) CustomListView_quiz.AddTextItem(value,value)

Questo è il risultato ottenuto, io invece vorrei avere i bottoni colorati esempio uno verde, uno rosso, uno giallo e le domande etichette trasparenti... ora guardo il controllo clv e me lo studio, ma spero di aver descritto bene il mio obiettivo.

View attachment 140078

Nei progetti che ho allegato, guarda a funzione (sub) CreateItem.
Viene creato un Pane (B4XView) in cui viene caricato un layout.
Modifica il layout come ti serve, anche impostando il background su Transparent,

e cambia:

pnlItem.Color = ItemColors(Rnd(0, 2))

in:

pnlItem.Color = xui.Color_Transparent.

LucaMs · Mar 9, 2023

Lo spazio tra gli elementi (item) nelle proprietà della CustomListView (Designer) è Divider Height.

Italian [OT DA BAR] ragazzi tutti spenti con febbre o siete al mare a scassezzare!!!

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Attachments

Expert

Expert

Attachments

Expert

Expert

Expert

Attachments

Expert

Expert

Expert

Expert

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency