FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Projet de planétarium virtuel.
par Pedro Alvarez Hier à 17:29

» Quantité de mémoire utilisée par un exe
par Navigateur Hier à 14:52

» Problème avec 'file_load'.
par Pedro Alvarez Hier à 8:12

» Version instantanée V 0.9.28i20 du 13/06/2018
par jjn4 Sam 16 Juin 2018 - 14:25

» string$(0,chr$(32)) sans erreur
par silverman Ven 15 Juin 2018 - 19:56

» Version instantanée V 0.9.28i19 du 13/06/2018
par Minibug Ven 15 Juin 2018 - 19:14

» PanExpress : l'éditeur Panoramic avec création d'objet
par Jean Claude Ven 15 Juin 2018 - 7:52

» Mes souhaits d'amélioration de Panoramic.
par Pedro Alvarez Jeu 14 Juin 2018 - 20:17

» [RÉSOLU] Message d'erreur impossible à indentifier
par Minibug Mer 13 Juin 2018 - 20:52

» Cadre pour image
par Jean Claude Mar 12 Juin 2018 - 16:31

» Créateur d'objets Panoramic
par Minibug Mar 12 Juin 2018 - 14:02

» Planétarium gratuit.
par Jean Claude Sam 9 Juin 2018 - 18:50

» Comment afficher une image sans fond.
par JL35 Sam 9 Juin 2018 - 14:16

» image_width(n) et image_height(n)
par silverman Sam 9 Juin 2018 - 11:22

» Site sur la programmation sympa
par Jean Claude Jeu 7 Juin 2018 - 11:20

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2018
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier

Partagez | 
 

 Contenu du presse-papier

Aller en bas 
AuteurMessage
JL35



Nombre de messages : 6273
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Contenu du presse-papier   Dim 8 Avr 2018 - 21:38

C'est très rustique, juste pour avoir une idée de la nature du contenu du presse-papier.
Je sais que Klaus a fait quelque chose de bien plus élaboré dans KGF.dll, mais ici c'est juste pour les données utilisables en Panoramic, savoir s'il est vide, s'il contient du texte ou une image:
Code:
SUB Clipdata()
  ' Nature du contenu du presse-papier
  ' Résultat dans natclip% =0 vide, =1 image, =2 texte
  DIM_LOCAL sz%,ft$: ft$ = "C:\TEMP\Ftmp.bmp"
  IF VARIABLE("natclip%") = 0 THEN DIM natclip%
  MEMO 998: HIDE 998
  IMAGE 999
  CLIPBOARD_PASTE 998: CLIPBOARD_PASTE 999
  natclip% = 1: ' image, a priori
  IF COUNT(998)>0
      natclip% = 2: ' contenu texte
  ELSE
      FILE_SAVE 999,ft$
      FILEBIN_OPEN_READ 1,ft$: sz% = FILEBIN_SIZE(1): FILEBIN_CLOSE 1
      FILE_DELETE ft$: IF sz% = 0 THEN natclip% = 0: ' clipboard vide
  END_IF
  DELETE 998: DELETE 999
END_SUB
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 
Contenu du presse-papier
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Récupérer des images du presse-papier
» Un presse-papier amélioré
» Foxit Reader et ASK
» [Résolu] mettre l'animation dans le presse papier
» Paper Case : protéger vos CD avec une feuille de papier

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: