Code: Select all
! $('body').append('<input type="file" id="fileInput"><br>')
! fileInput.onchange = function(e) {
! obj = URL.createObjectURL(this.files[0])
! }
Code: Select all
! $('body').append('<input type="file" id="fileInput"><br>')
! fileInput.onchange = function(e) {
! obj = URL.createObjectURL(this.files[0])
! }
Code: Select all
EnableExplicit
Procedure ReadCallback(Status, Filename.s, File, Size)
If Status = #PB_Status_Loaded
Debug "File: " + Filename + " - Size: " + Size + " bytes"
! audio_player.src = URL.createObjectURL(spider.file.objects.Get(v_file).localFile);
! audio_player.play();
CloseFile(0)
ElseIf Status = #PB_Status_Error
Debug "Error when loading the file: " + Filename
EndIf
EndProcedure
Procedure OpenFileRequesterCallback()
If NextSelectedFile()
OpenFile(0, SelectedFileID(), @ReadCallback(), #PB_LocalFile)
EndIf
EndProcedure
Procedure ChooseFileEvent()
OpenFileRequester("*.mp3", @OpenFileRequesterCallback())
EndProcedure
Define HTML.s
HTML = "<audio id='audio_player' />"
! $("body").append(v_html);
OpenWindow(0, 0, 0, 300, 50, "Read file example", #PB_Window_ScreenCentered)
ButtonGadget(0, 10, 10, 280, 30, "Choose a file...")
BindGadgetEvent(0, @ChooseFileEvent())