Zugriff auf die Clipboard Historie von Windows 10

[jaenicke]

Zitat von DeddyH:

Moooment... abgesehen von der Sinnhaftigkeit ist das aber eine Möglichkeit der IPC, die Microsoft selbst vorschlägt: https://docs.microsoft.com/en-us/win...pboard-for-ipc

Aber nur in dem beschriebenen Kontext einer Aktion des Benutzers!

Zitat:

When a user performs a cut or copy operation [...]

Zitat von amigage:

In meinem Tool kann der Anwender Daten in die Zwischenablage legen und dann per STRG + V oder der Einfügen-Funktion verwenden. Nach dem Schließen des Programms sollen die Werte aber nicht mehr in der ZA liegen, speziell, wenn der Computer öffentlich ist.

Dafür könnte delayed rendering eine Option sein:
https://docs.microsoft.com/en-us/win...ayed-rendering
Du packst quasi nur einen Platzhalter in die Zwischenablage und Windows fragt die Anwendung dann danach. Wie sich das dann mit der Clipboard History verhält und ob einmal gerenderte Inhalte danach dann trotzdem darin landen, weiß ich nicht. Das müsste man ausprobieren.

Ansonsten würde ich die genannte WinRT API verwenden um den Eintrag explizit zu löschen.

Zitat von rokli:

Zitat von jaenicke:

Und unter Delphi kann ich einfach mehrere Sachen aus einer Unit kopieren und der Reihe nach woanders einfügen. Das ging zwar auch mit Zusatztools, aber die waren bei Weitem nicht so angenehm zu nutzen.

Womit machst Du das denn?

Mit Windows selbst, das war nur ein Beispiel für die genannte Windows Clipboard History. Einfach Windows + V statt Strg + V drücken, dann bekommt man dort angeboten es zu aktivieren.

[amigage]

Ich habe die Lösung gefunden, wie man die Daten zumindest nicht in der Windows Zwischenablage sieht!

Unter https://docs.microsoft.com/en-us/win...istory-formats findet sich der Hinweis, dass man das ClipBoardFormat "ExcludeClipboardContentFromMonitorProcessing" anmelden muss, um nachfolgende Inhalte vor der "sichtbaren" Zwischenablage zu schützen.


Nachfolgender Code versteckt den Inhalt meiner Zwischenablage, lässt den Text aber über Strg+V und "Einfügen" in alle Texteditoren und Eingabefeldern einfügen!

Delphi-Quellcode:

procedure SetDataCB(myCF: Word; pBData: TBytes);
var
  MemHandle: THandle;
  MemPtr : Pointer;
begin
  begin
    MemHandle := GlobalAlloc(GHND, Length(pBData));
    if MemHandle <> 0 then
    begin
      MemPtr := GlobalLock(MemHandle);
      try
        Move(pBData, MemPtr, High(TBytes));
      finally
        GlobalUnlock(MemHandle);
      end;
    end
    else
      MessageDlg('Global Alloc failed!', mtError, [mbOK], 0);
  end;

  // Now we call SetAsHandle to write it to the clipboard.
  Clipboard.SetAsHandle(myCF, MemHandle);
end;

Delphi-Quellcode:

var
  bFalse, bTrue : TBytes;
  cf : Word;
const
  cfnNoMonitorProc = 'ExcludeClipboardContentFromMonitorProcessing';
//   cfnHistory = 'CanIncludeInClipboardHistory';
//   cfnCloud = 'CanUploadToCloudClipboard';
begin
  ClipBoard.Open;

  bFalse := TBytes.Create(0, 0, 0, 0);
  bTrue  := TBytes.Create(1, 0, 0, 0);

  cf := RegisterClipboardFormat(CfnNoMonitorProc);
  if(cf = 0) then
    ShowMessage('Unable to register ' + CfnNoMonitorProc +'!')
  else
    SetDataCB(cf, bTrue);

//  cf := RegisterClipboardFormat(CfnCloud);
//  if(cf = 0) then
//    ShowMessage('Unable to register ' + CfnHistory +'!')
//  else
//    SetDataCB(cf, bFalse);
//
//  cf := RegisterClipboardFormat(CfnHistory);
//  if(cf = 0) then
//    ShowMessage('Unable to register ' + CfnCloud +'!')
//  else
//    SetDataCB(cf, bFalse);

  Clipboard.AsText := 'Mein Text in der Zwischenablage';
  ClipBoard.Close;
end;

Mit der Anmeldung der anderen ClipBoardFormate CanIncludeInClipboardHistory und CanUploadToCloudClipboard und der Übergabe des false Wertes, lässt sich auch die Übertragung der Daten in die Cloud verhindern.

Nachteil: andere Clipboard Viewer, wie z.B. der von GExperts liest die Daten weiterhin aus. Aber mir reicht es grundsätzlich erst einmal so.

Ich danke euch für die Denkanstöße!

[dummzeuch]

Zitat von amigage:

Mit der Anmeldung der anderen ClipBoardFormate CanIncludeInClipboardHistory und CanUploadToCloudClipboard und der Übergabe des false Wertes, lässt sich auch die Übertragung der Daten in die Cloud verhindern.

Nachteil: andere Clipboard Viewer, wie z.B. der von GExperts liest die Daten weiterhin aus. Aber mir reicht es grundsätzlich erst einmal so.

Cool, hatte ich ganz übersehen.

Für den Fall, dass Du dazu was gelesen hast: Gibt es für einen Clipboard-Viewer auch eine einfache Möglichkeit, diese Flags auszulesen? Dann könnte ich das in GExperts einbauen, dass solche Einträge optional ignoriert werden. Auf den ersten Blick habe ich dazu aber nichts gesehen.

Aber zumindest Einträge im Format CanIncludeInClipboardHistory bzw. CanUploadToCloudClipboard müsste man ja einfach auslesen und darauf basiert umschalten können. Mal sehen, ob ich Zeit dafür finde.

Edit: ExcludeClipboardContentFromMonitorProcessing wird aber nicht so verwendet, wie Du das machst. Laut Dokumentation schreibt man den Text einfach in diesem Format ins Clipboard statt als Text.

[amigage]

Also ich habe zum Auslesen der ClipBoardFormate testweise die Demo Anwendung "FMXDesktopDemoXE2Plus" von der Komponente "CCR.Clipboard" verwendet.
https://github.com/chrisrolliston/CCR.Clipboard

In der Demo werden die Formate korrekt ausgelesen und namentlich aufgelistet:

Code:

ExcludeClipboardContentFromMonitorProcessing 
CanIncludeInClipboardHistory 
CanUploadToCloudClipboard 
Unicode Text
Locale Identifier
Text
OEM Text

Zitat:

Edit: ExcludeClipboardContentFromMonitorProcessing wird aber nicht so verwendet, wie Du das machst. Laut Dokumentation schreibt man den Text einfach in diesem Format ins Clipboard statt als Text.

Es würde reichen, wenn man das Format mit RegisterClipboardFormat() anmelden würde. Aber dann findet man es nicht in der ClipBoardFormat Liste, sondern erst bei einem hinterlegten Wert.