View Issue Details
ID | Project | Category | View Status | Date Submitted | Last Update |
---|---|---|---|---|---|
0005189 | JEDI VCL | 03 Donations | public | 2010-03-08 09:03 | 2011-06-10 16:09 |
Reporter | MC | Assigned To | obones | ||
Priority | normal | Severity | minor | Reproducibility | N/A |
Status | resolved | Resolution | fixed | ||
Product Version | 3.39 | ||||
Target Version | 3.40 | Fixed in Version | 3.40 | ||
Summary | 0005189: TJVImage State : stDisabled | ||||
Description | The attached modified TJVImage supports settings an image for disabled state. If "Enabled" changes from FALSE to TRUE, state is set to stDefault. If "Enabled" changed from TRUE to FALSE, state is set to stDisabled. | ||||
Tags | No tags attached. | ||||
2010-03-08 09:03
|
JvImage.pas (12,561 bytes) |
|
To prevent the state from beeing resettet by MouseEnter the following lines should be included in "SetState": procedure TJvImage.SetState(Value: TPicState); function NotEmpty(Value: TPicture): Boolean; begin Result := (Value <> nil) and (Value.Width > 0) and (Value.Height > 0); end; begin if not Enabled then begin value:=stDisabled; end; ... |
|
The above change requires also changing SetEnabled: procedure TJvImage.SetEnabled(Value: Boolean); begin inherited; if not Value then State:=stDisabled else State:=stDefault; end; |
|
This is now in SVN |
Date Modified | Username | Field | Change |
---|---|---|---|
2010-03-08 09:03 | MC | New Issue | |
2010-03-08 09:03 | MC | File Added: JvImage.pas | |
2010-03-08 09:31 | MC | Note Added: 0017233 | |
2010-03-08 09:43 | MC | Note Added: 0017234 | |
2010-03-09 12:13 | obones | Note Added: 0017283 | |
2010-03-09 12:13 | obones | Assigned To | => obones |
2010-03-09 12:13 | obones | Status | new => resolved |
2010-03-09 12:13 | obones | Resolution | open => fixed |
2010-03-09 12:13 | obones | Fixed in Version | => Daily / SVN |
2010-03-09 12:13 | obones | Target Version | => 3.40 - not yet released |
2011-06-10 16:09 | obones | Fixed in Version | Daily / SVN => 3.40 |