gioma
Members-
Content Count
136 -
Joined
-
Last visited
-
Days Won
1
Everything posted by gioma
-
Hi, I need to retrieve information about a file, to do so I use the FindFirst function. The problem is when I use it with a network file it returns error 2: The system cannot find the file specified. //FileName='\\SERVER-CODE\DelphiShared\Test.txt' //FileName='\\192.168.0.100\DelphiShared\Test.txt' procedure PrepareToTransferLocalFiles(FileName:string); begin if FindFirst(FileName, faAnyFile, sr) = 0 then begin //some code.. else begin WriteLog('[PrepareToTransferLocalFiles] Open File ' + FileName + ' Err: '+intToStr(GetLastError)+' : '+SysErrorMessage(GetLastError)+')' ); end; FindClose(sr); //some code.. end; where am I going wrong? PS The program uses a browser component that uses network authentication when it needs to access protected folders.
-
thanks for the reply. Yes, what you say is already done by the browser component, the problem is another, for network paths I always have to add the prefix "\\?\UNC\" otherwise it doesn't work.
-
I said that Delphi 12.2 is currently impossible for me to use. Currently I have to use Delphi 12.1, with all its problems that slow down my work. I try to keep the IDE updated because I hope (perhaps in vain) that Embarcadero fixs this problems.
-
my component loads the DLL at runtime and not at design time. I say this because since version 11 I have IDE crashes every day, so I'm led to think that those who comment perhaps don't use Delphi as frequently as I do. However, Delphi 12 when it came out had big problems and I had to wait for the first patch to install some purchased components. In fact, I had opened a ticket on the embarcadero portal and they replied that it was a problem that they were solving. Now I have this problem with the component I created and I opened another ticket and they replied that I am not the only one to have it. It is very strange, in fact it only occurs if I compile in debug, but once I trigger the error (a compiler access violation) I can no longer compile even in release. To be able to use Delphi 12.2 I will have to wait a few more months, that is, when and if they release a patch for this bug too. Can we continue like this? Every time they come out with a new release instead of releasing patches and we are forced to reinstall the entire development environment. In addition, it is advisable to do a clean installation every time because often the version update brings with it many problems. Can we work like this?
-
I have been using Delphi for twenty years. Rad Studio works well up to a certain point, then it starts to limp until it crashes due to ITS INTERNAL FUNCTIONS. I don't think the word search can be crashed by a component that wraps a DLL in C+ on the webrtc! Or do we want to talk about when it goes out of memory and you have to restart the IDE? This doesn't happen to me with any other development IDE in the world, NONE!!!! I repeat, I'm not playing, I'm not a college student, I work with Delphi 6 days a week, 8/9 hours a day!
-
What new features would you like to see in Delphi 13?
gioma replied to PeterPanettone's topic in Delphi IDE and APIs
I wish the IDE would work! - I wish word searches would not crash the IDE and cause my unsaved work to be lost. - I wish the IDE would not freeze for no apparent reason and cause my work to be lost - I wish Code Insight would finally work - I wish the IDE would not go out of memory after using it for a while To sum up: I want a stable IDE that doesn't waste my time and finally fixes the bugs that have been around for years! am I asking too much? -
The problem is that Delphi often crashes when searching for words, which I have to use because Code Insight often doesn't work. It happens mostly on large projects, while it is much rarer on small projects (that use the same components). I don't think it depends on Third Party Components.. This NEVER happens with Visual Studio.. NEVER!
-
I work 9/10 hours a day with Delphi, among other things these things also happen to my colleague on another PC. Delphi is full of bugs and the patches for each version are very few. Version 12.1 has received only one patch since its release and there will not be any more because now version 12.2 has been released. Version 12.2 however is full of new bugs that do not allow me to work. I have opened at least 4 cases with Embarcadero on their portal for new problems with the new release. One in particular does not allow me to work with version 12.2 of Delphi. I must therefore continue to work with version 12.1 which allows me to work even if it slows down my work a lot. I'm not a college student, I'm not playing, my time is money.
-
This is caused by Embarcadero's policy. Instead of releasing patches for the IDE they release new versions. This means that every time you have to reinstall everything!
-
Are you kidding? it's the first thing I do every time I update delphi. I have been working with Delphi for almost 20 years. PS Anyway, thanks for the suggestion and sorry if I came off a little abrupt.
-
I We use Delphi in our work environment to develop our products. I have been using Delphi since 2006, and honestly, I have never been so challenged as with these latest releases. I couldn't use version 12.2 until the first patch was released because it was impossible to install a component due to a Delphi error. However, now I can't debug my application because the IDE crashes. If I close the IDE, it shows an access violation. With Delphi 12.1, every day – and I emphasize every day – I have to restart it 2 or 3 times due to continuous crashes! I’m really thinking about migrating our projects to another programming language because working this way every damn day is really difficult! Little by little, we will migrate and say goodbye to Delphi for good because it makes no sense to spend thousands of euros a year for a tool that hinders your development.
-
This release is a real disaster! If I open and close the IDE I get an access violation. I had to work very hard to be able to compile my projects which worked very well with Delphi 12.1, Delphi 11.x, Delphi 10.x. Now I can't debug because it keeps getting errors... TOTAL DISASTER!
-
wow, it's detected as a virus! Now I'm disabling my antivirus..
-
I downloaded the file, I mounted the ISO but I can't install it: "The specified device, path, or file cannot be accessed. You may not have sufficient permissions." Honestly, it had never happened to me.. am I missing something?
-
Hi everyone, I have a really annoying problem with the Delphi 12.1 IDE, sometimes when I press CTRL+F and search for text in the project the IDE freezes. In this case there is no way to unlock it, I have to close (and if I haven't saved my work it's a pain) and I get absurd errors until I forcefully terminate the process. Here is the screenshot of the error and the detail: [787830FB]{coreide290.bpl} ProjectModule.TBaseProject.PromptForSave (Line 1668, "ProjectModule.pas" + 1) + $1B [78784795]{coreide290.bpl} ProjectModule.TCustomProject.Save (Line 2093, "ProjectModule.pas" + 5) + $F [786DF5B3]{coreide290.bpl} ProjectGroup.TProjectGroupWrapper.GetCanCloseMiscProjects (Line 3116, "ProjectGroup.pas" + 12) + $8 [00568339]{bds.exe } AppMain.TAppBuilder.CanCloseProjectGroup + $59 [0056BD0E]{bds.exe } AppMain.TAppBuilder.WindowCloseQuery + $112 [029FE128]{vcl290.bpl } Vcl.Forms.TCustomForm.CloseQuery (Line 9546, "Vcl.Forms.pas" + 8) + $14 [029FE051]{vcl290.bpl } Vcl.Forms.TCustomForm.Close (Line 9518, "Vcl.Forms.pas" + 4) + $4 [029FC780]{vcl290.bpl } Vcl.Forms.TCustomForm.WMClose (Line 8713, "Vcl.Forms.pas" + 0) + $0 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [028B4951]{vcl290.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 11199, "Vcl.Controls.pas" + 34) + $19 [029FB206]{vcl290.bpl } Vcl.Forms.TCustomForm.DefaultHandler (Line 8013, "Vcl.Forms.pas" + 11) + $4 [028B6789]{vcl290.bpl } Vcl.Controls.TWinControl.WMSysCommand (Line 12429, "Vcl.Controls.pas" + 20) + $7 [029FC851]{vcl290.bpl } Vcl.Forms.TCustomForm.WMSysCommand (Line 8764, "Vcl.Forms.pas" + 14) + $4 [7891F786]{coreide290.bpl} MainWorkFrm.TMainWorkForm.WMSysCommand (Line 128, "MainWorkFrm.pas" + 2) + $4 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0EC14]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WMSysCommand (Line 19110, "Vcl.Forms.pas" + 1) + $2 [6677A27E]{themeloader290.bpl} IDETheme.VclStyleHooks.TCustomFormIDEStyleHook.WMSysCommand (Line 124, "IDETheme.VclStyleHooks.pas" + 1) + $4 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [794F4A23]{rtl290.bpl } System.@FinalizeRecord (Line 33272, "System.pas" + 72) + $2 [79579F09]{rtl290.bpl } System.SyncObjs.CoWaitForMultipleHandles (Line 716, "System.SyncObjs.pas" + 3) + $B [7957A1DD]{rtl290.bpl } System.SyncObjs.THandleObject.WaitForMultiple (Line 855, "System.SyncObjs.pas" + 14) + $18 [786C0D17]{coreide290.bpl} ParserThread.TParseThread.Lock (Line 398, "ParserThread.pas" + 12) + $15 [786C0E36]{coreide290.bpl} ParserThread.TParseThread.CancelAndLock (Line 441, "ParserThread.pas" + 4) + $2 [7B269DFB]{delphicoreide290.bpl} ComTypes.Lock (Line 801, "ComTypes.pas" + 7) + $7 [7B3A987B]{delphicoreide290.bpl} BasePasComIntf.TCompiler.CompilerClearCompState (Line 683, "BasePasComIntf.pas" + 4) + $0 [7B313F8F]{delphicoreide290.bpl} PasNativeCompilerAdapter.TCompilerAdapter.ClearCompState (Line 284, "PasNativeCompilerAdapter.pas" + 0) + $3 [7B2D15CB]{delphicoreide290.bpl} BaseDelphiProject.TCompilerContextManager.ClearCompStates (Line 7180, "BaseDelphiProject.pas" + 8) + $8 [7B2B0984]{delphicoreide290.bpl} BaseDelphiProject.TBaseDelphiProject.Destroy (Line 989, "BaseDelphiProject.pas" + 1) + $8 [794F0084]{rtl290.bpl } System.TObject.Free (Line 18403, "System.pas" + 1) + $4 [786D80DC]{coreide290.bpl} ProjectGroup.TProjectGroup.BeforeDestruction (Line 968, "ProjectGroup.pas" + 52) + $2 [794F07B5]{rtl290.bpl } System.@BeforeDestruction (Line 19744, "System.pas" + 10) + $0 [786D7E3A]{coreide290.bpl} ProjectGroup.TProjectGroup.Destroy (Line 901, "ProjectGroup.pas" + 0) + $2 [794F0084]{rtl290.bpl } System.TObject.Free (Line 18403, "System.pas" + 1) + $4 [786DE822]{coreide290.bpl} ProjectGroup.TProjectGroupWrapper.Close (Line 2848, "ProjectGroup.pas" + 2) + $5 [00568245]{bds.exe } AppMain.TAppBuilder.DestroyProjectGroup + $1A9 [0056C0C8]{bds.exe } AppMain.TAppBuilder.WindowCloseQuery + $4CC [029FE128]{vcl290.bpl } Vcl.Forms.TCustomForm.CloseQuery (Line 9546, "Vcl.Forms.pas" + 8) + $14 [029FE051]{vcl290.bpl } Vcl.Forms.TCustomForm.Close (Line 9518, "Vcl.Forms.pas" + 4) + $4 [029FC780]{vcl290.bpl } Vcl.Forms.TCustomForm.WMClose (Line 8713, "Vcl.Forms.pas" + 0) + $0 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [028B4951]{vcl290.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 11199, "Vcl.Controls.pas" + 34) + $19 [029FB206]{vcl290.bpl } Vcl.Forms.TCustomForm.DefaultHandler (Line 8013, "Vcl.Forms.pas" + 11) + $4 [028B6789]{vcl290.bpl } Vcl.Controls.TWinControl.WMSysCommand (Line 12429, "Vcl.Controls.pas" + 20) + $7 [029FC851]{vcl290.bpl } Vcl.Forms.TCustomForm.WMSysCommand (Line 8764, "Vcl.Forms.pas" + 14) + $4 [7891F786]{coreide290.bpl} MainWorkFrm.TMainWorkForm.WMSysCommand (Line 128, "MainWorkFrm.pas" + 2) + $4 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0EC14]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WMSysCommand (Line 19110, "Vcl.Forms.pas" + 1) + $2 [6677A27E]{themeloader290.bpl} IDETheme.VclStyleHooks.TCustomFormIDEStyleHook.WMSysCommand (Line 124, "IDETheme.VclStyleHooks.pas" + 1) + $4 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [028BB161]{vcl290.bpl } Vcl.Controls.TCustomControl.WMPaint (Line 15224, "Vcl.Controls.pas" + 2) + $4 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [794F4EB2]{rtl290.bpl } System.@FinalizeArray (Line 33584, "System.pas" + 80) + $3 [79579F09]{rtl290.bpl } System.SyncObjs.CoWaitForMultipleHandles (Line 716, "System.SyncObjs.pas" + 3) + $B [7957A1DD]{rtl290.bpl } System.SyncObjs.THandleObject.WaitForMultiple (Line 855, "System.SyncObjs.pas" + 14) + $18 [786C0D17]{coreide290.bpl} ParserThread.TParseThread.Lock (Line 398, "ParserThread.pas" + 12) + $15 [79610891]{rtl290.bpl } System.Classes.TThread.SetPriority (Line 16713, "System.Classes.pas" + 1) + $13 [786C0E36]{coreide290.bpl} ParserThread.TParseThread.CancelAndLock (Line 441, "ParserThread.pas" + 4) + $2 [7893B65E]{coreide290.bpl} EditorForm.BeginBatchOpenClose (Line 798, "EditorForm.pas" + 4) + $7 [786D7F51]{coreide290.bpl} ProjectGroup.TProjectGroup.BeforeDestruction (Line 935, "ProjectGroup.pas" + 19) + $0 [794F07B5]{rtl290.bpl } System.@BeforeDestruction (Line 19744, "System.pas" + 10) + $0 [786D7E3A]{coreide290.bpl} ProjectGroup.TProjectGroup.Destroy (Line 901, "ProjectGroup.pas" + 0) + $2 [794F0084]{rtl290.bpl } System.TObject.Free (Line 18403, "System.pas" + 1) + $4 [786DE822]{coreide290.bpl} ProjectGroup.TProjectGroupWrapper.Close (Line 2848, "ProjectGroup.pas" + 2) + $5 [00568245]{bds.exe } AppMain.TAppBuilder.DestroyProjectGroup + $1A9 [0056C0C8]{bds.exe } AppMain.TAppBuilder.WindowCloseQuery + $4CC [029FE128]{vcl290.bpl } Vcl.Forms.TCustomForm.CloseQuery (Line 9546, "Vcl.Forms.pas" + 8) + $14 [029FE051]{vcl290.bpl } Vcl.Forms.TCustomForm.Close (Line 9518, "Vcl.Forms.pas" + 4) + $4 [029FC780]{vcl290.bpl } Vcl.Forms.TCustomForm.WMClose (Line 8713, "Vcl.Forms.pas" + 0) + $0 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [028B4951]{vcl290.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 11199, "Vcl.Controls.pas" + 34) + $19 [029FB206]{vcl290.bpl } Vcl.Forms.TCustomForm.DefaultHandler (Line 8013, "Vcl.Forms.pas" + 11) + $4 [028B6789]{vcl290.bpl } Vcl.Controls.TWinControl.WMSysCommand (Line 12429, "Vcl.Controls.pas" + 20) + $7 [029FC851]{vcl290.bpl } Vcl.Forms.TCustomForm.WMSysCommand (Line 8764, "Vcl.Forms.pas" + 14) + $4 [7891F786]{coreide290.bpl} MainWorkFrm.TMainWorkForm.WMSysCommand (Line 128, "MainWorkFrm.pas" + 2) + $4 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0EC14]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WMSysCommand (Line 19110, "Vcl.Forms.pas" + 1) + $2 [6677A27E]{themeloader290.bpl} IDETheme.VclStyleHooks.TCustomFormIDEStyleHook.WMSysCommand (Line 124, "IDETheme.VclStyleHooks.pas" + 1) + $4 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [7961134A]{rtl290.bpl } System.Classes.TThread.WaitFor (Line 17337, "System.Classes.pas" + 17) + $11 [79610584]{rtl290.bpl } System.Classes.TThread.ShutdownThread (Line 16577, "System.Classes.pas" + 14) + $6 [79610497]{rtl290.bpl } System.Classes.TThread.Destroy (Line 16534, "System.Classes.pas" + 4) + $1 [7890B5D0]{coreide290.bpl} FileFind.TThreadSearch.Destroy (Line 365, "FileFind.pas" + 2) + $6 [7890C82D]{coreide290.bpl} FileFind.TProjectFileSearch.Destroy (Line 874, "FileFind.pas" + 1) + $6 [794F0084]{rtl290.bpl } System.TObject.Free (Line 18403, "System.pas" + 1) + $4 [7890D720]{coreide290.bpl} FileFind.TerminateFindInFiles (Line 1124, "FileFind.pas" + 2) + $5 [00568339]{bds.exe } AppMain.TAppBuilder.CanCloseProjectGroup + $59 [0056BCFC]{bds.exe } AppMain.TAppBuilder.WindowCloseQuery + $100 [029FE128]{vcl290.bpl } Vcl.Forms.TCustomForm.CloseQuery (Line 9546, "Vcl.Forms.pas" + 8) + $14 [029FE051]{vcl290.bpl } Vcl.Forms.TCustomForm.Close (Line 9518, "Vcl.Forms.pas" + 4) + $4 [029FC780]{vcl290.bpl } Vcl.Forms.TCustomForm.WMClose (Line 8713, "Vcl.Forms.pas" + 0) + $0 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [028B4951]{vcl290.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 11199, "Vcl.Controls.pas" + 34) + $19 [029FB206]{vcl290.bpl } Vcl.Forms.TCustomForm.DefaultHandler (Line 8013, "Vcl.Forms.pas" + 11) + $4 [028B6789]{vcl290.bpl } Vcl.Controls.TWinControl.WMSysCommand (Line 12429, "Vcl.Controls.pas" + 20) + $7 [029FC851]{vcl290.bpl } Vcl.Forms.TCustomForm.WMSysCommand (Line 8764, "Vcl.Forms.pas" + 14) + $4 [7891F786]{coreide290.bpl} MainWorkFrm.TMainWorkForm.WMSysCommand (Line 128, "MainWorkFrm.pas" + 2) + $4 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0EC14]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WMSysCommand (Line 19110, "Vcl.Forms.pas" + 1) + $2 [6677A27E]{themeloader290.bpl} IDETheme.VclStyleHooks.TCustomFormIDEStyleHook.WMSysCommand (Line 124, "IDETheme.VclStyleHooks.pas" + 1) + $4 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [79579F09]{rtl290.bpl } System.SyncObjs.CoWaitForMultipleHandles (Line 716, "System.SyncObjs.pas" + 3) + $B [7957A1DD]{rtl290.bpl } System.SyncObjs.THandleObject.WaitForMultiple (Line 855, "System.SyncObjs.pas" + 14) + $18 [786C0D17]{coreide290.bpl} ParserThread.TParseThread.Lock (Line 398, "ParserThread.pas" + 12) + $15 [79610891]{rtl290.bpl } System.Classes.TThread.SetPriority (Line 16713, "System.Classes.pas" + 1) + $13 [786C0E36]{coreide290.bpl} ParserThread.TParseThread.CancelAndLock (Line 441, "ParserThread.pas" + 4) + $2 [788F639F]{coreide290.bpl} EditorBuffer.TEditBuffer.ActivateSource (Line 1561, "EditorBuffer.pas" + 1) + $7 [788FCE4B]{coreide290.bpl} EditorBuffer.TEditView.ActivateModule (Line 4994, "EditorBuffer.pas" + 9) + $2 [7893FFA0]{coreide290.bpl} EditorForm.TEditWindow.ActivateModule (Line 2893, "EditorForm.pas" + 8) + $12 [789447D5]{coreide290.bpl} EditorForm.TEditWindow.WindowActivate (Line 4378, "EditorForm.pas" + 35) + $2 [78943800]{coreide290.bpl} EditorForm.TEditWindow.FormActivate (Line 4030, "EditorForm.pas" + 1) + $2 [029FB9B3]{vcl290.bpl } Vcl.Forms.TCustomForm.Activate (Line 8277, "Vcl.Forms.pas" + 2) + $12 [029FD6D8]{vcl290.bpl } Vcl.Forms.TCustomForm.CMActivate (Line 9251, "Vcl.Forms.pas" + 2) + $6 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [029FB97F]{vcl290.bpl } Vcl.Forms.DoNestedActivation (Line 8271, "Vcl.Forms.pas" + 6) + $D [029FB99C]{vcl290.bpl } Vcl.Forms.TCustomForm.Activate (Line 8276, "Vcl.Forms.pas" + 1) + $D [029FD6D8]{vcl290.bpl } Vcl.Forms.TCustomForm.CMActivate (Line 9251, "Vcl.Forms.pas" + 2) + $6 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [028B0D8E]{vcl290.bpl } Vcl.Controls.TControl.GetStyleName (Line 8990, "Vcl.Controls.pas" + 5) + $7 [02A09B70]{vcl290.bpl } Vcl.Forms.TScrollingStyleHook.WndProc (Line 16714, "Vcl.Forms.pas" + 0) + $0 [029F0E2C]{vcl290.bpl } Vcl.Forms.SendFocusMessage (Line 2672, "Vcl.Forms.pas" + 2) + $9 [029FB50E]{vcl290.bpl } Vcl.Forms.TCustomForm.SetFocusedControl (Line 8114, "Vcl.Forms.pas" + 35) + $B [028B43C3]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11019, "Vcl.Controls.pas" + 43) + $7 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [029FB6FD]{vcl290.bpl } Vcl.Forms.TCustomForm.SetWindowFocus (Line 8182, "Vcl.Forms.pas" + 10) + $8 [029FB828]{vcl290.bpl } Vcl.Forms.TCustomForm.SetActive (Line 8219, "Vcl.Forms.pas" + 12) + $3 [029FC712]{vcl290.bpl } Vcl.Forms.TCustomForm.WMActivate (Line 8695, "Vcl.Forms.pas" + 6) + $A [7891F7EC]{coreide290.bpl} MainWorkFrm.TMainWorkForm.WMActivate (Line 140, "MainWorkFrm.pas" + 0) + $0 [00578A30]{bds.exe } AppMain.TAppBuilder.WMActivate + $C [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [029BC5BF]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5822, "Vcl.Themes.pas" + 7) + $D [794F1800]{rtl290.bpl } System.@TryFinallyExit (Line 23793, "System.pas" + 8) + $0 [029BC6AD]{vcl290.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5833, "Vcl.Themes.pas" + 18) + $1E [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [029C05FD]{vcl290.bpl } Vcl.Themes.TStyleHook.WndProc (Line 7733, "Vcl.Themes.pas" + 38) + $6 [029C07DE]{vcl290.bpl } Vcl.Themes.TMouseTrackControlStyleHook.WndProc (Line 7832, "Vcl.Themes.pas" + 1) + $4 [02A11C43]{vcl290.bpl } Vcl.Forms.TFormStyleHook.WndProc (Line 20362, "Vcl.Forms.pas" + 20) + $5 [02A0D05E]{vcl290.bpl } Vcl.Forms.TFormStyleHook.IsStyleBorder (Line 18362, "Vcl.Forms.pas" + 1) + $13 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [029BC7E0]{vcl290.bpl } Vcl.Themes.TStyleManager.HandleMessage (Line 5891, "Vcl.Themes.pas" + 11) + $11 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028B3CC0]{vcl290.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10823, "Vcl.Controls.pas" + 3) + $6 [7961477C]{rtl290.bpl } System.Classes.StdWndProc (Line 19085, "System.Classes.pas" + 9) + $2 [029FDE7B]{vcl290.bpl } Vcl.Forms.TCustomForm.CMShowingChanged (Line 9445, "Vcl.Forms.pas" + 143) + $1 [02A0D09C]{vcl290.bpl } Vcl.Forms.TFormStyleHook.HandleMessage (Line 18369, "Vcl.Forms.pas" + 2) + $6 [02AE98FC]{vcl290.bpl } Vcl.Styles.TStyleEngine.HandleMessage (Line 3616, "Vcl.Styles.pas" + 20) + $C [794F2729]{rtl290.bpl } System.@UStrAsg (Line 26973, "System.pas" + 18) + $0 [794F056B]{rtl290.bpl } System.TObject.Dispatch (Line 19254, "System.pas" + 11) + $0 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [028B274F]{vcl290.bpl } Vcl.Controls.TWinControl.DoHandleStyleMessage (Line 9956, "Vcl.Controls.pas" + 0) + $F [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F8891]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6511, "Vcl.Forms.pas" + 276) + $5 [029F88B4]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6513, "Vcl.Forms.pas" + 278) + $10 [02A02CE6]{vcl290.bpl } Vcl.Forms.TApplication.WndProc (Line 12826, "Vcl.Forms.pas" + 112) + $B [028AED7C]{vcl290.bpl } Vcl.Controls.TControl.Perform (Line 7698, "Vcl.Controls.pas" + 10) + $8 [02A0583F]{vcl290.bpl } Vcl.Forms.TApplication.DispatchAction (Line 14458, "Vcl.Forms.pas" + 9) + $C [02A02CE6]{vcl290.bpl } Vcl.Forms.TApplication.WndProc (Line 12826, "Vcl.Forms.pas" + 112) + $B [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [028AED7C]{vcl290.bpl } Vcl.Controls.TControl.Perform (Line 7698, "Vcl.Controls.pas" + 10) + $8 [028B39DD]{vcl290.bpl } Vcl.Controls.TWinControl.UpdateShowing (Line 10723, "Vcl.Controls.pas" + 19) + $C [028B3AF2]{vcl290.bpl } Vcl.Controls.TWinControl.UpdateControlState (Line 10758, "Vcl.Controls.pas" + 21) + $3 [028B6ADA]{vcl290.bpl } Vcl.Controls.TWinControl.CMVisibleChanged (Line 12633, "Vcl.Controls.pas" + 3) + $2 [028AF146]{vcl290.bpl } Vcl.Controls.TControl.WndProc (Line 7920, "Vcl.Controls.pas" + 91) + $6 [028B47FB]{vcl290.bpl } Vcl.Controls.TWinControl.WndProc (Line 11154, "Vcl.Controls.pas" + 178) + $6 [029F7FB8]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6236, "Vcl.Forms.pas" + 1) + $37 [029F8887]{vcl290.bpl } Vcl.Forms.TCustomForm.WndProc (Line 6509, "Vcl.Forms.pas" + 274) + $5 [02A5DFBF]{vcl290.bpl } Vcl.AppEvnts.TMultiCaster.GetAppEvents (Line 686, "Vcl.AppEvnts.pas" + 1) + $B [794F1030]{rtl290.bpl } System.TMonitor.TryEnter (Line 20340, "System.pas" + 10) + $0 [794F0B50]{rtl290.bpl } System.TMonitor.Enter (Line 20001, "System.pas" + 4) + $2 [028AED7C]{vcl290.bpl } Vcl.Controls.TControl.Perform (Line 7698, "Vcl.Controls.pas" + 10) + $8 [028AD786]{vcl290.bpl } Vcl.Controls.TControl.SetVisible (Line 6724, "Vcl.Controls.pas" + 5) + $C [029F7D5D]{vcl290.bpl } Vcl.Forms.TCustomForm.SetVisible (Line 6143, "Vcl.Forms.pas" + 9) + $4 [029FE52E]{vcl290.bpl } Vcl.Forms.TCustomForm.Hide (Line 9721, "Vcl.Forms.pas" + 0) + $2 [029F67A3]{vcl290.bpl } Vcl.Forms.TCustomForm.BeforeDestruction (Line 5411, "Vcl.Forms.pas" + 6) + $14 [794F07B5]{rtl290.bpl } System.@BeforeDestruction (Line 19744, "System.pas" + 10) + $0 [029F67BA]{vcl290.bpl } Vcl.Forms.TCustomForm.Destroy (Line 5421, "Vcl.Forms.pas" + 0) + $6 [794F0084]{rtl290.bpl } System.TObject.Free (Line 18403, "System.pas" + 1) + $4 [7890B734]{coreide290.bpl} FileFind.TThreadSearch.KillSearchProgress (Line 399, "FileFind.pas" + 1) + $5 [79610026]{rtl290.bpl } System.Classes.CheckSynchronize (Line 16334, "System.Classes.pas" + 32) + $9 [02A047A4]{vcl290.bpl } Vcl.Forms.TApplication.DoActionIdle (Line 13828, "Vcl.Forms.pas" + 3) + $13 [02A04992]{vcl290.bpl } Vcl.Forms.TApplication.Idle (Line 13897, "Vcl.Forms.pas" + 30) + $11 [02A03977]{vcl290.bpl } Vcl.Forms.TApplication.HandleMessage (Line 13312, "Vcl.Forms.pas" + 1) + $11 [02A03CA9]{vcl290.bpl } Vcl.Forms.TApplication.Run (Line 13451, "Vcl.Forms.pas" + 27) + $3 [005B8AD2]{bds.exe } bds.bds + $DE This thing slows down my work a lot, I was hoping for some patch but nothing has come out for months!
-
because I'm not the only one having this problem, so I think someone has reported it to him. I have reported other issues in the past, but not much has changed. I work with Delphi, i don't play with it, so I don't have much time to waste.
-
no, there isn't.
-
In this case I don't know, I tried to open the search by pressing CTRL+F and the IDE is freezed... then I had to close Delphi by clicking the x on the window in the taskbar and I got this error ad infinitum... so I had to use the task manager to terminate dbe.exe. It's really a disaster.. I still don't understand why they don't release fixes..
-
ok, but they are useful tools that all other IDEs have already integrated. They should solve instead of highlighting..
-
I only have Parnassus, Navigator and Bookmarks from "Embarcadero Technologies" installed.
-
it happens sometimes when pressing CTRL+C they keep churning out new versions of delphi, but they don't fix very old bugs! I'm starting to get bored.. sooner or later I'll switch to another language.. I've been using the IDE this way since Delphi 5, it's comfortable for me and I wouldn't want to change.
-
Form.OnKeyUp(key:word) = Get ASCII code of Special character(è)
gioma posted a topic in General Help
Hi everyone, I'm making an application that communicates between different operating systems. In this case I have to send a character when it is pressed from Windows to MAC. In the Form.OnKeyUp function there is the parameter "key: Word" which represents the character code. If it is not a special character (à, è, ì, ò, ù) this co corresponds to the ASCII code. If, on the other hand, I press the "è" key, the code will be 222 which however does not correspond to its ASCII code and therefore I send wrong information to the MAC which is unable to retrieve the corresponding character. How do I get the exact ASCII code of that character? Thank you all. -
I have a big problem, I can no longer open Delphi 11, I get this error: Runtime error 236 at 2C800AAA
-
Hi, I need to rotate the screen at runtime when I open a form. Until the release of IOS 13 this code worked perfectly: procedure ChangeOrientation(toOrientation: UIInterfaceOrientation; possibleOrientations: TScreenOrientations); var win : UIWindow; App : UIApplication; viewController : UIViewController; oucon: UIViewController; begin Application.FormFactor.Orientations := []; //Change supported orientations App := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication); win := TUIWindow.Wrap(App.windows.objectAtIndex(0)); //The first Windows is always the main Window App.setStatusBarOrientation(toOrientation); {After you have changed your statusbar orientation set the Supported orientation/orientations to whatever you need} Application.FormFactor.Orientations := possibleOrientations; viewController := TUIViewController.Wrap(TUIViewController.alloc.init);//dummy ViewController oucon := TUIViewController.Wrap(TUIViewController.alloc.init); {Now we are creating a new Viewcontroller now when it is created it will have to check what is the supported orientations} oucon := win.rootViewController;//we store all our current content to the new ViewController Win.setRootViewController(viewController); Win.makeKeyAndVisible;// We display the Dummy viewcontroller win.setRootViewController(oucon); win.makeKeyAndVisible; {And now we Display our original Content in a new Viewcontroller with our new Supported orientations} end; However, since the release of IOS 13 the screen locks on the set orientation but does not rotate. So if I set Landscape orientation the screen remains in Portrait orientation until I physically turn the phone around, at which point it rightly remains locked on that orientation. This is a real disaster because then, until the phone is turned, all the controls ( finger position, object position,..) are wrong.
- 10 replies
-
- ios 13
- firemonkey
-
(and 1 more)
Tagged with:
-
Hi, I have this code: procedure ProcessData(data:PByte, asize:integer); var data_pack:TBytes; t:TStreamWriter; DataType:Char; begin nflog:= 'C:\TEST\Log.txt'; if FileExists(nflog) then t := TStreamWriter.Create(nflog, true, TEncoding.UTF8) else t := TStreamWriter.Create(nflog, false, TEncoding.UTF8); SetLength(data_pack, asize); Move(PByte(data)^, data_pack[0], asize); // here the coding is perfect t.WriteLine( TEncoding.Unicode.GetString(data_pack)); t.Flush; dataType := TEncoding.unicode.GetChars(data_pack)[0]; delete(data_pack, 0, 1); // here the content of datapack has become UTF 8 and therefore does not coding well t.WriteLine( TEncoding.Unicode.GetString(data_pack)); t.flush t.free; end; In the "data" variable there is a string in unicode, but when Delphi esxcute the "delete" operation it seems that it convert the contents of the data_pack variable into UTF8 and therefore the print of the second value it's not correct does anyone know why?