Save Screenshot

This code has been declared by its author to be Public Domain code.

Save Screenshot by Murilo

2001

Saves a snapshot of the current view (front buffer) to the current directory. Automatically determines the next available file number; Screenshot001.bmp, Screenshot002.bmp etc.

Function SaveScreenshot()

; Version: 1.0
; Author: Leigh Bowers
; Homepage: http://www.curvenet.co.uk

    iFileNumber% = 0
    Repeat
        iFileNumber = iFileNumber + 1
        sFileName$ = "Screenshot" + String$("0", 3 - Len(Str$(iFileNumber))) + iFileNumber + ".bmp"
    Until Not(FileType(sFileName))
    
    SaveBuffer FrontBuffer(), sFileName

End Function

Comments

googlemesilly

2006

thanks guys ! :)

S/D

Zeotrope

2008

7 Years!

Man, where did you get your nick? *Milky Joe.....boosh?

Code Archives Forum