Daha önce yapılmış programları yazmak adetim değildir ama her zaman da programların deneme sürümlerine ulaşamıyorum. Bu küçük programı hazırlama nedenim de buydu. Program listesi verilen web sitelerini tarıyor, tam boy fotografını çekiyor ve çektiği fotoğrafı belirtilen boyutta jpeg olarak kaydediyor.

[Yükleme bulunamadı.]

[Yükleme bulunamadı.]

function BrowseDialog : Kucuk resimlerin (Thumbnailer) kaydedileceği dizini seçmek için windows dizin diyaloğunu görüntüler.

function GetScreenAsBitmap : O andaki ekran görüntüsünü BMP formatında geri döndürür.

function GetWindowAsBitmap : Başlığı verilen pencerenin resmini çeker ve BMP olarak geri döndürür.

function RepChars: String’in içindeki istenilen bir karakteri başka bir karakter ile değiştirir.

procedure Procmes : Arabirimdeki takılmaları engellemek için windows mesajlarının işleme konulmasını söyler.

procedure ResizeBitmap : BMP olarak verilen resmi istenilen ölçülerde yeniden boyutlandırır.

procedure BmpToJpeg : Patikası verilen BMP resmi JPG formatına çevirir.

procedure PopupAcilmismi: Taranan sayfanın açtığı açılır pencerelerin (popup) kapatılmasını sağlar.

Kolay gelsin.

Yazan: Tankado

CEVAP VER

This site uses Akismet to reduce spam. Learn how your comment data is processed.