ttabsheet

问题 I would like to create a TTabsheet which has to be create during run time. The TTabSheet has several components, but all of these components will be identical on every tab. Is it possible to create a "type" variable which will create these tabs every time? Thanks 回答1: Yes. You could create inherited class from TTabSheet TCustomTabSheet = class(TTabSheet) public constructor Create(AOwner : TComponent); override; public FTestButton : TButton; end; constructor TCustomTabSheet.Create(AOwner :

问题 I would like to create a TTabsheet which has to be create during run time. The TTabSheet has several components, but all of these components will be identical on every tab. Is it possible to create a "type" variable which will create these tabs every time? Thanks 回答1: Yes. You could create inherited class from TTabSheet TCustomTabSheet = class(TTabSheet) public constructor Create(AOwner : TComponent); override; public FTestButton : TButton; end; constructor TCustomTabSheet.Create(AOwner :

问题 I am running Lazarus 0.9.30.2. I have a TForm on which there is a TPageControl. Within the TPageControl there is a series of TTabSheets (about 30 of them). What I want to do is colour code the tabs, so the first 10 are Red, next 10 are Blue and the last 10 are Green. I have seen code snippets on the intranet that change the tab sheet colour (including the tab itself) when you click on them and navigate to them (to highlight the active tab), but what I want to do is colour them as described

问题 Included is a small project demonstrating my problem. I have a TPageControl aligned to the main form. On each of two tabsheets I have panels client aligned. On each of those panels I have 2 subpanels and a splitter. The LH panel and splitter is aligned left, the RH panel client-aligned. Basically the problem is interaction between the 2 tabs. To demonstrate: run the program stretch the main form horizontally. Panel 3 will grow move the splitter as far to the right as it will go. Panel 2 will

问题 How can I determine the background color of a TTabSheet when running on a OS with themes like XP and above? 回答1: I would try GetThemeColor. Edit: But note that tab sheets have a gradient under standard XP theming, so a single color probably is not what you need. 来源： https://stackoverflow.com/questions/2191301/how-can-i-get-the-color-for-a-themed-tabsheet