Order and save right now!
20% off with the 729824315 dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming!

Clipboard
⤷ Show clipboard's content

This example shows how to view clipboard contents as text or bitmap:


uses Clipboard;
...
procedure TForm1.Button1Click(Sender: TObject);
var
  MyHandle: THandle;
begin
  Clipboard.Open;
  if Clipboard.HasFormat(CF_TEXT) then
  begin
    MyHandle:=Clipboard.GetAsHandle(CF_TEXT);
    Memo1.Lines.Add(StrPas(GlobalLock(MyHandle)));
    GlobalUnlock(MyHandle);
  end;
  if (Clipboard.HasFormat(CF_BITMAP)) or
    (Clipboard.HasFormat(CF_PICTURE)) then
    Image1.Picture.Assign(Clipboard);
  Clipboard.Close;
end;

Related components: TFileSearch; TFolderMonitor; TFileVersion

Download source code

More for developers: ● Delphi Components

● .Net Components

● Software for Android Developers

● Databases for Amazon Associates
Amazon Categories
Amazon Nodes

Clipboard ⤷ Show clipboard's content

Clipboard
⤷ Show clipboard's content