New topic: Can read video from database macosx but not from windows...
<http://forums.realsoftware.com/viewtopic.php?t=47178> Page 1 of 1 [ 1 post ] Previous topic | Next topic Author Message gianfranco Post subject: Can read video from database macosx but not from windows...Posted: Wed Mar 06, 2013 4:41 am Joined: Mon Sep 28, 2009 1:29 am Posts: 27 Hallo... I have a record: id as integer video as binary I have: dim f as folderitem dim b as binarystream dim s as string f = GetOpenFolderItem ("") if f <> nil then b = BinaryStream.Open(f) s = b.Read(b.Length) Dim rec As New DatabaseRecord rec.IntegerColumn("id") = val(IdScelto) rec.BlobColumn("video") = s app.db.InsertRecord "video", rec if app.db.Error then MsgBox app.db.ErrorMessage app.db.Commit end if for put video and this works Then I have : RecordScelto = App.db.SQLSelect("SELECT video FROM video WHERE id = " + vettvid(index) + ";") if RecordScelto.RecordCount > 0 then RecordScelto.MoveFirst if Schermo <> nil then Schermo.Stop #if TargetWin32 Schermo.PlayerType = 2 #ElseIf TargetMacOS Schermo.PlayerType = 1 #endif Schermo.Movie = app.strvid(RecordScelto.Field("video").StringValue) Schermo.Top = ImgChi.top Schermo.Left = (Main.Width - Schermo.Width) / 2 Schermo.Play Schermo.Visible = true end if Works only for macosx. On windows shows: can't play .tmp extension (or something similar) what can I do???? Thank you Gianfranco Top Display posts from previous: All posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost timeSubject AscendingDescending Page 1 of 1 [ 1 post ] -- Over 1500 classes with 29000 functions in one REALbasic plug-in collection. The Monkeybread Software Realbasic Plugin v9.3. http://www.monkeybreadsoftware.de/realbasic/plugins.shtml [email protected]
