Task Manager doesn’t show the total that the application has allocated from Windows. What it shows (by default) is the working set. The working set is a concept that’s designed to try and minimize page file thrashing in memory-constrained conditions. It’s basically all the pages in memory that the application touches on a regular basis, … Read more
The exception class “Exception” is declared in the unit SysUtils. So you must add “SysUtils” to your uses-clause. uses SysUtils; procedure RaiseMyException; begin raise Exception.Create(‘Hallo World!’); end;
Finally, I returned to this project and successfully registered service provider and handled service request. First of all I tried to use NSRegisterServicesProvider method, but there is no such method in Macapi sources, so I searched for applicationDidFinishLaunching delegate. Using it I registered my service provider: procedure TApplicationDelegate.applicationDidFinishLaunching(Notification: Pointer); var autoReleasePool: NSAutoreleasePool; app: NSApplication; provider: … Read more
You just need two try/finally blocks: Screen.Cursor:= crHourGlass; try Obj:= TSomeObject.Create; try // do something finally Obj.Free; end; finally Screen.Cursor:= crDefault; end; The guideline to follow is that you should use finally rather than except for protecting resources. As you have observed, if you attempt to do it with except then you are forced to … Read more
You can use the functions in StrUtils in Delphi uses StrUtils; .. if ContainsText(‘A.Sven,G.Jane,Jack’, ‘Jane’) then … ContainsText returns true if the subtext is found, without case-sensitivity, in the given text In StrUtils you’ll also find handy functions like StartsText, EndsText and ReplaceText
Not much… One is that, these bugs show up rarely with test data, but not so rarely in real world. All it takes is one case. Test data is not random data, one user with one failure case should submit the data and voilà, we’ve got a test case. If no one can provide test … Read more
Executive summary MyList.Free is sufficient. Detailed answer The TList<T> generic container owns its contents. When you free the container, the contents are also disposed of. Now, if T is an unmanaged reference, either a pointer or a class, then the list owns the reference. It does not own that which the reference refers to. So … Read more
ReturnAddress is the address to which VerifyWrite would have returned when finished. Raise Exception.Create… at ReturnAddress means that when the exception dialog is displayed, it would indicate the address of the exception as being at ReturnAddress. In other words, the exception message would read Exception <whatever> raised at <ReturnAddress>: <Exception Message>. Here is an excerpt … Read more
Now, if you want to change the build configuration you have to add the parameter /p:config=<BUILD_CONFIG_NAME> For example: C:\Projects\TestDelphiApp001>msbuild /target:Build /p:config=Release or C:\Projects\TestDelphiApp001>msbuild /target:Build /p:config=Debug Copied from original “question”; note community wiki.
You didn’t mention which version of Delphi… Newer Delphi versions have added two new properties to TCustomForm: PopupMode and PopupParent. Setting PopupParent of your modal dialog to the form that’s creating that dialog makes sure that the child form stays on top of it’s parent. It usually fixes the problem you’re describing. I think this … Read more