Get text from pasteboard

Version 11 (Geändert)

Get text from pasteboard

Die Funktion Get text from pasteboard gibt den Text aus der Zwischenablage zurück.

Wurde der Text korrekt aus der Zwischenablage entnommen, setzt der Befehl die Variable OK auf 1. Ist die Zwischenablage leer oder enthält sie keinen Text, gibt der Befehl einen leeren String zurück, setzt OK auf 0 und generiert einen Fehler -102. Reicht der Speicher zum Entnehmen des Textes nicht aus, setzt der Befehl die Variable OK auf 0 und generiert einen Fehler -108.

Textfelder und Variablen von 4D können bis zu 32.000 Zeichen enthalten. Bei mehr Zeichen in der Zwischenablage wird der von Get text from pasteboard zurückgegebene Text beim Einsetzen in das Datenfeld bzw. die Variable abgeschnitten. Testen Sie deshalb bei langen Texten in der Zwischenablage zuerst die Größe der Daten mit der Funktion Pasteboard data size. Verwenden Sie bei Texten über 32.000 Zeichen den Befehl GET PASTEBOARD DATA anstelle der Funktion Get text from pasteboard.

Folgendes Beispiel prüft, ob es einen Text in der Zwischenablage gibt, und entnimmt dann, je nach Größe, den Text aus der Zwischenablage als Text oder als BLOB:

   $vlSize:=Pasteboard data size("TEXT")
   Case of
      : ($vlSize<=0)
         ALERT ("Es gibt keinen Text in der Zwischenablage.")
      : ($vlSize<=32000)
         $vtClipData:=Hole Text aus der Zwischenablage
         If (OK=1)
            ` Mache etwas mit dem Text
         End if
      : ($vlSize>32000)
         GET PASTEBOARD DATA ("TEXT";$vxClipData)
         If (OK=1)
            ` Mache etwas mit dem BLOB
         End if
   End case

GET PASTEBOARD DATA, GET PICTURE FROM PASTEBOARD, Pasteboard data size.

Wurde der Text korrekt entnommen, hat OK den Wert 1; sonst den Wert 0.

• Reicht der Speicher zum Entnehmen des Textes nicht aus, erhalten Sie den Fehler -108.

Anwendung des Befehls

Drag and Drop Data between 4D and Excel, Working with the Clipboard

---