mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Don't need to initialize nodes at all, since we have no properties associated with it.

Browse source
This commit is contained in:
cobines 2012-03-13 16:49:32 +00:00
commit a133aa2c3d
1 changed files with 0 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

13
src/newdesign/ucolumnsfileviewvtv.pas
View file

@ -258,8 +258,6 @@ type
procedure dgPanelBeforeItemErase(Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode; const ItemRect: TRect; var ItemColor: TColor; var EraseAction: TItemEraseAction);
procedure dgPanelHeaderDrawQueryElements(Sender: TVTHeader; var PaintInfo: THeaderPaintInfo;
var Elements: THeaderPaintElements);
procedure dgPanelInitNode(Sender: TBaseVirtualTree; ParentNode, Node: PVirtualNode;
var InitialStates: TVirtualNodeInitStates);
procedure dgPanelDblClick(Sender: TObject);
procedure dgPanelKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
@ -1866,16 +1864,6 @@ begin
SetActive(False);
end;
procedure TColumnsFileViewVTV.dgPanelInitNode(Sender: TBaseVirtualTree; ParentNode, Node: PVirtualNode;
var InitialStates: TVirtualNodeInitStates);
var
aDisplayFile: TDisplayFile;
begin
aDisplayFile := dgPanel.GetNodeFile(Node);
//PColumnsDrawTreeRecord(dgPanel.GetNodeData(Node))^.DisplayFile := aDisplayFile;
MakeColumnsStrings(aDisplayFile);
end;
procedure TColumnsFileViewVTV.MakeSelectedVisible;
begin
MakeVisible(dgPanel.FocusedNode);
@ -2473,7 +2461,6 @@ begin
dgPanel.OnFocusChanged:=@dgPanelFocusChanged;
dgPanel.OnFocusChanging:=@dgPanelFocusChanging;
dgPanel.OnHeaderDrawQueryElements:=@dgPanelHeaderDrawQueryElements;
dgPanel.OnInitNode:=@dgPanelInitNode;
dgPanel.OnKeyUp:=@dgPanelKeyUp;
dgPanel.OnKeyDown:=@dgPanelKeyDown;
dgPanel.OnHeaderClick:=@dgPanelHeaderClick;