Zengin yedek kulubesi - 3

dbExpress ile muhabbetimize devam ediyoruz. Bir kaç ufak araştırmadan sonra 2 nolu yazıda bağlantı için yazdığımız onlarca parametrenin fazlalığından şikayet etmiştim. Google'da biraz araştırınca TSqlConnection bileşeninin LoadParamsOnConnect özelliğinin bu işe yaradığını öğrendim. Gerçi adı zaten böyle birşeyi çağrıştırıyor ama hazıra alışmışız bi kere :( Neyse efenim, bu parametreyi True yaptığımız vakit Firebird veritabanına bağlanmak için kullandığımız butonun click olayına aşağıdakileri yazmamız yeterli oluyor.

SQLConnection1.Close;
SQLConnection1.CloseDataSets;
ClientDataSet1.Close;
SQLConnection1.ConnectionName :=  'dbExMySql';
SQLConnection1.Open;
ClientDataSet1.Open;
Caption := cntBaslik + ' - Veritabanı :' + cntFirebird;
StatusBar1.Panels[1].Text := cntFirebird;

Bu kolaylığın elbet bize bi getirisi olacaktır. D:\Program Files\Common Files\Borland Shared\DBExpress dizininde yer alan ve bizim ConnectionName değerimize ait olan parametleri içeren dbxconnections.ini dosyasını da programla birlikte dağıtmak zorundasınız. Birinci yöntemde bu dosyaya gerek yok haliyle :) Delphi 7 de bu dosyanın adı da değişmiş olabilir. Hazır dağıtmak falan demişken dbexpress ile yaptığınız programlar kullandığınız veritabanına bağlı olarak bazı dll dosyalarını da programla birlikte dağıtmanızı gerektiriyor. Mesela Interbase/Firebird kullanıyorsanız dbexpint.dll dosyasını ve clientdataset içinde midas.dll dosyasını programla dağıtmanız gerekiyor. Bu dosyaları programa gömmek için uses satırına MidasLib ve dbexpint unitlerini eklemeniz yeterli ama bu birimlerin uluslar arası karakter setleriyle ilgili problemleri varmış. Belirtmekte fayda var... Bugünlük bu kadar muhabbet yeter :)