Mandare l'handle di un file come parametro

[Top Fuel]

E' possibile fare una cosa del genere?

Codice: [Seleziona]

Dim handle As File
handle = Open miofile As Read 'o Write
Miaprocedura(handle)

Potrebbe risparmiarmi un pò di righe di codice, ma non ho trovato niente in proposito.

[vuott]

...cioè, scusa, passare ad una sub-procedura una variabile di tipo File ?

[Top Fuel]

Yes, oui, ja, da.

[vuott]

Mi pare che funzioni regolarmente:   

Codice: gambas [Seleziona]

Public Sub Form_Open()

  Dim fl As File
    
  fl = Open "/percorso/del/mio/file" For Read
  
  miaprocedura(fl)

  fl.Close

End


Private Procedure miaprocedura(hf As File)
  
  Dim s As String
  
  Read #hf, s, -256
  Print s
  
End

[Top Fuel]

Grazie.
Non sapevo se era possibile farlo con variabili non numeriche o stringa.

[vuott]

Però basterebbe anche soltanto provare !   

[Top Fuel]

Così almeno se serve a qualcuno c'è la risposta qui.