Results 1 to 1 of 1

Thread: Template for tool which processes line based text from clipboard

  1. #1
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    7,128
    Rep Power
    732

    Template for tool which processes line based text from clipboard

    From time to time,

    I use this template as a base for work which modifies text in my clipboard, maybe somebody will find it useful.

    Just unzip the attachement to your thinAir/Template directory.

    Dim sInput  As String = ClipBoard_GetText
    Dim sOutput  As String
    
    Dim lines() As String
    Dim nLines As Long = Parse(sInput, lines, $CRLF)
    
    ' -- Auxiliary variable for enhanced line handling
    Dim oneLine As String               
    Dim lineToken() As String
    Dim lineTokenCount As Long
    
    ' -- Auxiliary variable to log any problems
    Dim problemLog As String
    
    Dim i As Long
    
    For i = 1 To nLines
     oneLine = lines(i)
     'lineTokenCount = parse(oneLine, lineToken, " ")
     
     
    Next           
    
    If Len(problemLog) Then
     MsgBox (0, problemLog, %MB_OK Or %MB_ICONINFORMATION, "Problems found")
    Else
     sOutput = Join$(lines, $CRLF)
     ClipBoard_SetText(sOutput)
    End If
    
    Petr
    Attached Files Attached Files
    Last edited by ErosOlmi; 17-08-2022 at 12:31.
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB

Similar Threads

  1. Petr's cool 2 line copy processes to clipboard
    By kryton9 in forum Sources, Templates, Code Snippets, Tips and Tricks, Do you know ...
    Replies: 3
    Last Post: 30-03-2008, 17:57

Members who have read this thread: 1

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •