View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0004927 | JEDI VCL | 00 JVCL Components | public | 2009-09-07 17:26 | 2010-06-07 17:57 |
| Reporter | Konchulio | Assigned To | |||
| Priority | normal | Severity | crash | Reproducibility | always |
| Status | closed | Resolution | fixed | ||
| Product Version | 3.37 | ||||
| Target Version | Fixed in Version | ||||
| Summary | 0004927: [TJvPageControl] - TabSheet wrong backgroundcolor | ||||
| Description | My system environment: - WinXP Pro (SP3), - Delphi 2010 (D14), - JVCL Version 3.38 TJVpageControl Settings: - Style = tsTabs - ParentColor = False - Color = clBtnFace Repo-Step's: - I open the same project (form with pagecontrol) in Delphi 2009 and in Delphi 2010. (look at screenshots in the attachments) - when I change the Color in Delphi 2009 the backroundcolor change - But when I change the Color in Delphi 2010 it doesn't change the backroundcolor! | ||||
| Additional Information | It seems to be a bug in the Delphi 2010 VCL?! Unit ComCtrls; ...... procedure TCustomTabControl.SetStyle(Value: TTabStyle); begin if FStyle <> Value then begin if (Value <> tsTabs) and (TabPosition <> tpTop) then raise EInvalidOperation.Create(SInvalidTabStyle); ParentBackground := Value = tsTabs; ---> is that correct?? FStyle := Value; RecreateWnd; end; end; ....... procedure TPageControl.WMEraseBkGnd(var Message: TWMEraseBkGnd); begin if (not ThemeServices.ThemesEnabled) or (not ParentBackground) then --> (ParentBackground := Value = tsTabs;) inherited else Message.Result := 1; end; | ||||
| Tags | No tags attached. | ||||
|
2009-09-07 17:26
|
PageControl-D12-D14.zip (84,857 bytes) |
|
|
VCL bug. Please open a QualityCentral report (Embarcadero) for this. |
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2009-09-07 17:26 | Konchulio | New Issue | |
| 2009-09-07 17:26 | Konchulio | File Added: PageControl-D12-D14.zip | |
| 2009-09-09 19:38 | obones | Status | new => acknowledged |
| 2010-06-07 17:57 | AHUser | Note Added: 0017470 | |
| 2010-06-07 17:57 | AHUser | Status | acknowledged => closed |
| 2010-06-07 17:57 | AHUser | Resolution | open => fixed |
