[TWINBASIC] Temporizzare il caricamento di immagini dinamiche da cartella desiderata

[freetom]

Private Sub Command1_Click()

   Dim i As Long

   numerodifiles = File1.ListCount

   For i = 0 To File1.ListCount

      filename = File1.List(File1.ListIndex)


      Print i
      Print "                            " & File1.List(0)
      Print "                            " & File1.List(1)

   Next

   Dim y As Long

   For y = 0 To File1.ListCount - 1
     
 elencafile.Text = elencafile.Text + vbCrLf + File1.Path & File1.List(y)

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


      'Call Rallenta


   Next y
End Sub


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

Dovrei mettere un rallentamento tra il caricamento di un'immagine e l'altra perchè adesso in meno di un secondo le carica tutte e arriva all'ultima mentre vorrei avere almeno 5 secondi tra una e l'altra immagine caricata o ancora meglio vorrei poter scegliere la durata della pausa tra il caricamento delle immagini in sequenza. Al momento la sub Rallenta mi fa solo aspettare i secondi impostati prima di avere lo stesso caricamento veloce errato...

Grazie

[optime]

forse basta aggiungere un doevents. che versione di VB?

[freetom]

Non è proprio VB ma molto simile. Sto parlando di tweenbasic.
Ad ogni modo per il caricamento temporizzato con l'intervallo voluto avrei risolto.. ovvero anzichè usare image che sembra non sentire... il timer... o lo sleep... utilizzo picturebox che invece risponde bene almeno al timer...

Ora però avrei un altro problema...

Image ha la funzione stretch che ridimensiona l'immagine caricata... ma picturebox no e non so come sistemare le immagini caricate al centro della stessa e della dimensione originaria o ridimensionate mantenendo le proporzioni originarie. Qualche idea?

Grazie e mi scuso in anticipo con i moderatori se non è possibile fare una domanda diversa nonostante l'argomento sia lo stesso...

[alka]

Grazie e mi scuso in anticipo con i moderatori se non è possibile fare una domanda diversa nonostante l'argomento sia lo stesso...

La domanda è diversa perché l'argomento non è lo stesso.

Apri una nuova discussione, e magari specifica meglio il linguaggio nel titolo (che suppongo sia twinBasic, e non TweenBasic).