5 replies to this topic

[VrEx]

Hi, I upgraded component version to 4591, and grid shows only values from TWideStringField. In version 4491 everything was ok.

[Boki (Berg)]

Hello VrEx,

Open NxDBGrid.pas and locate GetCellInfo procedure. Inside it you will find next code:

CODE

    ctString:
      if not IsNull then
        if not Assigned(OnApplyCell) then
        begin

Replace it completely into:

CODE

    ctString:
      if not IsNull then
        if not Assigned(OnApplyCell) then
        begin
          if DataField.DataType = ftWideString then
{$IFDEF DELPHI2005}
            Result.AsString := DataField.AsWideString
{$ELSE}
            Result.AsString := TWideStringField(DataField).Value
{$ENDIF}
              else Result.AsString := DataField.AsString;
        end;

Please tell me if it works now. I am very sorry for this mistake.

Best regards

[VrEx]

Yes, it works.

Please tell me if it works now. I am very sorry for this mistake.

Best regards

[VrEx]

There is another problem, when TField has implemented event OnGetText, the resulted new value is ignored.

Is this correct solution?

CODE

else Result.AsString := DataField.DisplayText;

Replace it completely into:

CODE

    ctString:
      if not IsNull then
        if not Assigned(OnApplyCell) then
        begin
          if DataField.DataType = ftWideString then
{$IFDEF DELPHI2005}
            Result.AsString := DataField.AsWideString
{$ELSE}
            Result.AsString := TWideStringField(DataField).Value
{$ENDIF}
              else Result.AsString := DataField.AsString;
        end;

Please tell me if it works now. I am very sorry for this mistake.

Best regards

[Boki (Berg)]

Hi,

I will test it and then decide. Probably I will apply it.

Best regards

[Boki (Berg)]

Hi,

I have apply this fix. It will be included in next release.

Best regards