Fixed Memory Leak (Some Control of DevExpress)


This a solution to fix memory leak

How to test memory leak.

1. drop tcxTextEdit on from

2. on Event FromCreate
procedure TForm1.FormCreate(Sender: TObject);
begin
  ReportMemoryLeaksOnShutdown:= True;
end;

3. Test run application
Memory leak show after Close application.












This is my solution to solve the problem.

1. To modify
function cxIsGregorianCalendar(ACalendar: TcxCustomCalendarTable = nil): Boolean; in dxCalendarUtils.pas

Modified Function
















2.Compile dxCalendarUtils.pas and copy dxCalendarUtils.dcu to Lib. DevExpress

3. Test with your project.


Comments

  1. Source

    function cxIsGregorianCalendar(ACalendar: TcxCustomCalendarTable = nil): Boolean;
    var
    ACalType: CALID;
    cxLocalCalendar : TcxCustomCalendarTable;
    begin
    if ACalendar = nil then begin
    cxLocalCalendar := cxGetLocalCalendar;
    ACalType := cxLocalCalendar.CalendarID;
    cxLocalCalendar.Free;
    end
    else
    ACalType := ACalendar.CalendarID;
    Result := ACalType in [CAL_GREGORIAN, CAL_GREGORIAN_US, CAL_GREGORIAN_ME_FRENCH,
    CAL_GREGORIAN_ARABIC, CAL_GREGORIAN_XLIT_ENGLISH, CAL_GREGORIAN_XLIT_FRENCH];
    end;

    ReplyDelete

Post a Comment