-
Content Count
1073 -
Joined
-
Last visited
-
Days Won
23
Everything posted by aehimself
-
What about writing a bds.exe which starts Delphi's (now renamed) bds.exe but deletes the shortcut once it's closing? š
-
I started to experiment with Delphi 12 shortly after it came out at work with a fairly large project. It is using ~100 home-brewn components, consists of thousands of frames (with multiple levels of visual inheritance which is a deathbed for Delphi as far as I recall) in about 1,5M LOC (excluding all external packages which we use from DCU). Until we make the decision to officially switch I'll keep using Delphi 12 as a daily driver, supporting the same codebase as everyone else and in my experience even the unpatched Delphi 12 gave less internal errors than 11.2 (which we are currently on).
-
You can go extremely hacky and create a "transparent" panel - and simply put all your components on this. Since TPanel is a TWinControl descendant, .BringToFront will work properly on it. You can use the source here, just change the painting slightly: Procedure TDimPanel.Paint; Begin // Omit the call to inherited in general. Self.Canvas.Draw(0, 0, _bitmap, 255); // Might need 0 instead of 255 for opacity - I don't know by heart End;
-
The medium and the format where your data arrives is irrelevant. Just assemble the text in your receiver routine and go on from there.
-
I think we used this, before getting rid of COM altogether: https://github.com/CWBudde/ComPort-Library
-
Find Max, Min and Avarage in Memo or Edit Values
aehimself replied to om3raltiparmak's topic in Algorithms, Data Structures and Class Design
One issue what already stands out: for i := 0 to Length(strArray) do This should be Length - 1. This can give you a range check error. -
The only āissueā I personally experienced with DCPCrypt was string encoding. While a PHP library was working on UTF8, using the built-in functions of DCPCrypt used Unicode - thereās why the end result didnāt match. Once I converted my string to UTF8 TBytes and encoded that everything started to work perfectly.
-
Seeking Collaboration: Creating a Delphi Component for STM32 Boards
aehimself replied to techdesk's topic in General Help
So you use a program to even write the question for you and when we donāt get what you wanted at the first place you get frustrated; am I getting this right? Donāt forget that this forum is to discuss, share and help one another; not to do what you donāt/canāt even state clearly. I wish the best of luck with your project. I spent way too much time figuring out what you want. -
Monitor Windows application and restart if needed
aehimself replied to bdw_nz20's topic in Windows API
Sure; this is why I added that the same can be implemented between applications. You have a watchdog application which queries your main application via TCP, window messages, mapped files, etc. The logic is the same, but instead of a watchdog thread you have a separate executable, and instead of a Boolean / TEvent the signaling channel is different. I personally would go with a window message which your main program has to reply to. Easy to implement on both sides: use SendMessageTimeout in the watchdog and one extra method in the main program. -
Seeking Collaboration: Creating a Delphi Component for STM32 Boards
aehimself replied to techdesk's topic in General Help
From this: It probable that AI didn't exactly say what you wanted to, but reading what you wrote tells me you want an IDE within an IDE as component and that makes no sense to me. -
Seeking Collaboration: Creating a Delphi Component for STM32 Boards
aehimself replied to techdesk's topic in General Help
Like... through a COM port. With an IDE within an IDE? I'm still not convinced. -
Seeking Collaboration: Creating a Delphi Component for STM32 Boards
aehimself replied to techdesk's topic in General Help
It seems to me you are attempting to reinvent the wheel. The criterias you listed are basically equal to an IDE... and why do you want to write an IDE as a Delphi component if there is an official one already? Afaik interaction with microcontrollers are still through serial ports (whether native or over USB) and there are even free components for Delphi to talk to a COM port. If you are sure you want to go through with this, I'd start there. -
Monitor Windows application and restart if needed
aehimself replied to bdw_nz20's topic in Windows API
When I had an error which caused my threads to lock up, until the issue was actually found and fixed I simply created a watchdog thread. Itās only job was to query the other threads and if they are found unresponsive, dump their remaining work queue, force-close, restart them and reload the work queue. The signal was a simple boolean called āaliveā. The watchdog set this to false at each thread, and each thread set it to true within processing the queue. If the variable is false after 5 seconds (processing an item was < 1 s) it was considered hanging. You can implement the same logic within applications too, using window messages, TCP or memory mapped files as your signal. -
TMethodImplementationIntercept/__dbk_fcall_wrapperļ»æ called infinite and high cpu
aehimself replied to mvanrijnen's topic in RTL and Delphi Object Pascal
So the process of finding these is not that easy but not that hard either, I'll put it here so future visitors don't have to research / experiment. - Download @Anders Melander's Map2pdb, compile it and run it against your applications .map file. You'll get a .pdb file. - Download WinDbg and install it. Once done, go to File -> Settings -> Debugging settings and add the folder where your .pdb file is to the Symbol path list - Launch your application and when it's in the state you want to examine, go to File -> Attach to process and select your application. - In the lower-right pane select the "Threads" tab and double-click the offending one (TID = ThreadID in HEX) - Now go to the Stack tab and if everything is good, you get readable stack traces In my case @Stefan Glienke was absolutely right: As I am not using thread pools, I need to find out what does... and get rid of it, somehow... -
TMethodImplementationIntercept/__dbk_fcall_wrapperļ»æ called infinite and high cpu
aehimself replied to mvanrijnen's topic in RTL and Delphi Object Pascal
@mvanrijnen Did you find an effective way to debug this? My application started to do the same, with a similar call stack in the offending thread: It's important to note that this thread is not a worker of mine, I don't know what or when it was created. It also safely can be killed and won't cause any (noticable) disturbances. I also couldn't find a way to reproduce the issue, one time it just thinks it's time and then it locks up. -
Can a Critical section created and used in the app interfere with the Vcl.Dialogs critical section mechanisms?
aehimself replied to alogrep's topic in VCL
In my experience when timing can cause errors it always can be tracked back to incorrect thread data / UI access. - Instead of just one critical section have one for each of your properties and enter / leave in every getter and setter. - Make sure none of your thread accesses any UI elements directly (e.g. Form1.Memo1.Text) - Make sure that every callback what your thread has is properly synchronized - A dialog IS a part of the VCL thread. Do not show any dialog boxes in any threads! -
FYI - Several Embarcadero services are currently unavailable
aehimself replied to Keesver's topic in General Help
Like we all never said āit works on my machineā š -
Because Win7 is the upgrade of XP on kiosks and built-in devices. If even say ATMs.
-
FYI - Several Embarcadero services are currently unavailable
aehimself replied to Keesver's topic in General Help
<Sarcasm> Considering the pricetag on Delphi they might still be saving for it xD </Sarcasm> -
FYI - Several Embarcadero services are currently unavailable
aehimself replied to Keesver's topic in General Help
We upgraded to Delphi 11.2 at work a few weeks before 11.3 came out and using it ever since. We have at least 15 3rd party components installed, plus our own ones derived from those. The only IDE error we have is the occasional āinternal errorā which can be avoided by using Shift-F9. While the quality of LSP in Delphi 11 was questionable indeed I still strongly disagree with you on this. Delphi 11 really did not suffer from any other major defects. -
I'm not entirely sure if that is the case but what I understood you want to write your own program to communicate with (and maybe to control) said thremostat. To do that you'll either have to have the full protocol description used (which the manufacturer can provide) OR you have to reverse-engineer it by yourself. Be warned though - reverse-engineering even a part of a propriatery solution might be completely forbidden by the EULA and / or your regional law so make sure you are permitted to do so. If you can and would like to proceeed you don't need any Delphi application for that; just install Wireshark and connect with your PC program. That will give you enough hints to start.
-
If you have FreeOnTerminate := True and you call .Free, you can have 2 destructors but one will raise an AV as you are .Free.ing the StringStream instead of FreeAndNil.
-
Hello, I have an application which utilizes DimPanels. A couple of days ago I was notified that there are some buttons barely visible; however they are supposed to be on a solid background. The issue is, something is being drawn different when the application is executed in an RDP window. Locally I receive a solid form while through RDP everything is transparent, revealing the component underneath: Attached is the minimum test case... it simply creates a DimPanel on the form and embeds an empty frame into it. The solution is rather easy: enable ParentBackground in the DimPanel or disable ParentBackground on the frame. My question is; does anyone know why drawing differs? DimPanelTest.7z
-
Talking about the small program I attached; it is not present in the code or in the DFM - you are right about that. That means it is using the default, which is False for DoubleBuffering. At least this is how I believe it should work.
-
Aaaaand jackpot! Adding Application.SingleBufferingInRemoteSessions := False solves the issue for good, no more dimmed memo is visible through RDP! The only question which I have remaining - if DoubleBuffered is false everywhere in the test application, how come enforcing single buffering makes a difference? Shouldn't that be the default, if .DoubleBuffered is false on the form and on the frame?