Delphi从剪切板粘贴jpg格式图片

在Delphi中，你可以使用TClipboard组件来访问系统剪贴板。要从剪贴板中获取图片，你可以使用以下代码：

if Clipboard.HasFormat(CF_BITMAP) then
begin
  Image1.Picture.Bitmap.Assign(Clipboard);
end;

上述代码将从剪贴板中获取位图，并将其分配给名为Image1的TImage组件。如果你想要从剪贴板中获取JPG格式的图像，你可以使用以下代码：

if Clipboard.HasFormat(CF_PICTURE) then
begin
  var JPEGStream := TMemoryStream.Create;
  try
    Clipboard.GetFormat(CF_PICTURE).SaveToStream(JPEGStream);
    JPEGStream.Position := 0;
    Image1.Picture.LoadFromStream(JPEGStream);
  finally
    JPEGStream.Free;
  end;
end;

上述代码将从剪贴板中获取图像，并将其保存到TMemoryStream中。然后，图像将从TMemoryStream加载到名为Image1的TImage组件中。请注意，CF_PICTURE是一个自定义剪贴板格式，你需要在使用它之前注册它。

相关问题

delphi 监 剪切板

Delphi 提供了一个 TClipboard 类用于监测和控制系统剪切板。它提供了针对剪切板数据的读取和写入方法。这些方法包括：Clear，AsText，AsBitmap， AsMetafile 等，能够应对不同数据类型的处理需求。

可以使用 TClipboard 类对剪切板进行监测，当剪切板的内容发生变化时，程序会根据需要进行相应的操作，例如显示提醒框、将剪切板内容作为参数发送给某个函数进行处理、更新程序中某个控件的内容等等。

下面是一个简单的示例代码，演示如何在 Delphi 中监测剪切板内容是否发生变化，并利用剪切板内容更新程序中某个 TLabel 控件的内容：

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if Clipboard.HasFormat(CF_TEXT) then
  begin
    // 获取文本剪切板内容
    Label1.Caption := Clipboard.AsText;
  end;
end;

上述代码中，该程序通过 TTimer 组件定时检查剪切板内容是否有 CF_TEXT 格式数据。如果检测到内容发生变化，则使用 Clipboard.AsText 获取剪切板文本内容，并将其赋值给 Label1 控件的 Caption 属性。

总之，TClipboard 类是 Delphi 程序中用于控制和监测剪切板的重要组件之一，在实际的 Delphi 编程中应用非常广泛，对于实现程序剪切板功能具有重要作用。

delphi检测剪切板.

可以使用 Delphi 的 Clipboard 类来检测剪贴板。你可以使用 Clipboard.HasFormat 方法来检查剪贴板上是否存在特定的数据格式。或者，你也可以使用 Clipboard.AsText 属性来获取剪贴板上的文本。如果你需要监视剪贴板，可以使用 SetClipboardViewer 函数来注册你的应用程序作为剪贴板观察器。