TVirtualStringTree und Strg+C

**David Martens**

Kann mir jemand sagen, wie ich die Standard-window-tastenkombi. für Copy abfragen kann.

Hat beides nicht funktioniert:

Delphi-Quellcode:

			procedure TfraGLOB_VSTAnalyseGrid.vstAnalyseKeyAction(Sender: TBaseVirtualTree;

  var CharCode: Word; var Shift: TShiftState; var DoDefault: Boolean);

begin

  if (CharCode = 67) and (ssCtrl in Shift) then

    Clipboard.AsText := vstAnalyse.ContentToText(tstAll, AnsiChar(ListSeparator)) + #0;

end;

procedure TfraGLOB_VSTAnalyseGrid.vstAnalyseKeyDown(Sender: TObject;

  var Key: Word; Shift: TShiftState);

begin

  if (Key = 67) and (ssCtrl in Shift) then

    Clipboard.AsText := vstAnalyse.ContentToText(tstAll, AnsiChar(ListSeparator)) + #0;

end;

einzeln geht es (Key = 67) oder (ssCtrl in Shift) aber nciht zusammen.

TVirtualStringTree und Strg+C

TVirtualStringTree und Strg+C

Forumregeln