[Pazar akşamı yazmıştım bunu kanımca. Önce bir teredüt ettim sonra post edeyim dedi]

Bu yazıya başlamadan önce saate göz attım; tam 11:11′i gösteriyordu. Dilek tutanlar var bu tesadüfün şerefine, ben hiç denemedim. Aslında bir kaç kere denemiş olabilirim ama çevremdekilerin mutluluğu gibi geniş çaplı dileklerdi bunlar. Belki gerçekleşir, o zaman hep beraber gülümseriz. Bazen bireysel düşünmemek lazım

Normalde günde iki yazı yazmıyorum. İşin gerçeği genelde yazı yazmıyorum. Üşengeç bir insanım çünkü. Ötesinde, duygularımı ifade etmekten hoşlamıyorum, savunmasızmışım gibi geliyor. Bu siteyi bu yüzden seviyorum. Okuyanı az, belki de yok, buna rağmen yazılanlar itiraf sayılabilir. Çünkü kendi kendime konuşmuyorum, duyulma ihtimalleri var.

Şu an Yann Tiersen’den La Dispute dinliyorum. Saate ve moduma uygun. Az önce sevdiğim şiirler ve kendi karalamalarımı yazdığım defteri buldum, okudum. İçinden bonus olarak da bir yıllık yazısı taslağı çıktı. 2008′de mezun olan arkadaşıma yazmışım. Kendisiyle artık pek görüşmüyoruz ama yanlış anlaşılmasın, iş güç yüzünden yoksa sevdiğim insanlardan biridir. Şiirleri ve yazıyı okuyunca şöyle bir düşündüm; geçen seneleri, okul yıllarını üniversiteyi özellikle. 2005-2009, 4 sene ediyor. Bana çok daha uzun gelmişti aslında. Çevremdekiler ve ben, ne kadar büyümüş, ne kadar değişmişiz dört sene gibi kısa bir sürede. Farkları görmek çok heyecan verici doğrusu.

Uzun zaman sonra ilk defa zamanın benim olduğunu hissediyorum. Eskiden yazları 3′ten önce yatmazdım. Saat 3′ten sonra herkes uykuya yenik düşüyor çünkü ve camdan dışarı baktığında, sanki zaman denilen kavramın sana ait olduğunu hissediyorsun. Zira, o an bir tek sen ayaktasın ve zaman seninle geçiyor, diğer herkes ise belli bir süre hayatı dondurmuş. Muazzam bir his. Sanki Dünya kulağına eğilip sana bir sırrını veriyor ve “Bunu kimseyle paylaşma ama” dercesine göz kırpıyor; öyle bir şey.

Saat geç oluyor, yarın erken kalkacağım için yatmam lazım. Gidip ben de hayatımı belli bir süre donduracağım şimdi. Belki birileri saat 3 civarı camdan dışarı bakar, hafifçe gülümser, yaşadığını tekrar hisseder ve Dünya’ya “Kimseye söylemem, merak etme” demek için, geri göz kırpar. Kim bilir?

So I’m going to wait and watch it fall apart to see how much of it was real and how much of it was built upon a misunderstanding.

IBSQL aslında kullanımı bayağı kolay. Fakat bu component’ın request live gibi bir seçeneği yok. Ayrıca update de edilemediği için DataSource.DataSet property’sine atanamıyor. Seçenek bile çıkmıyor o kadar, diyeyim. Bu sefer daha bütün bir kod yazdım.

Senaryo: 1 DB, 2 table, 1 IBTransaction, 5 EditBox, 1 Button, 1 IBSQL

Table1: NAMESS: ID (Int, PK), NAME (VarChar), LNAME (VarChar), AGE (Int)

Table2: INFO: ID (Int, PK), ADRESS (VarChar), GENDER (Char), AGE (Int), NAMESS_ID (Int, FK)

procedure TForm1.Button1Click(Sender: TObject);

var id: Integer;
cnt: Integer;
begin

