vcl

According to MS KB entry , there is a quirk in CreateIconIndirect which recognizes HBITMAP s been created with BITMAPV5HEADER passed to CreateDIBSection (and BGRA channel layout). However, TBitmap instances with (PixelFormat = pf32bit) and (AlphaFormat = afDefined) (behaving as alpha blended for the other purposes) when referred by its Handle s are not being recognized as valid alpha blended bitmaps for creation of icons or cursors. Currently, I have to create a full copy of TBitmap using described API calls ( see ) to make CreateIconIndirect accept a bitmap handle as alpha blended. How do I

The VCL seems to offer two mechanisms for hiding controls from form designers : TControlState.csDesignerHide and TControlStyle.csNoDesignVisible . What's the difference between them as far as the IDE is concerned? Which should you use when? Summary Use TControlState.csDesignerHide to prevent the control from drawing. Use TControlStyle.csNoDesignVisible to mimic runtime behaviour of the Visible property. Elaboration Nice question! There simply must be a difference between them, so I did a little investigation. Searching for usage in the Controls unit, we find that: TControlState.csDesignerHide

I am using thread wrapper which checks if function which updates VCL (which also has some arguments) was called from main thread or not and then executes in within the context of Main thread always. It works but I want to make it simpler. The problem is that I have to repeat this code in every function which needs VCL synchronization which is prone to errors. Is there a way to make this wrapper simpler and more re-useable? Note that this particular wrapper only uses one parameter but there can be any number of parameters which are copied to TLocalArgs and passed on. Current code: boost::scoped

I am using TApplicationEvents OnShortCut event to get application keyboard short cuts in a Delphi program. Using the following code: procedure TForm1.ApplicationEvents1ShortCut(var Msg: TWMKey; var Handled: Boolean) ; begin if (Msg.CharCode = VK_F9) then begin ShowMessage('F9 pressed!') ; Handled := True; end; end; Question: How do I detect when 'ALT C' has been pressed ? Like so: procedure TForm1.ApplicationEvents1ShortCut(var Msg: TWMKey; var Handled: Boolean); begin if (Msg.CharCode = Ord('C')) and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0) then begin ShowMessage('Alt+C pressed!') ; Handled

I want a popup menu above a button: Delphi wraps the Win32 menu system in a way that seems to preclude every mode or flag that the underlying Win32 API provides that was not in the VCL author's brain on that day. One such example appears to be the TPM_BOTTOMALIGN which can be passed into TrackPopupMenu but, the Delphi wrapper appears to render this not only impossible in the stock VCL, but by injudicious use of private and protected methods, is impossible (at least seems to me to be impossible) to do either accurately at runtime, or by overrides. The VCL component TPopupMenu is not very well

if Form.Release is called after using the form, it will free all related memory but not set the form variable to nil. if not assigned (Form1) then begin Application.CreateForm(Tform1, Form1); try // Do something finally Form1.Release end; end; To be able to call the same code again, Form1 would have to be set to nil at some point. From the description of Release I cannot do Form1 := nil; right after Release, because the Release procedure will return directly after being called and before the form is actually freed. I cannot detect when Form.Release is finished to set the form var to nil. What

In XE2 there is a new function : 'styles', for VCL( .vsf) and Firemonkey ( .styles), and some are provided in C:\Program Files\Embarcadero\RAD Studio\9.0\Redist\styles directory. As it seems to be easy to create a new style, is there any 'styles Gallery' Web site or blog somewhere ? RRUZ No, for the moment there is no such thing like a gallery of styles for FireMonkey or VCL styles. But if you want to create you own try these entries in my blog which show an easy way to create/modify new VCL styles and FireMoney styles in few clicks. Both articles include additional styles to download.

I need a VCL tag editor component for Delphi or C++Builder, similar to what's available for JavaScript: e.g. this one , or this one or StackOverflow's own tags editor. Is there something like this available or do I need to make it from scratch? Some specific things that I need are: Editor should allow either scrolling or become multi-line if more tags are present than the editor's width allows. If multi-line, there should be an option to define some maximum height however, preventing it from becoming too tall Option to select whether tags are created when pressing space or comma key Prompt