View Issue Details

IDProjectCategoryView StatusLast Update
0006635JEDI VCLMiscellanouspublic2018-06-08 11:11
ReporterDmitryBelkevichAssigned ToAHUser 
PrioritynormalSeveritymajorReproducibilityhave not tried
Status resolvedResolutionfixed 
Product Version 
Target VersionFixed in VersionDaily / GIT 
Summary0006635: Some fixes
DescriptionIt's need to make some fixes into different files.
Additional Information1. 64 bits compatiblity

a) Change Pointer(Cardinal to Pointer(NativeUInt
Files JvAddPrinter.pas, JvThemes.pas
b) Longint(Self) to NativeUInt(Self)
Files JvBDEFilter.pas, JvBDEProgress.pas
c) In file JvDataProvider.pas:
change Result := Pointer(Cardinal(RAPI.GetProc) and $00FFFFFF + Cardinal(Self) + 4);
to Result := Pointer(NativeUInt(RAPI.GetProc) and $00FFFFFF + NativeUInt(Self) + 4);

2. Add CheckAll method to the TJvCheckTreeView class:

procedure TJvCheckTreeView.CheckAll(CheckState: boolean);
var
  I: Integer;
begin
  for I := 0 to Items.Count - 1 do
    TJvTreeNode(Items[i]).Checked := CheckState;
end;

3. Modify TJvPropertyStoreEditorControl.SetPropertyStore method:

procedure TJvPropertyStoreEditorControl.SetPropertyStore(const Value: TComponent);
begin
  if csDestroying in Componentstate then
    Exit;

TagsNo tags attached.

Activities

AHUser

2018-06-08 11:11

developer   ~0021468

Fixed in master branch.

The BDE Units are not fixed because there is no 64 bit BDE and the expected function parameter is "Longint"

Issue History

Date Modified Username Field Change
2018-05-24 10:14 DmitryBelkevich New Issue
2018-05-24 10:14 DmitryBelkevich IDE version => All
2018-06-08 10:12 AHUser Project JEDI Code Library => JEDI VCL
2018-06-08 11:11 AHUser Note Added: 0021468
2018-06-08 11:11 AHUser Status new => resolved
2018-06-08 11:11 AHUser Fixed in Version => Daily / GIT
2018-06-08 11:11 AHUser Resolution open => fixed
2018-06-08 11:11 AHUser Assigned To => AHUser