Why can Delphi DLLs use WideString without using ShareMem?

by

A WideString is the same as a BSTR, it’s just the Delphi name for it. The memory allocation is handled by the shared COM allocator, CoTaskMemAlloc. Because all parties use the same allocator you can safely allocate in one module and deallocate in another.

So, the reason you don’t need to use Sharemem is that the Delphi heap is not being used. Instead the COM heap is used. And that is shared between all modules in a process.

If you look at the Delphi implementation of WideString you will see calls to the following APIs: SysAllocStringLen, SysFreeString and SysReAllocStringLen. These are the system provided BSTR API functions.

Many of the Windows APIs you refer to pre-date the invention of COM. What’s more, there are performance benefits to using a fixed length buffer, allocated by the caller. Namely that it can be allocated on the stack rather than a heap. I also can imagine that the Windows designers don’t want to force every process to have to link to OleAut32.dll and pay the price of maintaining the COM heap. Remember that when most of the Windows API was designed, the performance characteristics of the typical hardware was very different from now.

Another possible reason for not using BSTR more widely is that the Windows API is targeted at C. And managing the lifetime of BSTR from C is very much more tricky than from higher level languages like C++, C#, Delphi etc.

There is an extra complication however. The Delphi ABI for WideString return values is not compatible with Microsoft tools. You should not use WideString as a return type, instead return it via an out parameter. For more details see Why can a WideString not be used as a function return value for interop?

More Related Contents:

  1. Registration-free COM/DLL?
  2. Putting classes in a DLL?
  3. Plugins system for Delphi application – bpl vs dll?
  4. Why should I not use “if Assigned()” before accessing objects?
  5. Why cannot take address to a nested local function in 64 bit Delphi?
  6. Debugging Access Violation errors?
  7. Which variables are initialized when in Delphi?
  8. System Error. Code: 8. Not enough storage is available to process this command
  9. Delphi 2010: How to save a whole record to a file?
  10. I do not understand what Application.ProcessMessages in Delphi is doing [closed]
  11. How do I let Delphi know I’ve already handled an exception?
  12. How to send a HTTP POST Request in Delphi using WinInet api
  13. Delphi Conversion Unicode Issues
  14. How do I run a command-line program in Delphi?
  15. Should the compiler hint/warn when passing object instances directly as const interface parameters?
  16. Delphi – get what files are opened by an application
  17. How can I display Crystal XI reports inside a Delphi 2007 application?
  18. My program never releases the memory back. Why?
  19. Patch routine call in delphi
  20. How to efficiently rotate bitmaps in code
  21. Component Creation – Joining Components Together?
  22. Modifying or deleting a line from a text file the low-level way?
  23. TThread.resume is deprecated in Delphi-2010 what should be used in place?
  24. XPath and TXmlDocument
  25. Delphi, How to get all local IPs?
  26. How to get a stack trace from FastMM
  27. Delphi event handling, how to create own event
  28. Free Encryption library for Delphi [closed]
  29. Why are Delphi objects assigned even after calling .Free?
  30. GetThreadLocale returns different value than GetUserDefaultLCID?

Leave a Comment