30 Ekim 2010 Cumartesi

[ C# ] ASCII To Binary & Binary To ASCII

Merhaba arkadaşlar başlıktanda anlaşıldığı gibi, ASCII karakterleri Binary kodlarına ve tam tersine çeviren bir programdır. Geçen hafta bu çeviriyi yapan çok site araştırmıştım ve sonunda bir önceki konuda bahsettiğim siteyi bulmuştum. O sitenin mantığıyla yazdığım bir program..

Programın Resmi ; 







Kaynak kodunu indirebileceğiniz link ;
http://cid-ab97369ef90e9912.office.live.com/self.aspx/.Public/AsciiToBinary.rar

22 Ekim 2010 Cuma

Binary kod sisteminden ASCII kod sistemine dönüştürme ( Binary to ASCII )

Merhaba arkadaşlar kaç gündür saatlerce bilgisayar başında sadece bu dönüşümü yapmak için bir çok site araştırdım ve sonunda buldum. Sizlerle paylaşmak istedim.
Sitenin adresi  :  http://www.theskull.com/javascript/ascii-binary.html
Buda Ascii karakterlerin Binary kod tablosu : http://sticksandstones.kstrom.com/appen.html
Çok yakında programınıda yazacağım.
İyi günler..

20 Ekim 2010 Çarşamba

Yargıtay'dan sert türban çıkışı! Laik'lik ilkesiyle bağdaşmadığı görülmekte ''Siyasilerin beyanları politik çıkara dayanmakta."

Yargıtay Başsavcılığı: Yargının türban kararına yasama ve yürütme uymak zorundadır.

Yargıtay Başsavcılığı YÖK'ün aldığı "Başörtülü öğrenciler tüm sınavlara başları kapalı şekilde girebilirler" kararına tepki gösterdi. Başsavcı Abdurrahman Yalçınkaya'nın yayınladığı açıklamada şunlar kaydedildi:

'Dinsel inanç veya dinsel kurallarla doğrudan ilişki ve bağlantı kurularak yapılan düzenlemeler, hem devrim yasalarını, hem de laiklik ilkesini ilgilendirir. Yükseköğretim kurumlarındaki öğrencilerin giyimlerini düzenlerken türban kullanımına dinsel inanç nedeniyle geçerlilik tanımak, kamu hukuku alanındaki bir düzenlemeyi dinsel esaslara dayandırma suretiyle laiklik ilkesine aykırılık oluşturur. Yasama ve yürütme yargı kararlarına uymak zorunda. AIHM kararına göre türban yasağı zorunlu tedbirdir. Gerek iç hukuk, gerekse uluslararası hukuk boyutuyla değerlendirildiğinde türbanın koruma görmediği ve laiklik ilkesiyle bağdaşmadığı görülmektedir. Siyasilerin beyanları politik çıkara dayanmakta."


9 Ekim 2010 Cumartesi

[ Delphi 7 ] Yaş Hesaplama

Bu programda Delphi 7 'de DateUtils kütüphanesinin kullanımı basit bir şekilde uyguladım.
Resimdende anlaşıldığı gibi siz sadece doğum yılınızı yazıyorsunuz ve program size kaç yaşında olduğunuzu ve kaç gün yaşadığınızı hesaplıyor.

procedure TForm1.BitBtn1Click(Sender: TObject);
var
dyil,syil,yas,gun:integer;
tgun:TDateTime;

begin
dyil:=StrToInt(Edit1.Text);       // Edit1 'in içine girilen doğum yılını integer'a çeviriyoruz.
syil:=CurrentYear;                // CurrentYear Şimdiki yıl'ı göstermektedir. syil degişkenine şimdiki yılı atadık.
yas:=syil-dyil;                   // İlgili sayılsal
gun:=(yas-1)*365;                 // işlemleri yaptık.
tgun:=gun+DayOfTheYear(tgun);     // Burada dogum yılından bu yıla kadar olan günün toplamını hesaplattık.

Edit2.Text:=IntToStr(yas);        // Sayılsal işlemlerimizi yaptıktan sonra verilerimizi string 'e çevirmek zorundayız.
Edit3.Text:=IntToStr(gun);        // çünkü Edit nesnesi string tanımlı oldugundan integer deger gönderemeyiz..

end;

Kaynak Konudu İndir ;
http://cid-ab97369ef90e9912.office.live.com/self.aspx/.Public/yashesap.rar


Delphi 7 ile dosyalama işlemi


Merhaba arkadaşlar,

Geçmişte yazmış olduğum programlardan birini tanıtayım size, bu programda her hangi bir veritabanı sistemine ihtiyaç duymadan uzun uzun veri tabanına bağlanmak için kod yazmadan ufak bir dosyalama sistemini yapmaya çalıştım..

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Listbox1.Items.Add (Edit1.Text+' '+Edit2.Text+' '+Edit3.Text+' '+ComboBox1.Text);
end;

Yukarıdaki koddan da anlaşıldığı üzere BitBtn1 ‘in Click olayında Edit1 ,  Edit2 , Edit3 ve ComboBox ‘a girilen yazıları satır satır Listbox ‘a aktarıyoruz..

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
ListBox1.Items.Delete(ListBox1.ItemIndex);
end;

Yukarıdaki kodda ise Temizle Butonunun bağlı olduğu buton’un kodu mevcut. Bu kodda Listbox ’a aktarılan verilerin hepsini temizlemek içindir.

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
ListBox1.Items.SaveToFile('maas.dat');
end;

ve asıl işlemi yaptığımız yere yani KAYDET butonunun Click  olayına geldik çoğu arkadaşım hala bunu anlamamakta diretiyor oysa kodda her şey açık açık yazıyor.  Diyor ki ;
ListBox1 ‘in içinde ne görüyorsan hepsini “ maas.dat “ dosyasının içine kaydet. İşte bu kadar.

Kaynak Kodunu Aşağıdaki Linkten İndirebilirisiniz..



8 Ekim 2010 Cuma

Bedava SMS Gönder !

Bir gün kontürümün olmamasından dolayı internette beleşe mesaj göndermek için her ne kadar yabancı site varsa hepsinde cirit attım ama sonunda işe yarayan bir siteyi sonunda bir TÜRK yapımı bdvsms.net 'i buldum. Gerçektende anında SMS 'inizi gönderiyor ama her 15 dakika da sadece 1 mesaj gönderme hakkı tanıyor.

Sizde SMS göndermek için aşağıdaki linki kullanabilirsiniz ..
http://www.bdvsms.net/bedavasmsgonder.php

Bilge Adam C# Kitabı

Bu kitabın PDF 'sini çok aramıştım ve sonunda buldum. Çoooook işinize yarayacak tabi indirip bir klasöre hapis etmezseniz programlama adına çok yol kat etmiş olacaksınız..

Aşağıdaki linkten indirebilirsiniz ..
http://cid-ab97369ef90e9912.office.live.com/browse.aspx/.Public

Blog Başlangıcı

Merhaba arkadaşlar, 
vallahi blog işine ilk adımlarımı atıyorum hoş daha başlangıc yazısında ne yazacağımı pek bilmiyorum ama başlamak bitirmenin yarısıdır : .) diyerek amacımı açıklamaya başlaya bilirim..

Yeni öğrendiğim bilgilerin sürekli hafızamda güncel kalmayacağından bir alana yazmam gerektiğini düşündüğüm için blogger'i seçtim tabi ilerleyen zamanlarda kendi hosting alanıma geçecegim. Neyse hem kendim için hemde sizin için güncel hayatta ki ve internet teknolojilerinde ki atılan yeni adımları takip etmeniz için bu blogu oluşturdum.