diff --git a/src/ce_controls.pas b/src/ce_controls.pas
index 8fb1f32d..1b03afca 100644
--- a/src/ce_controls.pas
+++ b/src/ce_controls.pas
@@ -830,12 +830,15 @@ var
   s: string = '';
   c: integer;
   i: integer;
+  f: integer = 0;
 begin
+  while fList.Column[f].Caption = '' do
+    f += 1;
   c := fList.Items.Count - 1;
-  for i:= 0 to fList.ColumnCount-1 do
+  for i:= f to fList.ColumnCount-1 do
     s += '| ' + fList.Column[i].Caption;
   s += LineEnding;
-  for i:= 0 to fList.ColumnCount-1 do
+  for i:= f to fList.ColumnCount-1 do
     s += '| ---';
   s += LineEnding;
   for i := 0 to c do
diff --git a/src/ce_profileviewer.pas b/src/ce_profileviewer.pas
index 38260629..58b2cfe4 100644
--- a/src/ce_profileviewer.pas
+++ b/src/ce_profileviewer.pas
@@ -9,7 +9,7 @@ uses
   TATools, Forms, Controls, Graphics, Dialogs, ExtCtrls, Menus, ComCtrls,
   StdCtrls, TALegend, math,
   ce_widget, ce_common, ce_stringrange, ce_dsgncontrols, ce_ddemangle,
-  ce_interfaces, ce_observer, ce_writableComponent;
+  ce_interfaces, ce_observer, ce_writableComponent, ce_controls;
 
 type
 
@@ -197,6 +197,7 @@ begin
   updatePie;
   list.OnCompare:=@listCompare;
   selPieSourceSelect(nil);
+  list.PopupMenu := TCEListViewCopyMenu.create(list);
 end;
 
 destructor TCEProfileViewerWidget.destroy;