View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0006281 | JEDI VCL | 00 JVCL Components | public | 2014-05-09 09:17 | 2015-09-21 17:48 |
| Reporter | lomo74 | Assigned To | |||
| Priority | normal | Severity | minor | Reproducibility | always |
| Status | closed | Resolution | no change required | ||
| Product Version | Daily / GIT | ||||
| Target Version | Fixed in Version | ||||
| Summary | 0006281: TJvOutlookBar draws page button text incorrectly when a page has ParentFont = False and a different font | ||||
| Description | When a TJvOutlookBar page has ParentFont = False and a font that is different from that of the TJvOutlookBar component itself, and the page is activated, all subsequent page buttons are drawn with the wrong font. Patch attached. | ||||
| Tags | No tags attached. | ||||
|
2014-05-09 09:17
|
patch1.txt (726 bytes)
--- JvOutlookBar.pas.orig Tue May 06 11:48:52 2014
+++ JvOutlookBar.pas Fri May 09 08:21:50 2014
@@ -1586,6 +1586,7 @@
SavedColor: TColor;
Flags: Cardinal;
HasImage: Boolean;
+ SavedFont: TFont;
begin
Assert(Assigned(FPageBtnProps));
ATop := R.Top + 1;
@@ -1650,6 +1651,8 @@
end;
SetBkMode(Canvas.Handle, TRANSPARENT);
OffsetRect(R, 0, -1);
+ SavedFont := Canvas.Font;
+ Canvas.Font := Self.Font;
SavedColor := Canvas.Font.Color;
try
if not Pages[Index].Enabled then
@@ -1663,6 +1666,7 @@
DrawText(Canvas, Pages[Index].Caption, -1, R, Flags or DT_END_ELLIPSIS);
finally
Canvas.Font.Color := SavedColor;
+ Canvas.Font := SavedFont;
end;
end;
|
|
|
Please provide the zipped sources of a sample application showing this |
|
|
This issue was caused by a buggy patch that I applied to solve issue # 6280. Sorry. I corrected my patch, and now issue # 6280 is cleanly solved and this one has gone. |
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2014-05-09 09:17 | lomo74 | New Issue | |
| 2014-05-09 09:17 | lomo74 | File Added: patch1.txt | |
| 2014-09-03 11:37 | obones | Note Added: 0021029 | |
| 2014-09-03 11:37 | obones | Status | new => feedback |
| 2014-09-03 13:58 | lomo74 | Note Added: 0021044 | |
| 2014-10-01 10:52 | AHUser | Status | feedback => closed |
| 2014-10-01 10:52 | AHUser | Resolution | open => fixed |
| 2014-10-01 10:52 | AHUser | Fixed in Version | => Daily / GIT |
| 2015-09-21 17:48 | obones | Resolution | fixed => no change required |
| 2015-09-21 17:48 | obones | Fixed in Version | Daily / GIT => |
