Post by Bruno Silva on Jul 5, 2015 12:18:36 GMT
Foto_Tela - Extensão para tirar fotografia ao ecrã
Esta é uma pequena extensão criada por mim para o PT Basic.
A extensão tira uma foto ao ecrã todo e permite guardar o ficheiro de Imagem em vários formatos, PNG, GIF, BMP e JPG, o programa também permite ao utilizador salvar o ficheiro onde quiser e com o nome que quiser.
Para usar só é preciso EXECUTAR o programa.
Obtenha o programa aqui:
www.dropbox.com/s/knpt6ozg1zz4ysq/Foto_Tela.exe?dl=0
Isto aqui não é necessario usar com o PT Basic, isto aqui é o código aberto do Foto_Tela para ver como foi feito ou para quem quiser fazer modificações.
Código aberto do programa:
Isto foi criado usando C#
Esta é uma pequena extensão criada por mim para o PT Basic.
A extensão tira uma foto ao ecrã todo e permite guardar o ficheiro de Imagem em vários formatos, PNG, GIF, BMP e JPG, o programa também permite ao utilizador salvar o ficheiro onde quiser e com o nome que quiser.
Para usar só é preciso EXECUTAR o programa.
Obtenha o programa aqui:
www.dropbox.com/s/knpt6ozg1zz4ysq/Foto_Tela.exe?dl=0
Isto aqui não é necessario usar com o PT Basic, isto aqui é o código aberto do Foto_Tela para ver como foi feito ou para quem quiser fazer modificações.
Código aberto do programa:
Isto foi criado usando C#
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Drawing.Imaging;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Foto_Tela
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
//Minimizar esta Janela
this.WindowState = FormWindowState.Minimized;
//Tira foto
Bitmap foto_da_tela = new Bitmap(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height);
Graphics g = Graphics.FromImage(foto_da_tela as Image);
g.CopyFromScreen(0, 0, 0, 0, foto_da_tela.Size);
//Guardar
saveFileDialog1.Filter = "JPEG |*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif|PNG Image|*.png|All files (*.*)|*.";
if (saveFileDialog1.ShowDialog() == DialogResult.OK) {
foto_da_tela.Save(saveFileDialog1.FileName, ImageFormat.Png);
}
//Termina Prograna
Application.Exit();
}
}
}