Seite 1 von 1

"paste" vom Clipboard in 8 SLE ?

Verfasst: Fr, 16. Dez 2016 3:22
von AUGE_OHR
hi,

habe 8 SLE mit

Code: Alles auswählen

   ::oSLE1:autoTab := .T.
   ::oSLE1:bufferLength := 26
   ::oSLE1:tabStop := .T.
jetzt habe ich einen "langen" Text im Clipboard und möchte die auf die 8 Zeilen "verteilen".

wenn ich im 1st SLE stehe und "einfüge" gehen die ersten 25+1 Zeichen rein und dann springt er wie gewünscht (o:autoTab := .T) in das nächste SLE ... aber da kommt natürlich vom ClipBoard nichts an.

hat jemand eine Idee wie man das Problem lösen könnte ?

Re: "paste" vom Clipboard in 8 SLE ?

Verfasst: Fr, 16. Dez 2016 4:04
von AUGE_OHR
so habe eine Lösung gefunden : per DragDrop :D

Text in Firefox markieren und per DragDrop auf die Form ziehen ( DrawingArea z.b. zwischen den Buttons) und los lassen.

Code: Alles auswählen

METHOD SLE8Dlg:HandleDragDrop( aState, oData, oParent )
LOCAL cText := oData:GetData( XBPCLPBRD_TEXT )
LOCAL i
LOCAL iMax  := LEN( ::editControls )
LOCAL cLine := ""

   FOR i := 1 TO iMax
      cLine := SUBSTR(cText,1,26)
      ::editControls[i]:setdata(cLine)

      cText := STRTRAN(cText,cLine,"")
      IF EMPTY(cText)
         EXIT
      ENDIF
   NEXT

RETURN XBP_DROPMODE_COPY
das funktioniert auch soweit ... aber am Ende habe ich ein XppFatal.LOG :angry4:
FATAL ERROR LOG
Not recoverable Error!
SYS Thread-ID: 464
Module: EH
Error Codes: EH: 900 Sub: 0(0) OS: 0 XPP: 0
Call Stack of Thread 1 (464):
Call Stack of GUI Thread (684):
File: D:\ALASKA\SLE\SLE8LED.exe
TimeStamp: 20161216 03:56
End of FATAL ERROR LOG.

Re: "paste" vom Clipboard in 8 SLE ?

Verfasst: Fr, 16. Dez 2016 21:50
von AUGE_OHR
hi,

so wie es aussieht ist es ein BUG in der v1.9.355 ... es soll mit Xbase++ v2.x funktionieren.
wäre nett wenn es jemand bestätigen könnte, Danke

Re: "paste" vom Clipboard in 8 SLE ?

Verfasst: Sa, 17. Dez 2016 4:22
von AUGE_OHR
hm ... :idea:
es gibt ein v1.9.355 Sample in c:\ALASKA\XPPW32\SOURCE\samples\basics\DRAGDROP\

ich habe das Demo gekürzt auf "TEXT" only und meine 8 x SLE eingebaut.
nun funktioniert es ohne ein XppFatal.LOG [-X
SLE8LED_02.ZIP
modifizierter Source
(2.66 KiB) 189-mal heruntergeladen