Project JEDI - Issue Tracker
Mantis Bugtracker

Viewing Issue Simple Details Jump to Notes ] View Advanced ] Issue History ] Print ]
ID Category Severity Reproducibility Date Submitted Last Update
0004551 [JEDI VCL] 00 JVCL Components minor always 2008-10-23 23:28 2008-10-24 13:56
Reporter ahotko View Status public  
Assigned To AHUser
Priority normal Resolution fixed  
Status resolved   Product Version 3.35
Summary 0004551: TJvCheckBox, DataConnector: If Field is null, Checkbox is Checked
Description If field is null, checkbox is checked. I think it shoul be grayed, so it shows
undefined value. Method TJvCheckBoxDataConnector.RecordChanged should be changed
to take this into account.
Old Code:
procedure TJvCheckBoxDataConnector.RecordChanged;
begin
  if Field.IsValid and (ValueChecked <> '') and (ValueUnchecked <> '') then
  begin
    FCheckBox.ReadOnly := not Field.CanModify;
    FCheckBox.Checked := AnsiCompareText(Field.AsString, ValueUnchecked) <> 0
  end
  else
  begin
    FCheckBox.State := cbGrayed;
    FCheckBox.ReadOnly := True;
  end;
end;
Additional Information Changes:
procedure TJvCheckBoxDataConnector.RecordChanged;
begin
  if Field.IsValid and (ValueChecked <> '') and (ValueUnchecked <> '') then
  begin
    FCheckBox.ReadOnly := not Field.CanModify;
    if not Field.IsNull then
      FCheckBox.Checked := AnsiCompareText(Field.AsString, ValueUnchecked) <> 0
    else
      FCheckBox.State := cbGrayed;
  end
  else
  begin
    FCheckBox.State := cbGrayed;
    FCheckBox.ReadOnly := True;
  end;
end;
Tags No tags attached.
Attached Files

- Relationships

-  Notes
(0014896)
AHUser (developer)
2008-10-24 13:56

Added to SVN head.

- Issue History
Date Modified Username Field Change
2008-10-23 23:28 ahotko New Issue
2008-10-24 13:56 AHUser Status new => resolved
2008-10-24 13:56 AHUser Fixed in Version => Daily / SVN
2008-10-24 13:56 AHUser Resolution open => fixed
2008-10-24 13:56 AHUser Assigned To => AHUser
2008-10-24 13:56 AHUser Note Added: 0014896


Mantis 1.1.6[^]
Copyright © 2000 - 2008 Mantis Group
Powered by Mantis Bugtracker