Jump to content

Kyle Miller

  • Content Count

  • Joined

  • Last visited

Community Reputation

1 Neutral
  1. Using Delphi 10.4.1 w/connection transaction level set to dirty read. When I execute a stored procedure, which also executes set trans iso level to uncommitted, the stored procedure doesn't see an update performed in the app. Here is the outline of events -- FDCon.StartTrans FDDataSet.FieldX.AsInteger := 12 FDDataSet.Post FDStoredProc.Exec ... Here the stored proc selects FieldX and see it as null, not 12. Why? FDCon.Commit I want the stored procedure to see the uncommitted values posted by the app. EDIT: Cancel request. Turns out to be a stored procedure bug.
  2. Kyle Miller

    Set focus to IDE editor

    How you return to the editor when focus is on the Code Explorer, i.e. the tree, member search bar, etc? The release notes for MMX 9.0 says pressing escape should do it, but it's not working. I'm using Delphi 10.4.1 & MMX 15.0.20 build 2385.
  3. Kyle Miller

    MARS & Delphi 10.2

    Never mind. Removed a reference to an Delphi MVC Framework installation I wasn't using. It was the source of conflict.
  4. Kyle Miller

    MARS & Delphi 10.2

    I tried the latest release. Several build failures during install. I noticed commits address the issues, so I pulled the head. It installs. Trying to build MARSHelloWorld & it's complaining of numerous items missing in SynTable.pas. It may be affected by me commenting out {$I MARS.inc} in Server.Forms.Main because the inc file is not included. I tried using the one in C:\Development\ExtLib\MARS\Source to no avail. Do I need to install mORMot to use MARS?
  5. This is exactly what I did using TTask and TThread. It was as close as I could get to a working solution. Problems arose when jumping between records quickly. Tried calling FireDac's AbortJob method to making aborting more graceful. It didn't go well. I'll try using a connection per thread and possibly test out TZMethodThread.
  6. Given a table with a blob field where the value might take several seconds to pull down, what's the best way to lazy fetch the data w/o blocking the user interface? The BLOB is an image displayed on a form. The blob is being pulled in a detail query as to not slow the master query down. TFDFetchOptions allows delaying until BLOB needed. This results in a similar problem. When user clicks record, user has to wait till BLOB pulled down. Also tried ASync as described in wiki under Asynchronous Open and Fetching. The problem is either the living binding errors with "couldn't find text" or an exception is raised when jumping back and forth between two records, one with a blob and one without. I even tried a TTask solution. The goal is to lazy load the BLOB and display the image if it comes down. If the user clicks to another row, abandon the BLOB fetch and display the new row's image if present. EDIT: Using Delphi 10.2 Enterprise.
  7. Perfect. Thank you guys.
  8. Thanks for the reply. I changed the Select as you have. No dice. The autoinc field still says -1 after InsertSql runs. Any properties on the TFDAutoIncField or TFDQuery to check?
  9. Given: 1. Database is MSSQL 2. TFDQuery & an TFDUpdateSQL assigned as the update object. 3. TFDUpdateSQL.InsertSql executes a stored procedure to perform insert, which affects a number of tables. 4. TFDUpdateSQL.InsertSql stored procedure returns an ID field value, which is the key field in TFDQuery. Ex: UserId. 5. UserId is an AutoInc TField in the TFDQuery. What is the proper way to push the value returned by the stored procedure into the AutoInc field on an inserted record? Previous methods I used are not working. Here is some code that does NOT work: declare @SysUserId int; exec dbo.SysUserUpdate @SysUserID = @SysUserID output, @UserName = :UserName, @Password=:Password, @FullName = :FullName, @EmailAddress = :EmailAddress, @CompanyLocationId = :CompanyLocationId, @IsActive = :IsActive, @SysApplicationKey = :SysApplicationKey, @ModuleAccess1 = :ModuleAccess1, @ModuleAccess2 = :ModuleAccess2, @PolicyAccess1 = :PolicyAccess1, @PolicyAccess2 = :PolicyAccess2 select :SysUserId=@SysUserId
  10. Kyle Miller

    Telegram integration?

    There is a Delphi Dev channel. But a channel which echos every post here? That would be noisy.