Re: Copy problem in VT100 (General questions)

by vbiggar, Thursday, June 08, 2006, 13:37 (6540 days ago) @ wodAlan

Ok I wrote the following using the selected text:

Private Sub mnutermCopySub()

Dim aa As String

On Error Resume Next

aa = Mid(wod1.SelectedText, 1, Len(wod1.SelectedText) - 2)
'MsgBox aa

' Copy selected text to Clipboard.
Clipboard.Clear
Clipboard.SetText aa

clipviewer.Text = Clipboard.GetText()

End Sub

This copies the text in the proper format.

I'm posting this from the SelectedText capture. I'm not sure if it will format right when I post it or not.

FrontCard BackCard FrontCard BackCard
Type Rev Type Rev Status Type Rev Type Rev Status
1 BXM-622 EHE SM-1 BD Active 9 BXM-155 ELE SM-4 BB Active
2 BXM-622 EHE SM-1 BD Active 10 BXM-155 EHE SM-4 BB Active
3 BXM-622 EHE SM-1 BD Active 11 BXM-T3 EJE TE3-12BA Active
4 BXM-622 EPE SM-1 BE Active 12 BXM-622 ESE SM-1 BD Active
5 BXM-T3 EKE TE3-12BA Active 13 Empty
6 BXM-155 EEE SM-4 BB Active 14 BXM-T3 EHE TE3-12BA Standby
7 BCC-4 HCM LM-2 AC Standby 15 ASM ACC LMASM AC Active
8 BCC-4 HCM LM-2 AC Active

This is a raw capture from the terminal:
[0mdspcds[?25l[?25h[19;21H[?25l[19;1HThis[?25h[19;21H[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[19;1HLast[?25h[19;21H[23;1H[22;1H[0KNext Command: [?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25h[?25l[?25hbye[?25l[?25h[19;21H[?25l[19;1HThis[19;15Hbye[0K[?25h[?25l[?25h

[?25h[0m[2J[1;1H[?25l[0;2;7mscrmbp1[?25h[1;1H[1;38HBPX 8620[1;22H[0mNo User [1;48H9.2.33[?25l[1;58H[0;2;7mJune 8 2006 11:31 GMT [?25h[1;54H[18;1H[0;4m [19;1H[?25l[0mLast[19;6HCommand:[19;15Hdspcds[?25h[24;1H [24;20H [24;23H [24;70H[0;5;7mMAJOR ALARM[24;1H[1;16H[0;2;7mTN [0m [?25l[?25h[?25l[?25h[19;21H[?25l[19;15H[0K[?25h[1;22HNo User [20;1H[19;1H[0K[?25l[?25h[21;1H