if not IBTransaction1.InTransaction then
IBTransaction1.StartTransaction;

try
IBSQL1.SQL.Text:=’INSERT INTO NAMESS (NAME, LNAME) VALUES (:N, :LN)’;
IBSQL1.Params.ByName(‘N’).AsString:=Edit1.Text;
IBSQL1.Params.ByName(‘LN’).AsString:=Edit2.Text;
IBSQL1.ExecQuery;

//NAMESS’in son kaydedilen ID’sini al ve bunu INFO’ya yazdırmak için
//”id” diye belirlenen variable’da tut.

IBSQL1.SQL.Text:=’SELECT MAX(ID) FROM NAMESS’;
IBSQL1.ExecQuery;
id:=IBSQL1.Fields[0].AsInteger;
IBSQL1.Close;

IBSQL1.SQL.Text:=’INSERT INTO INFO (ADDRESS, GENDER, AGE, NAMESS_ID) VALUES (:ADD, :G, :A, :NID)’;

//Teker teker EditBox’ların adını yazacağımıza program bulsun
//veriyi kendi alsın yazsın kodu
for cnt:=3 to 5 do
begin
IBSQL1.Params.Vars[cnt-3].AsString :=
TEdit(FindComponent(‘Edit’+IntToStr(cnt))).Text;
end;

IBSQL1.Params.Vars[3].AsInteger:=id;
IBSQL1.ExecQuery;

IBTransaction1.Commit;
except
IBTransaction1.Rollback;
end;
end;

[EDIT:] IBDataset ile ilgili bir kod örneği koymaktan vazgeçtim. Kullanmadım bu component’ı çünkü. Daha çok işlem gerektirdiği halde, yersizce ve inatla, IBQuery kullanmaya devam ediyorum. Alıştım zira. Fakat IBDataset arama yaptığınızda karşınıza bir çok örnek çıkacaktır. Kullanımı rahat olmasından ve update edilebilmesinden ötürü bu component tercih ediliyor. O yüzden bu noktada bayrağı Google’a teslim ediyorum.

After a while you learn
The subtle difference between
Holding a hand and chaining a soul
And you learn that love doesn’t mean leaning
And company doesn’t always mean security.

And you begin to learn
That kisses aren’t contracts
And presents aren’t promises
And you begin to accept your defeats
With your head up and your eyes ahead
With the grace of a woman
Not the grief of a child

And you learn
To build all your roads on today
Because tomorrow’s ground is
Too uncertain for plans
And futures have a way
Of falling down in mid flight

After a while you learn
That even sunshine burns if you get too much
So you plant your own garden
And decorate your own soul
Instead of waiting
For someone to bring you flowers

And you learn
That you really can endure
That you are really strong
And you really do have worth
And you learn and you learn
With every good bye, you learn.

Veronica A. Shoffstall

Bunu geçenlerde Tuğçe gönderdi o günden beri arada okuyup gülümsüyorum ne diyeyim

I’m a new computer science engineer who has been working as a software developer for the last 5 months. Yesterday my boss -who, by the way, once has written mind blowing programs in Delphi- came by for the first time and asked if I could help him with something. It was sorting columns alphabetically in an Excel sheet for his wife. MLIA.

“This is my last goodbye” durumuna kendimi hazırlıyorum. Umarım zamanı geldiğinde işler “Saying goodbye was never an option” ya da “Hello, hello; I don’t know why you say goodbye, I say hello” gibi bir durum ortaya çıkmaz. Ağlarım çünkü.

Internette çok araştırma yaptım ama detaylı bir cevap bulamadım. Ya benim kabızlığımdan ötürü ya da gerçekten bu componentler için yazılmış kısa yoldan çözüm gösteren bir yazı yok. Aşağıda kısaca, başlıkta yazdığım 3 component’ın basit bir kayıt için kullanımı ve farkını yazacağım. Ben çektim, başkaları çekmesin.

