Posts Tagged ‘Adi’

Mağdur Aşk

Wednesday, May 12th, 2010 No Commented

Under : , , , , , , , , , , , , , , , , , , , , , , , ,

Bu şarkıda seni aradım bu gece
saçlarını aradım her hecede
deniz mavisi kocaman gözlerini,
hele doyumsuz o tatlı çehreni,
seni aradım bu gece ve sen yoksun

hani akordu bozuk derdin de beğenmezdin ya,
bir de üstüne piyaniste kızar da sen geçerdin başına,
bozuk da olsa piyano bizim, bu şarkı bizim derdin,
sonra sıcacık bir tebessümün ardından başını yaslardın ya
bak yine bizim şarkımız ama sen yoksun.

bak yine bizim masamızı ayırttım
piyanistin tam sağında
hasret bekçisi benzetmesini yaptığın
yarı çıplak kadın tablosunun iki adım gerisinde
işte aynı sandalye ve sen yoksun.
bak dinle yine çalacak piyanist
kiraz kırmızısı dudaklarını,
buğday sarısı saçlarını,
kocaman gözlerinle umut dolu bakışlarını
içinde sensiz bir tek benin bulunmadığı hayallerimizi…

adi bir serseri bıçağı olup
yokluğunun harcadığı şu müsvette yüreğime
acımasızca bir kez daha saplanan adi sokaklara,
sensizliği kaldırımlarına kazımış şu caddeye,
kokunu hâlâ duvarlarından silememiş bu barlara,
ve dudaklarını dudaklarıma bağışladığın anı
bir fotoğraf karesi gibi içinde barındıran yuvamıza
seni görürüm umuduyla her gece geliyorum
ama sen yoksun…

bu gözler hiç yorulmadı seni aramaktan
bu ben hiç bu kadar beklemedi bu masalarda
boşalan kadehime şarkılarını dolduruyorum
umutlarımızı hayallerimizi meze yapar oldum
rezilce yaşadığım bu hayata, yokluğuna, hasretine…
beni terkedip gittiğin o güne lanet olsun.
hayatımı unuttum sana içiyorum.
sapsarı saçlarını serperdin ya hani
gözlerin mi dolmuş, bu gece ağlıyor musun?

…fotoğraflarınla avunur oldum.
sıcaklığına, bir bebek gibiyim
sevgine hasretim.
bak yine en sevdiğin yemeği ısmarladım
ama sen hâlâ yoksun

INI Dosya Kullanımı

Sohbet | Chat | Sohbet Odalari | Delphi

 

İNİ DOSYA KULLANIMI Çok kullanıcılı bir program yaptınız. programa giren son kullanıcının kim olduğunu onun kişisel ayarlarını ve benzeri bilgileri nerde tutarsınız. bunun için veritabanı kullanmak olmaz. yani olurda ne kadar olur. çoğu program bu tip bilgileri İNİ dosyada tutar. aşağıda örnek bir İNİ dosya içeriği var

[connectDatabase]
Access=ReadWrite
Connect=”DSN=AdvWorks”

[sqlCustomerById]
Sql=”SELECT * FROM Customers WHERE CustomerID = ?”

[connectAuthorDatabase]
Access=ReadOnly
Connect=”DSN=MyLibraryInfo;UID=MyUserID;PWD=MyPass word”

[sql AuthorById]
Sql=”SELECT * FROM Authors WHERE au_id = ?”

[] köşeli parantezin içine yazıların her biri kısım,bölüm(section) olarak adlandırılır.örnekte [connectdatabese] bağlanılacak database hakkındaki bilgileri tutacaktır. onun altındaki diğer seçeneklerden(identy) örneğin “access” veitabanına erişim şeklini tutar “connect” ise bağlanacağı veretabanının DSN’i bulunmakta.

Delphide İNİ Dosya üzerinde işlem yapabilmek için Uses kısmına iniFiles class’ını eklemek gerekir.ini dosya değişkeni olarak kullanacağımız değişken TIniFile tipinde olacaktır.
IniDosya: TIniFile;

tanıttığımız değişkeni Create etmemiz lazım

IniDosya := TIniFile.Create(‘c:\deneme.ini’);

Create ederken zaten hangi dosyayı açacağımızı belirtmiş oluyoruz(deneme.ini)
İNİ dosyadan string bilgi okumak için inidosya.readstring integer bilgi okumak için inidosya.readinteger fonksiyonu kullanılır. örnek

[GENEL]
Kullanıcı Kodu=BIM bilgisini okumak için

Str_Kullanici_Adi := IniDosya.ReadString(‘GENEL’,'Kullanıcı Kodu’,”); dersek

Str_Kullanici_Adi string değişkeninin değeri ‘BIM’ olacaktır. aynı şey integer değişkenler içinde geçerli.

İNİ dosyaya yazma işlemi yapmak için string değişkenler için WriteString integer değişkenler için WriteInteger procedürü kullanılır.

IniDosya.WriteString(‘GENEL’,'Kullanıcı Kodu’,'Mali’); daha sonra
IniDosya.UpdateFile; ile işlemi tamamlıyoruz.

ini dosyalar ile işimiz bittikten sonra IniDosya.Free; ile dosyayı kapatıyoruz.