Posts Tagged ‘Kullan’

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.