Senaryomuz şu: 1 database, 1 table, 1 transaction,3 EditBox, 1 Button, 1 IBQuery, IBSQL ya da IBDataset.

Table1: PERSONA: ID (Int, PK), NAME (VarChar), LNAME (VarChar), AGE (Int)

Butonun “OnClick” event’ine yazacağımız kod şu:

if not IBTransaction1.InTransaction then IBTransaction1.StartTransaction;

Try

if IBQuery1.Active = True then IBQuery1.Active := False;

IBQuery1.SQL.Text := ‘INSERT INTO PERSONA (NAME, LNAME,AGE) ‘+

‘VALUES (:N, :LN, A)’;

IBQuery1.Open;

IBQuery1.ParamByName(‘N’).AsString := Edit1.Text;

IBQuery1.ParamByName(‘LN’).AsString := Edit2.Text;

IBQuery1.ParamByName(‘A’).AsInteger := IntToStr(Edit3.Text);

IBQuery1.ExecSQL;

IBTransaction1.Commit;

Except

IBTransaction1.RollBack;

End;

Görüldüğü gibi IBQuery Read-Only olmasına rağmen IBSQLUpdate component’ı kullanmadan kayıt alabildik. Zira anladığım kadarıyla IBSQLUpdate, daha ziyade DatabaseGrid ya da DBEdit gibi component’larla kullanmak  için var. Bunun gibi küçük çaplı kayıtlarda kullanmaya gerek yok.

[EDIT:] IBDataset ile ilgili bir kod örneği koymaktan vazgeçtim. Kullanmadım bu component’ı çünkü. Daha çok işlem gerektirdiği halde, yersizce ve inatla, IBQuery kullanmaya devam ediyorum. Alıştım zira. Fakat IBDataset arama yaptığınızda karşınıza bir çok örnek çıkacaktır. Kullanımı rahat olmasından ve update edilebilmesinden ötürü bu component tercih ediliyor. O yüzden bu noktada bayrağı Google’a teslim ediyorum.

…or I at least hope it is.

Olayımızı denklemler haline getirecek olursak:
Sera + no food != content Sera
angry Sera -> hell
hungry Sera = angry Sera
place(current) + Sera = 0
place(current)+ hungry Sera = hell

İspat!

Özellikle digg‘de gördüğüm çoğu enteresan haberin linki “co.uk” ile bitiyor ve hepsi demeyeyim ama %80′i Birleşik Krallık’ın başkentinin bulunduğu İngiltere’de geçiyor.

Bugüne kadar İnternet’te çok abuk subuk şey okudum fakat aşağıda linkini verdiğim haber, aralarında beni en çok güldüreni oldu

Yaşlılar ekibi, düzenledikleri çay partilerinde serserilerinin elebaşlarını belirledi ve bu kişilerin isimlerinin yer aldığı listeleri internet üzerindeki sosyal paylaşım sitelerine gönderdi.

Bu kişilerin 67-92 yaş aralığında olduğu gerçeği işin vitamini sanırım. Nasıl bir ülke bu böyle?

Haberin linki: http://www.hurriyet.com.tr/dunya/15251610.asp?gid=373

I’m driving blind but wheels of life have a beautiful way

Of slowing you down sometimes

To catch your breath

Geri geldim! Son bir kaç haftayı herkesten ve her şeyden sıkılarak geçirmiş olmam ne kadar üzücü; boşa zaman harcamışım resmen. Halbuki hayat o kadar uzun değil Haftasonu İzmir’deki kuzenlerimle birlikteydim ve şu an harika hissediyorum. İstanbul’dan ayrılmam lazımmış demek ki bir süreliğine. Ayrıca seviyorum uleeen! İzmir’i, oradakileri; İstanbul’u ve buradakileri Bu hafta içi Güneş’le buluşacağız büyük bir ihtimal. Sonraki hafta da kuzenim Berk buraya gelecek, onunla zaman geçiririz. Düşündükçe daha mutlu oluyorum resmen. Hayat güzel, çok güzel