Contenu du presse papier (clipboard)
Comment savoir si le presse papier contient une image ou du texte ?
Avec ce code, si le presse papier contient une image elle est copiée dans un Timage, si c'est du texte le contenu est copié dans un mémo.
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;
A voir également
- Contenu du presse papier (clipboard)
- Vba vider presse papier - Forum Visual Basic
- Vider presse-papiers ✓ - Forum Visual Basic 6
- Valider le "NON" du presse papier par Macro - Forum Visual Basic
- Vider le presse papier (VBA Word) ✓ - Forum Visual Basic
- VIDER LE MEMOIRE pour accelerer - Forum Visual Basic
Ce document intitulé « Contenu du presse papier (clipboard) » issu de CodeS SourceS (codes-sources.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.