The Ctrl + V Game

  • Thread starter Thread starter smileyhead
  • Start date Start date
  • Views Views 574,468
  • Replies Replies 9,272
  • Likes Likes 15
Code:
    Private Sub PrintDocument1_PrintPage(sender As Object, e As PrintPageEventArgs) Handles PrintDocument1.PrintPage
        ' Create a rectangle the size of the printable area of the page.
        Dim recPrintable As New Rectangle(
            e.MarginBounds.Left, e.MarginBounds.Top,
            e.MarginBounds.Width, e.MarginBounds.Height)

        ' Create a rectangle used for the actual drawing dimensions of the image.
        ' Default it to the printable area.
        Dim recDraw As Rectangle = recPrintable

        ' Load the image in a bitmap object we can use.
        Dim bmSource As New Bitmap(ofdSelectPicture.FileName)

        ResizeToPrintableArea(bmSource, recDraw, recPrintable)

        ' Draw the bitmap on the Graphics object of the PrintDocument control.
        e.Graphics.DrawImage(bmSource, recDraw)

        ' This is the last page to be printed.
        e.HasMorePages = False

        ' Free up resources used.
        bmSource.Dispose()

    End Sub
 
  • Like
Reactions: ThoD and Seriel
caea41.png
 
  • Like
Reactions: ThoD and smileyhead
#---------------------
# Define a few Color's
#---------------------
BLACK='\e[0;30m'
BLUE='\e[0;34m'
GREEN='\e[0;32m'
CYAN='\e[0;36m'
RED='\e[0;31m'
PURPLE='\e[0;35m'
BROWN='\e[0;33m'
LIGHTGRAY='\e[0;37m'
DARKGRAY='\e[1;30m'
LIGHTBLUE='\e[1;34m'
LIGHTGREEN='\e[1;32m'
LIGHTCYAN='\e[1;36m'
LIGHTRED='\e[1;31m'
LIGHTPURPLE='\e[1;35m'
YELLOW='\e[1;33m'
WHITE='\e[1;37m'
DARKGRAY='\e[01;30'
LIGHTGRAY='\e[00;37'
NC='\e[0m' # No Color
# Sample Command using color: echo -e "${CYAN}This is BASH

PS1="\[\033[35m\]\[\033[36m\]\w\n\[\033[0;31m\]\u@\h\[\033[1;34m\] ~\[\e[1;32m\]> \[\e[m\]\[\e[0;37m\]\[\033[0m\]"

eval $(thefuck --alias)
 

Site & Scene News

Popular threads in this forum