TClipboard.SetSupportedFormats

Sets all supported clipboard formats at once.

Declaration

Source position: clipbrd.pp line 223

public function TClipboard.SetSupportedFormats(

AFormatCount: Integer;

FormatList: PClipboardFormat

):Boolean;

Arguments

`AFormatCount`		Number of clipboard formats in the FormatList argument.
`FormatList`		Pointer to the list of TClipboardFormat instances stored in the method.

Description

SetSupportedFormats sets all supported formats at once All data will be empty. This procedure is useful if setting the OnRequest event to put the data on the fly.

Example: Using the PrimarySelection from synedit.pp.

procedure TCustomSynEdit.AcquirePrimarySelection;
var
  FormatList: TClipboardFormat;
begin
  if (not SelAvail)
   or (PrimarySelection.OnRequest=@PrimarySelectionRequest) then exit;
  FormatList:=CF_TEXT;
  PrimarySelection.SetSupportedFormats(1,@FormatList);
  PrimarySelection.OnRequest:=@PrimarySelectionRequest;
end;

Version 4.0

Generated 2025-05-03

Home