Get text from clipboard

Version 6.0

Get text from clipboard

Die Funktion Get text from clipboard 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 4th Dimension können bis zu 32.000 Zeichen enthalten. Bei mehr Zeichen in der Zwischenablage wird der von Get text from clipboard 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 Test clipboard. Verwenden Sie bei Texten über 32.000 Zeichen den Befehl GET CLIPBOARD anstelle der Funktion Get text from clipboard.

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:=Test clipboard ("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 CLIPBOARD ("TEXT";$vxClipData)
         If (OK=1)
            ` Mache etwas mit dem BLOB
         End if
   End case

GET CLIPBOARD, GET PICTURE FROM CLIPBOARD, Test clipboard.

Wurde der Text korrekt entnommen, hat OK den Wert 1; sonst den Wert 0 und es wird ein Fehler erzeugt.

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

• Gibt es keinen Text in der Zwischenablage, erhalten Sie den Fehler -102.

Anwendung des Befehls

Working with the Clipboard

---