vcl

Delphi: Transparent controls turn opaque on netbooks

For some reason, transparent controls on a form turn opaque on some computers. I got reports of it happening on an "Acer Netbook" and a "Thinkpad x600". The application is built with Delphi 2007. This is what it looks like: link While it should look like this: link The opaque controls on the form are TLabels and TStaticTexts. (I use...

How to "scan" the full list of currently-installed VCL components

I still haven't found a truly satisfactory answer to this question, and am now considering rolling my own. I have ModelMaker and GExperts, and neither seems to load the comprehensive class-hierarchy I am looking for. As well, I don't think the folks at DevExpress will fork over the CDK code which compiles a full class list to inherit f...

Fuss over Runtime and Design Time packages in Delphi

I have seen that most of the components (VCLs) in Delphi are split in two parts. 1) DesignTime Package 2) RunTime Package Why all this fuss. What difference does it make if both RunTime and DesignTime packages are united into one single Package? I have never really been able to understand this separation logic. So what is the logic be...

A good (and free) VCL GUI alternative

I've got a project with a rather messy VCL codebase built on Borland C++ Builder 6. I intend to rewrite most parts of it since it's hardly maintainable in it's current state. I'm looking for a good and free alternative to VCL. It is a Windows-only closed source commercial project. So main requirements are: Free for commercial closed-s...

'0.0' is not a valid timestamp when accessing OldValue of TClientDataSet's TDateField

When I use the following code in a newly inserted record in a TClientDataSet: cdsMyDateField.OldValue <> Null I get an EConvertError: ''0.0' is not a valid timestamp'. Looking at Delphi's VCL's code, it tries to convert the value to TDateTime which results in this Exception because the value (Null) is an invalid DateTime, but as I'...

Can I make a TTreeNode invisible?

TTreeNode does not have a Visible property, so the obvious option does not exist. Is there any other way to make a TTreeNode and all its child nodes invisible? Of course I want to be able to make it visible again later. This is with Delphi 2007. Note#1: I am aware of the alternative TVirtualTreeView, and I will check it out if there is...

How to disable copy/paste in TEdit

I would like to prevent copy, cut and paste in my TEdit. How can I do this? I tried setting the Key=NULL on KeyDown event when CTRL+V was pressed on the control, but it didn't work. ...

Datagrid export to pdf

Hello, how can I can export the data shown on a DBgrid to a pdf file? ...

Your favourite third party components?

Here are mine: DevExpress VCL Subscription. Pretty expensive but worth a lot more. I', still amazed about how great a value they deliver to a developer. Grids are fantastic. Editors, skinning. all. Support is great. REMObjects SDK. I love the way I can break the functionality of a big project into a few of smaller ones and then exchang...

How to make a progress bar in Turbo Delphi using ONLY TLabel NOT TProgressBar

so here the logic for 1%="|" in the TLabel and for one "|" we need 10 times looping so to reach 100%= 100 times "|" we need 1000 times looping can you help me with the code? ...

How to make a splash screen with a progress bar on Turbo Delphi?

(Unit1.pas) unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls,unit2; type TForm1 = class(TForm) Button1: TButton; Label1: TLabel; Timer1: TTimer; procedure Timer1Timer(Sender: TObject); ...

How to print TPanel contents?

I have TPanel. On this Panel there is an TImage descendant , few other panels with controls, etc. In fact, picture contains some diagram, while additional panels with labels are created during runtime to provide user with additional info. Recently I was told, that it would be nice, if it was possible to print this panel, and have it on t...

What happened to CodeGear's TBitBtn and TButton inheritence chain?

I've recently began to upgrade my RAD Studio 2007 project to RAD Studio 2009. One thing I noticed is when seemingly simple code all of a sudden failed to compile. Example Code: class CButtonPopupMenu { // Snip public: void Init( TButton* SrcButton ) { SrcButton->OnClick = OnButtonClick; } private: void __...

Flatten a TSpeedButton?

Is there anyway to force a TSpeedButton to be redrawn flat? When using a touch screen monitor, the mouse does not move out of the button, so the raised border stays on screen, even when you click on a different button. ...

Dictionary Component or source code that can check in multiple languges

We are developing an application in which we need to implement spell checking for Indic languages that use ANSI fonts (not UNICODE) I am looking for a Dictionary Component or Source Code that will allow: To maintain separate dictionaries like for example Legal, commercial, etc. Support more than one language If possible to allow devel...

TMenuItem auto checked with Delphi 5

What is the proper way to create a custom TMenuItem which auto manage his checked property. Remember that once someone will: myHelloItem.OnClick := helloword; Then the behavior is lost... How is that accomplished in Delphi 7? regards, ...

[C++ builder 2007] - Error Message: "Recource ExperimentFrame.res not found"

I'm trying to create a frame VCL inside my project using factory pattern something like this: TFrame* newToolbarFrame = FrameFactory::getInstance().createObject(toolbarFrameClassId); When the factory creates implementation class , I get a error message about missing recourse file. For example if I create instance of class TFra...

Horizontal text orientation on left aligned tabs of PageControl

Is there any possibility to orient left aligned tab captions horizontally? ...

Using TCollection in Delphi

I'm trying to create a custom component with a collection property. However if I try to open the collection editor during design time by clicking "..." button in object inspector, nothing happens. What I am missing? Here's my TCollection descendant: TMyCollection = class(TOwnedCollection) private function GetItem(Index: Integer...

How to recompile a specific unit from the VCL?

I want to apply a fix from QC to a Delphi 2009 unit (DBClient as it happens). I know I need to copy the unit to another directory and make the change to the copy. How do I then get Delphi to compile that unit and use it in favour of the DCU that already exists? ...