XProfan

@iF

Ich denke grad - ich hab nen Source im Clipboard - mache einen Screenshot - und der Source ist weg. Pfff!

Dann lade Dir mein CLIP-COPY 1.02 runter und Deine Texte sind gespeichert

Ist naturalmente Quatsch da ich ebenso ein Bild im Clipboard haben potuto...

...

Horst Horn

@iF

iF

Ich denke grad - ich hab nen Source im Clipboard - mache einen Screenshot - und der Source ist weg. Pfff!

Dann lade Dir mein CLIP-COPY 1.02 runter und Deine Texte sind gespeichert

Dein Programm ist gut - nur es geht ums Clipboard - nicht nur um Texte.

- Page 2 -

Nico
Madysa

Suppi, und was passiert, wenn ein Bild drin ist und ich GetClip$() verwende, oder andersherum? Und wie kann ich testen, ob ein Bild oder Text drin ist?
Danke, iF jetzt habe ich wieder einige Experimente, die ich in nächster Zeit durchführen kann, das Problem hat mich echt neugierig gemacht.

Nico Madysa

Mit reinen XProfanmitteln kommst Du bei dieser Problematik nicht weiter. RTF[API]M

Nico
Madysa

Sei dir da mal nicht so sicher, ich werde da noch herumprobieren...

Nico Madysa

Nico Madysa

Sei dir da mal nicht so sicher, ich werde da noch herumprobieren...

100%ig sicher. ;) Es ist Dir z.B, mit XProfan10-Boardmitteln nicht possibile den Inhalt des Clipboards welcher aus einer Markierung aus GoldWave besteht zu sichern und wiederherzustellen.

Wenn ich mir bei etwas nicht sicher bin schreibe ich IMHO - oder keine Ahnung - oder bin mir nicht sicher.

Nico
Madysa

Naja, ein mäßiger Erfolg: zumindest kann ich Bilder und Texte unterscheiden:
Kompilieren Markieren Separieren

proc TextInClipboard

    if GetClip$() =

        return 1

    else

        return 0

    endif

endproc

proc PicInClipboard

    StartPaint -1
    ClipLoadBMP 0 , 0 ; 0
    EndPaint

    if not(%BMPX) and not(%BMPY)

        return 0

    else

        return 1

    endif

endproc

cls

if TextInClipboard()

    print GetClip$()

elseif PicInClipboard()

    ClipLoadBMP 0 , 0 ; 0

else

    print Es ist weder ein Text
    noch ein Bild in der
    Zwischenablage.

endif

waitinput
./../funktionsreferenzen/xprofan/end/'>end

P.S.: Was zur Hölle ist GoldWave???

Nico Madysa