delphi-2010

I'm using Delphi 2010 and I'm wondering if there's a way to trace through code which is in the project without tracing through calls to included VCLs. For example - you put in a breakpoint and then use Shift + F7 to trace through line-by-line. Now you run into a call to some lengthy procedure in a VCL - in my case it's often a Measurement Studio or other component that draws the doodads for a bunch of I/O, OPC, or other bits. At any rate, what happens is that the debugger hops out of the active source file, opens the component source, and traces through that line by line. Often this is

I subclassed a control in order so I can add a few fields that I need, but now when I create it at runtime I get an Access Violation . Unfortunately this Access Violation doesn't happen at the place where I'm creating the control, and even those I'm building with all debug options enabled (including "Build with debug DCU's") the stack trace doesn't help me at all! In my attempt to reproduce the error I tried creating a console application, but apparently this error only shows up in a Forms application, and only if my control is actually shown on a form! Here are the steps to reproduce the

I have updated an application from Delphi 2007 to Delphi 2010, everything went fine, except one statement that compiled fine but not working which is: If Edit1.Text[1] in ['S','س'] then ShowMessage('Found') else ShowMessage('Not Found') However, I knew that in will not, so I changed to CharInSet If CharinSet(Edit1.Text[1],['S','س']) then ShowMessage('Found') else ShowMessage('Not Found') but it never worked when the string is س , but always work with S , even I cast the edt1.Text 1 with AnsiChar it always not work Arabic letters. Am doing anything wrong, or it's not the way CharInSet works?,

I need to run cmd on a button click as admin. It works. but I need to run it as an admin. How is this done? ShellExecute(Handle, 'open', 'c:\Windows\system32\cmd.exe', nil, nil, SW_SHOWNORMAL) Replace the open verb with the runas as shown below. Anyway, try to avoid path hardcoding: uses ShellAPI; procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'runas', 'cmd.exe', nil, nil, SW_SHOWNORMAL); end; You can also add to your button the shield icon by setting the ElevationRequired property to True. ShellExecute/Ex() with the "runas" verb is the only official way to start an

Considering such an enumeration : type TTypeOfData = ( [XmlName('ABC')] todABC, [XmlName('DEF')] todDEF, [XmlName('GHI')] todGHI ); Where XmlName is a custom attribute used to define the serialization string for members of this enumeration. How can I explore the attributes attached to each member of this enumeration ? Attributes associated with elements in enumerations are not currently stored in Win32 RTTI data in the executable. RTTI is already responsible for a fair increase in the size of executables, so some lines had to be drawn somewhere. Attributes in Delphi Win32 are supported on

I'm trying to read HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run with OpenKeyReadOnly , and GetValueNames , but it's returning values from HKLM\SOFTWARE\ Wow6432Node \Microsoft\Windows\CurrentVersion\Run instead. How can I read the 64-bit values instead of from a redirect to the 32-bit key? The program was run as an administrative account. I also tried RegOpenKeyEx and RegEnumValue . I'm using Delphi 2010. you must use the KEY_WOW64_64KEY value when open the Registry with the TRegistry class. from MSDN : KEY_WOW64_64KEY Indicates that an application on 64-bit Windows should operate on the

How does one convert a stand-alone .tlb file created in a pre-2009 version of Delphi to a .ridl file using Delphi 2010? .tlb files that are part of projects get automatically converted, but this particular file is not part of any project. try using the tlibimp.exe utility located in C:\Program Files\Embarcadero\RAD Studio\7.0\bin tlibimp –I thetlbfile.tlb 来源： https://stackoverflow.com/questions/2323729/converting-a-stand-alone-delphi-made-tlb-file-to-ridl