-
Content Count
3701 -
Joined
-
Last visited
-
Days Won
185
Everything posted by David Heffernan
-
Creating an array of controls in Delphi
David Heffernan replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
What's wrong with just adding the controls to a collection? Controls.Add(control1); Controls.Add(control2); Etc. -
Cross-platform solution to forcefully end a thread
David Heffernan replied to aehimself's topic in Cross-platform
Maybe you are right. Maybe my multithreaded program doesn't work. -
Cross-platform solution to forcefully end a thread
David Heffernan replied to aehimself's topic in Cross-platform
What are you on about. It is perfectly possible to write code that is correct, and behaves in a deterministic fashion with threads. For sure the order of scheduling and execution is not deterministic, but that doesn't mean that you can't write programs whose behaviour is deterministic. I for one make a living doing just that. -
Cross-platform solution to forcefully end a thread
David Heffernan replied to aehimself's topic in Cross-platform
pthread_kill But don't do it. It's surely not the solution to your problem. -
FYI, cross posted here: https://stackoverflow.com/questions/58858474/how-do-i-extend-the-delphi-10-3-code-editor
-
How to manage defined list values
David Heffernan replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
[Names('foo', 'bar')] TMyEnum = (foo, bar); It's kinda flaky of course because of the limitations on attribute constructor arguments being true constants. Later on I can write Enum.Name(someEnum) -
How to manage defined list values
David Heffernan replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
I use a cache, a dictionary keyed on the type info pointer, iirc -
How to manage defined list values
David Heffernan replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
Yes http://docwiki.embarcadero.com/RADStudio/en/Attributes_(RTTI) -
It's a bug for the very reasons that you raised! When the thread was created in the constructor of `TThread` it meant that you couldn't synchronise passing state to the thread before it started.
-
Creating them non-suspended explicitly does what you wish also.
-
Do that in the constructor of the thread if you wish. No need to create the thread suspended.
-
That was a bug fixed in Delphi 6, and one of the reasons for the introduction of AfterCreation. I never create threads suspended.
-
Yes. What happens if you pass False and so don't create suspended?
-
How to manage defined list values
David Heffernan replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
I use attributes attached to enumerated types to handle this -
Why are you creating the thread suspended. What happens if you don't do that?
-
If I actually disagreed with you, I'd produce a counter example. I don't think I have because I don't think there is one. Therefore I can't believe that I disagree.
-
Load a String from a file - returns strange char set
David Heffernan replied to bernhard_LA's topic in Algorithms, Data Structures and Class Design
I don't think that there was any difference regarding the streams. I think you've just mixed up the begin/end update with the streams and got a bit of cargo cult. FWIW your try/finally is not right. -
Load a String from a file - returns strange char set
David Heffernan replied to bernhard_LA's topic in Algorithms, Data Structures and Class Design
This looks a bit bogus to my eyes. Why would this change anything. Surely LoadFromFile use a file stream. -
I guess you could modify DefFontData in a design time package
-
No need for a workaround. Creating processes, and waiting for them to terminate is routine stuff on all platforms. Definitely worth seconding everything that @Remy Lebeau said. You don't want to replicate ShellExecute because you don't want to use it at all. ShellExecute is used to execute shell verbs. But you want to create a process. A quite different thing altogether. Albeit the open verb on an executable file often results in a new process being created.
-
There is no way to replace all the functionality of ShellExecute which encompasses the entire shell verb mechanism in Windows. What specific functionality of ShellExecute are you looking to replicate?
-
Patch a private virtual method
David Heffernan replied to pyscripter's topic in RTL and Delphi Object Pascal
@Stefan Glienke Your code above (and in spring4d) uses WriteProcessMemory to modify executable pages. This relies on an undocumented implementation detail of WriteProcessMemory. Namely that it will handle the protection flags on your behalf. Personally I would prefer to use VirtualProtect with this sort of pattern: procedure PatchCode(Address: Pointer; const NewCode; Size: Integer); var OldProtect: DWORD; begin if not VirtualProtect(Address, Size, PAGE_EXECUTE_READWRITE, OldProtect) then begin Fail; end; Move(NewCode, Address^, Size); FlushInstructionCache(GetCurrentProcess, nil, 0); if not VirtualProtect(Address, Size, OldProtect, @OldProtect) then begin Fail; end; end; -
ShellExecute and passing of password
David Heffernan replied to Mark Williams's topic in Windows API
You probably need to decide what you want to be secure from. As it stands it's probably impossible to give you specific advice. -
class constructor - Backport to D2007.
David Heffernan replied to Ian Branch's topic in General Help
Class vars are global variables inside a type's name's pace. Class constructors are called from unit initialization. Class destructor from unit finalization. -
Firemonkey doesn't support right to left languages. Delphi is the wrong tool for you I am afraid.