Jump to content

chkaufmann

Members
  • Content Count

    167
  • Joined

  • Last visited

Community Reputation

18 Good

Technical Information

  • Delphi-Version
    Delphi 11 Alexandria

Recent Profile Visitors

8645 profile views
  1. chkaufmann

    Alternative for RDP solution

    I looked at this some years ago. I liked the way the solved the problem to upload/download files in the browser client. This is a feature I need and I'm not sure, if it is solved in TSPlus. But the latest website and the difficulty to get price information makes me suspicious. Looks like the technical stuff is reduced to minimum and moved to background and you have to deal with sales people and high pricing.
  2. chkaufmann

    Alternative for RDP solution

    This looks interesting. How does it compare to "Thinfinity VirtualUI". I looked at this some years ago, but it was not 100% correct in HTML5 mode. Compared to that, the TSPlus Demo server with Excel looks perfect in Firefox. In addition, I think "Thinfinity VirtualUI" is driven by investors and not technical people anymore...
  3. We have a client / server application which we offer on an platform with RDP access (application only) for users. On the same server I run a REST API (https) with a mobile application accessing data in the same database. For one client it is not possible anymore to open an application over RDP. I need to find a solution using https only. The client application has too many features (including a map) to move to a browser platform easily. Even TMS Webcore is not a solution since we have too many customized controls. As far as I understand it is not possible to offer RDP access using a HTTPS connection or is it? Or are there any other options I have? I'm thinking about a n-tier solution where my client sends the requests to the API instead of the database. But maybe I missed an easier way to overcome the client restriction about not to use the RDP ports. Regards Christian
  4. chkaufmann

    Alternatives for SQL Anywhere

    Yes PostgreSQL is powerfull, so from that point of view, it looks heavy. But there is a Windows installer, quite simple. I think it may even configured for "silent install". Firebird comes in two version, one is with an embedded server. This you can install by just copying some files. And another advantage is, that you have single file databases. The only disadvantage is, that the database file have to be on a local drive with the embedded server. We used Firebird in many projects, however, when a database becomes bigger (several million records), it became a bit tricky with performance when you do many updates / deletes. That's when I started to use PostgreSQL which is more tolerant here. And PostgreSQL supports native JSON and Gis features. Christian
  5. chkaufmann

    Alternatives for SQL Anywhere

    PostgreSQL and UniDac. Christian
  6. chkaufmann

    String Helper for NormalizeString

    Thanks. I think the problem is solved. No errors anymore. Christian
  7. I created the following helper method to normalize Unicode strings with different representations of ä, ö, ü: function TBSStringHelper.Length: Integer; begin Result := TBSStringHelperCaller.Length(Self); end; function TBSStringHelper.NormalizeNFC: String; var bufLen : Integer; buffer : PWideChar; begin Result := Self; bufLen := NormalizeString(NormalizationC, PWideChar(Self), Length, nil, 0); if bufLen > 0 then begin GetMem(buffer, bufLen); try bufLen := NormalizeString(NormalizationC, PWideChar(Self), Length, buffer, bufLen); if bufLen > 0 then begin Result := buffer; SetLength(Result, bufLen); end; finally FreeMem(buffer); end; end; end; But when I use this function many times, I get a memory corruption error and at some point an access violation. What is wrong here? I'm on Delphi 11, Update 1. Christian
  8. chkaufmann

    filenames with unicode chars

    But when I look in WinApi.Windows.pas, then FindFirstFile maps to external symbol FindFirstFile (and not FindFirstFileW) for a parameter TWIN32FindData. It has to be TWIN32FindDataW, then FindFirstFileW is used. I'm still on Delphi 11, Update 1. So maybe this changed with the latest version? Christian
  9. chkaufmann

    Blogged : Code Signing with Inno Setup and Signotaur

    Can I integrate Finalbuilder with this service? https://techcommunity.microsoft.com/blog/microsoft-security-blog/trusted-signing-is-in-public-preview/4103457 $ 10.- per month looks fair to me. Christian
  10. Since some years there is the unit IOUtils.pas. There are many duplicated functions: ExtractFileExt() - TPath.GetExtension() ExtractFileName() - TPath.GetFileName() FileAge() - TFile.GetLastWriteTime() My code uses SysUtils.pas in most places, and I'm not sure if I should change this to use the functions from the new unit IOUtils.pas because the others will be deprecated at some point? And is there a comparisation table anywhere? It looks like not all functions work exactly the same way especially when it comes to throw exceptions. Christian
  11. chkaufmann

    Delphi 12.2 Patch 1

    I can't find this one anymore in the portal. Does it mean, it was fixed?
  12. chkaufmann

    Use TIdHTTPServer.Contexts for monitoring

    You mean get that exception? Maybe it's only when run the code with break points in the debugger. Anyway, it works fine now and get the details for my monitor functionality.
  13. chkaufmann

    Use TIdHTTPServer.Contexts for monitoring

    Thanks for the details. It seems, there are two connections when I send a GET request with postman. But in the first one I end method TIdIOHandler.RaiseConnClosedGracefully. When I test with the Chrome browser, there is only one context / connection. Christian
  14. chkaufmann

    Use TIdHTTPServer.Contexts for monitoring

    I try to use my own subclass for TIdServerContext to monitor the requests to my server. Now I sent a simple GET request with Postman to my server and noticed, that two context objects were created, but the OnCommandGet event is only called once. What is the reason for that? Then I plan to iterate all current requests like this: tmpList := IdHTTPServer1.Contexts.LockList; for i := 0 to tmpList.Count -1 do begin tmp := TMyContext(tmpList[i]); // read some info from tmp end; IdHTTPServer1.Contexts.UnLockList; Can I be sure, that all items will be alive. Or is it possible, that one of the context items was freed before I could read info from it? Christian
  15. I have a question regarding memory usage for strings. When I load a big number of persons, there are many hundred with the same name. Is this handled automatically so that there will be only one copy of the string for a certain name or should I write my own code for this? Or does it depend how the strings are loaded and to what kind of variable these are assigned? I didn't find a good source to read about this topic. Any hints for that? Thanks Christian
×