NUOVO AMBIENTE SCRIPT AREA TECNICA

[Mike58]

Una BuonaGiornata a tutti gli amici del forum.
Grazie a Luigi e Rookie per L'apprezzamento, anche se l'ammirazione maggiore debba andare ad i Legend che finora è stato quello che maggiormente è andato più vicino al progetto che si vorrebbe realizzare come insegnamento.

Ho cominciato tardi a studiare questo ambiente e mi sono perso qualche passaggio( che sicuramente esiste in qualche passaggio di questo TD) pertanto mi auguro che l'amico ILegend ci aiuti con qualche buon esempio.

Ciao a Tutti.

 

[edesimone]

qualcuno che può sapere qualcosa. grazie

qualcuno sa perchè con v.254 appare un messaggio che indica email x KEY LICENZA?

ma se è Licenza community perchè?
è solo per OLE O è anche per TwinBasic ?

 

[lotto_tom75]

inutile dire che tra i primi della classe ci sia Mike ... ignota la fine dello studente pasticcere sarà andato i nsettimana bianca ..le assenze in queto periodo dipendono da quello ..

Messaggio dalla montagna... 👩‍🦰🧑‍🍳🤖

Traduzione del "messaggio dalla montagna" x Rookie 🙍‍♀️👩‍🍳🤖

 

[LuigiB]

namo benne qua s'è fatto pure la segretaria ... so morto dalle risate ahahahahha ..

 

[i legend]

Ciao Luigi, anche iLegend ieri non si e' fatto sentire. Speriamo non sia per motivi di salute!
Buona giornata a tutti e buon proseguimento...

Buon giorno Rookie.
Grazie del pensiero.
Sto provando a fare il form .
E tra impegni vari mi sto collegando poco.
Grazie mille

 

[i legend]

Grazie Mike
Sei più avanti tu con l utilizzo delle funzioni. Intanto sto provando a capire i controlli.
Buona giornata a tutti

 

[Rookie]

qualcuno che può sapere qualcosa. grazie

qualcuno sa perchè con v.254 appare un messaggio che indica email x KEY LICENZA?

ma se è Licenza community perchè?
è solo per OLE O è anche per TwinBasic ?

Io uso la beta 254, ho provato a usare OLE ieri, puoi vedere il post qui, ma per ora non si puo’ usare dato che non é ancora stato implementato. Tuttavia, per il resto, inerente all’IDE e al compilatore, 32-bit edition, finora non ho rilevato nulla di ciò che hai descritto. Se hai un account discord, puoi chiedere agli sviluppatori del progetto tB!

Buona giornata

 

[lotto_tom75]

Prima che durante la pausa impazzisca del tutto e cancelli tween basic qualcuno mi può dire perchè questa sub di esempio per generare una pausa continua a dirmi Object required? Grazie

Class Form1

Dim OrarioFinePausa As Date
    
    Private Sub Form_Load()
        Call Pausa(3000)
    End Sub
    
    
    Private Sub Pausa(DurataPausa As Integer)
 ' Questa procedura è chiamata in causa dai tre pulsanti:
 ' ognuno dei tre pulsanti passa a questa procedura la sua durata della Pausa
 ' espressa in millisecondi:
 
 Print DurataPausa
 
 Dim OrarioFinePausa As Date
 
 OrarioFinePausa = Date.Now.AddMilliseconds(DurataPausa)
  
 Do Until Date.Now > OrarioFinePausa
 
 ' Il ciclo non contiene alcun comando: 
 ' esso ruota semplicemente su se stesso sino a quando la data 
'corrente è maggiore della variabile OrarioFinePausa.
 
 DoEvents()
 Loop
 
 End Sub

End Class

 

[Rookie]

Messaggio dalla montagna... 👩‍🦰🧑‍🍳🤖

Traduzione del "messaggio dalla montagna" x Rookie 🙍‍♀️👩‍🍳🤖

Mi dispiace che non eri a risalire le candide discese, come qui pensavamo, magari devolvendo i doni della titolare della cornucopia piena di sonante pecunia, la quale dispensa a sua discrezione le gioie mondane per i suoi eletti. Spero tu abbia gia’ ritrovato forza ed energie, per continuare

 

[LuigiB]

mi sa che la segretaria si è vestita provocante e quindi non ti sei accorto che date non è un oggetto .. hai sbagliato a copiare .. hai preso codice dotnet invece che vb6

 

[lotto_tom75]

mi sa che la segretaria si è vestita provocante e quindi non ti sei accorto che date non è un oggetto .. hai sbagliato a copiare .. hai preso codice dotnet invece che vb6

L'ho preso da vb2010 il secondo manuale indicato da happy che ringrazio e saluto. Quindi come si corregge proff? Io non ci arrivo...

 

[LuigiB]

L'ho preso da vb2010 il secondo manuale indicato da happy che ringrazio e saluto. Quindi come si corregge proff? Io non ci arrivo...

semplice scoprendo quali sono le istruzioni per fare la stessa cosa ma in vb6 .. studiare che la vacanza è finita !

 

[i legend]

Prima che durante la pausa impazzisca del tutto e cancelli tween bas

🤣🤣🤣🤣🤣allora non sono l unico 🤣🤣🤣🤣🤣

 

[lotto_tom75]

semplice scoprendo quali sono le istruzioni per fare la stessa cosa ma in vb6 .. studiare che la vacanza è finita !

