Jump to content


VrEx

Member Since 22 May 2009
Offline Last Active Jun 04 2009 07:41 AM
-----

Posts I've Made

In Topic: WideString problem v4591

03 June 2009 - 08:32 AM

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;



QUOTE (Boki (Berg) @ May 22 2009, 06:37 PM) <{POST_SNAPBACK}>
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


In Topic: WideString problem v4591

22 May 2009 - 04:59 PM

Yes, it works.

QUOTE (Boki (Berg) @ May 22 2009, 06:37 PM) <{POST_SNAPBACK}>
Please tell me if it works now. I am very sorry for this mistake.

Best regards

In Topic: Painting issue with custom cell coloring

22 May 2009 - 04:12 PM

Hi, in CellColoring event , when you check CellState it always has csSelected in it. And SelectedRow property is always changes to current drawing row. How can distinguish selected row?