Jump to content

Michael Collier

Members
  • Content Count

    37
  • Joined

  • Last visited

Everything posted by Michael Collier

  1. Michael Collier

    Rad Studio Access Violation

    No, didn't do that
  2. Michael Collier

    Rad Studio Access Violation

    No - that seems to be ok To get the same error at your end try downloading demos from here: https://github.com/DelphiWorlds/Kastri 1) Open project group KastriDemosGroup 2) Make sure that the NFCDemo project is the Active Project in the Project Group and Save All. 3) Open RAD Studio and in Welcome Screen hit Enter Key on KastriDemosGroup Repeat but at step (3) but Double Click with mouse and you won't get the error.
  3. Michael Collier

    Rad Studio Access Violation

    No IDE Plugins & just TForm and TMemo Slightly different message this time.. [20F73ABE]{designide280.bpl} DeskForm.UnlockIDEDrawing (Line 289, "DeskForm.pas" + 9) + $9 [216A947A]{WelcomePageIDE280.bpl} Welcomepage.Listview.TWPPluginListView.DoOnItemClick + $3A [50CCEB49]{vcl280.bpl } Vcl.Controls.TWinControl.WMChar (Line 11737, "Vcl.Controls.pas" + 7) + $6 [50CC7CCA]{vcl280.bpl } Vcl.Controls.TControl.WndProc (Line 7544, "Vcl.Controls.pas" + 91) + $6 [5006076C]{rtl280.bpl } System.TMonitor.Destroy (Line 19558, "System.pas" + 0) + $0 [50064774]{rtl280.bpl } System.@FinalizeRecord (Line 32815, "System.pas" + 76) + $2 [50DCDE51]{vcl280.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5789, "Vcl.Themes.pas" + 7) + $D [50061544]{rtl280.bpl } System.@TryFinallyExit (Line 23404, "System.pas" + 8) + $0 [50DCDF3F]{vcl280.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5800, "Vcl.Themes.pas" + 18) + $1E [50CC97AE]{vcl280.bpl } Vcl.Controls.TControl.GetStyleName (Line 8578, "Vcl.Controls.pas" + 5) + $7 [50EF0AA3]{vcl280.bpl } Vcl.Styles.TCustomStyle.SourceLoaded (Line 3315, "Vcl.Styles.pas" + 1) + $13 [500602C7]{rtl280.bpl } System.TObject.Dispatch (Line 18874, "System.pas" + 11) + $0 [50DD1DB9]{vcl280.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7684, "Vcl.Themes.pas" + 38) + $6 [50DD1F90]{vcl280.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7784, "Vcl.Themes.pas" + 0) + $0 [50E13C70]{vcl280.bpl } Vcl.Forms.TScrollingStyleHook.WndProc (Line 14791, "Vcl.Forms.pas" + 0) + $0 [50DD15DE]{vcl280.bpl } Vcl.Themes.TStyleHook.HandleMessage (Line 7389, "Vcl.Themes.pas" + 20) + $6 [50EF128E]{vcl280.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3603, "Vcl.Styles.pas" + 22) + $B [50DCE070]{vcl280.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5858, "Vcl.Themes.pas" + 11) + $11 [50CCAE2F]{vcl280.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9408, "Vcl.Controls.pas" + 0) + $F [50CCCDBD]{vcl280.bpl } Vcl.Controls.TWinControl.WndProc (Line 10579, "Vcl.Controls.pas" + 170) + $6 [017F3247]{vclwinx280.bpl} Vcl.ControlList.TCustomControlList.WndProc (Line 1392, "Vcl.ControlList.pas" + 18) + $4 [50CCC338]{vcl280.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10267, "Vcl.Controls.pas" + 3) + $6 [50174200]{rtl280.bpl } System.Classes.StdWndProc (Line 18318, "System.Classes.pas" + 8) + $0 [50E0D68F]{vcl280.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 11317, "Vcl.Forms.pas" + 23) + $1 [50E0D6D2]{vcl280.bpl } Vcl.Forms.TApplication.HandleMessage (Line 11347, "Vcl.Forms.pas" + 1) + $4 [50E0DA11]{vcl280.bpl } Vcl.Forms.TApplication.Run (Line 11486, "Vcl.Forms.pas" + 27) + $3 [004F6F82]{bds.exe } bds.bds (Line 227, "" + 16) + $2
  4. Michael Collier

    PAServer iOS

    Thanks Dave, I was thinking of port forwarding, great I'll give it a go..
  5. Michael Collier

    How to: Enable camera in TWebBrowser

    Hello, I have a javascript based webpage that allows me to open my USB camera, but when I open the webpage via Delphi RAD TWebBrowser component it doesn't work (testing on Android phone). I wasn't surprised because when I hosted this webpage in an <iframe> as part of a simple web based application I needed to "turn on" certain security features i.e. allow="camera" etc So I'm guessing I need to do similar for TWebBrowser but can't find how to do that? I tried modifying the security configuration for the app on my Android phone (allow camera access), but still didn't work. Is there another setting - either a property/function of TWebBrowser - or maybe there are security settings I need to configure for the application from within RAD before compiling? Thanks in advance, Mike
  6. Michael Collier

    How to: Enable camera in TWebBrowser

    Thanks Dave, Looking at the SO thread it mentions overriding onPermissionRequest (I guess in Android Studio) but I'm not sure what Delphi 11 equivalent is? I downloaded the WebBrowserFileChooser project, I'm working my way through the code, looking at TWebChromeClientManager etc, is this related to working with onPermissionRequest ? From my own experiments I have figured out that the audio is giving me the problem, (I can get video working now 🙂 ). I found others with same problem and more references to onPermissionRequest . I have uploaded a simple HTML test page for opening a camera & microphone and reporting any errors in a textbox. https://iotleaf.co.uk/test/browser/mic/ If anyone tries opening the test page with their own installation of Embarcadero WebBrowser demo.. C:\Users\Public\Documents\Embarcadero\Studio\22.0\Samples\Object Pascal\Mobile Snippets\WebBrowser They will see the problem.. I modified my copy of the WebBrowser project AndroidManifest.template.xml file to include audio and camera, thus.. <%uses-permission%> <uses-permission android:name="android.permission.RECORD_AUDIO" /> <uses-permission android:name="android.permission.CAMERA" /> So I'm getting closer, I think I just need to figure the onPermissionRequest part?
  7. Hello, My local second hand phone shop has an IPhone SE for £99.00 GDB, and I was wondering if this would be a suitable platform for testing RAD Studio 11? If not, no problem, I would be provided with a more expensive phone, but I'd like to save my colleague some money. Buying cheap second hand Android phones/tablets has worked great for me in the past, but I'm not a user of Apple phones - so don't know what is appropriate. (I just need a phone with ability to access camera and uploading images to server). So is IPhone SE ok for testing RAD Studio 11, or can you suggest a minimum requirement? Thanks, Mike
  8. Michael Collier

    Is IPhone SE suitable for testing purposes?

    Thanks Dave, I'll ask the shop for details when they open tomorrow . If it turns out to be the second edition should I forget it, or would that be ok as long as they have managed to install iOS 15 on it (I followed links you gave and found mention of the second edition having version 13 as its default but can support 15 https://en.wikipedia.org/wiki/IPhone_SE_(2nd_generation)#Software)?
  9. Michael Collier

    How to: Phone camera frame(s) to server

    Hello, I'm evaluating latest version of Delphi RAD for possible iOS/android phone application. I'd like to be able to use a phone camera (iOS and Android) to take photos (maybe 1 per second) and upload to my server. So.. 1). I found sample project "accessCameraApp" - my first question is.. would this be the component to use for my photo capture? - or should I be using something different? 2) I found internet references to indy components (I have used this in the past), but they are not installed on my component palette (no problem though I guess I can install later), but I did find TNetHTTPClient and TNetHTTPRequest, I was wondering which I should use (indy/TNetHTTPClient or maybe synapse if it is available?) for posting photo frames to my server? (i.e. a php page that saves photo(s) in database BLOB field). Any help to point me in the right direction would be great, it's more about the selection of components that I would need, I have plenty of Object Pascal experience, and I do a lot of camera work using javascript. It's just that the latest set of Delphi tools are new to me. Thanks in advance, Mike
×