Forse prima soluzione...

  Private Sub Form_Load()

   Call Pause(10)
       
       Print "OK FORSE CI SIAMO!"

End sub

    Sub Pause(ByVal sec As Single)
   
   Dim t As Single

   t = Timer + sec
   If t >= 100000 Then t = 0 
   Do
        DoEvents        

         'sleep 50
    
Loop While Timer < t
End Sub

O almeno questo code vb6 sembra funzionare... anche commentando sleep (comando vb6 non riconosciuto in tb...)

 

[LuigiB]

non è un comando di vb6 ma un api di windows che deve essere dichiarata

Declare Sub Sleep Lib "KERNEL32" (ByVal dwMilliseconds As Long)

 

[joe]

Caro Joe, questa "vista" che hai presentato ispira qualcosa da emulare con tb+excel... devo dire che la trovo assai efficace e selettiva, due sole nuances di un tono tra l'arancione e il marrone chiaro (da quello che vedo col mio monitor, spero non sia daltonismo incipiente). Complimenti!

Si certo "ripulire i risultati" è tra gli scopi principali.

Le linee guida sono più o meno queste e coincidono in buona parte con quanto già fatto, detto e proposto.

Innanzi tutto Vi ringrazio per la pazienza, l’attenzione e l’interesse e sarà possibile l'aiuto.

La prima parte del programma che ho immaginato riguarda i pronostici.

Sono formati direttamente con scelte proprie, o con risultati di altri programmi, o da ricerche statistiche, cabalistiche ecc.

Come si è fatto ad esempio nella proposta precedente dove erano la ricerca di Ambi Bivalenti.

Dunque per sommi capi si dovrebbe poter prevedere la possibilità di poter scegliere 10 pronostici di 10 colori.

Colori diversi, come default, e con la possibilità di poterli cambiare.

Perché essendo attribuiti a sorti diverse, potrebbero anche essere diversi e contemporaneamente riferiti ad una sola ruota.

Es: 1 a Milano per Estratto / 2.3 a Milano per Ambo / 4.5.6 a Milano per Terno

Dunque potrebbe essere utile “uniformarli” ed assimilarli nello stesso colore.

Diciamo che si dovrebbe anche poter scegliere tra 5 Sorti = Colori = Pronostici.

Inserendo da 1 a 10 numeri (come massimo giocabile) per ogni pronostico.

Tra 10/11 Ruote scelte singolarmente e/o a gruppi di 2 o più, nelle quali verificare l’esito del pronostico.

Eventualmente prevedere la possibilità di salvare e poi recuperare, la tabella completa dei pronostici.

Descritta la maschera di input del programma, rimangono, i test condizionali che sono il corpo

vero e proprio del progetto (di cui ho mostrato una parte dei calcoli) ed in ultimo c’è la flexgrid in cui evidenziare il tutto.

Per ora c’è questo progetto o poco più e so di non avere la bacchetta magica di Luigi (tanto proficua nel realizzare,

quanto attiva nel colpire le nocche e le fantasie poco corrette degli scapestrati).

Proverò a mettere giù una manciata di bottoni per descrivere meglio l’interfaccia grafica di questo.

Poi si vedrà … non ultimo quali scelte saranno possibili ed impossibili.

 

[lotto_tom75]

non è un comando di vb6 ma un api di windows che deve essere dichiarata

Declare Sub Sleep Lib "KERNEL32" (ByVal dwMilliseconds As Long)

Grazie luì ma ce l'ho fatta senza sleep...

 Private Sub Rallenta()
 Dim secondidipausavoluti As Integer
 secondidipausavoluti = 1
 Dim Pausa As Long
 Dim Controllo As Long
 Pausa = Timer + secondidipausavoluti '0.1
  Do While Controllo < Pausa
  Controllo = Timer
  Loop
 End Sub

Solo ho scoperto, dopo diversi tentativi, che molto probabilmente la sub soprastante viene correttamente interpretata in tween basic solo con il controllo picturebox e non con il controllo image...

in altre parole...

questo non funzia...

    Image1.Picture = LoadPicture(File1.Path & File1.List(y))
    
call rallenta

ma questo si!

    Picture1.Picture = LoadPicture(File1.Path & File1.List(y))

call rallenta

👋

 

[LuigiB]

nuovo aggiornament , ho inserito alcume funzioni con lo stesso nome che hanno i nspaziometria per facilitare le cose

DDLLScript_per_utenti

MediaFire is a simple to use free service that lets you put all your photos, documents, music, and video in a single place so you can access them anywhere and share them everywhere.

www.mediafire.com

la dll non è necessario registrarla se avete gia l'ultima versione è rimasta la stessa , è cambiato il progetto twinbasic di base.



per lottootm vedi bene se il percorso è corretto o se hai una versione vecchia di twinbasic perche con image loadpicture mi risulti funzioni . qantomen con le bmp non so altri formati... non ho provato.

 

[lotto_tom75]

per lottootm vedi bene se il percorso è corretto o se hai una versione vecchia di twinbasic perche con image loadpicture mi risulti funzioni . qantomen con le bmp non so altri formati... non ho provato.

No no loadpicture con image funziona anche a me . E' solo la sequenza temporizzata e automatica con timer che sembra funzionare solo con picturebox e non con image luigi

 

[LuigiB]

guardati meglio il codice .. mi pare strano e comunque sleep ci vuole ...