ConnectionString Ayarlarını Hakkınd

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
emrekilinc1984
Üye
Mesajlar: 58
Kayıt: 15 Eyl 2016 12:13

ConnectionString Ayarlarını Hakkınd

Mesaj gönderen emrekilinc1984 »

Merhaba arkadaşlar aşağıdaki kodu nasıl toparlayabilirim yardımcı olursanız çok sevinirim.

Kod: Tümünü seç

Var
  GDKullaniciAdi,GDParola,GDVeritabani,GDSunucuAdi: String;
  INIDosya: TIniFile;
begin

  Conn.ConnectionString := ('Provider=SQLOLEDB.1;Password=753951.*/;Persist Security Info=True;User ID=sa;Initial Catalog=SenkoDB;Data Source=10.0.0.12,1433;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=EMREKILINC;Use Encryption for Data=False;Tag with column collation when possible=False')

(*
Begin
   INIDosya        := TIniFile.Create(eYol.Text);
   GDKullaniciAdi  := INIDosya.ReadString('Veritabani_Ayarlari','KullaniciAdi','');
   GDParola        := INIDosya.ReadString('Veritabani_Ayarlari','Parola','');
   GDVeritabani    := INIDosya.ReadString('Veritabani_Ayarlari','Veritabani','');
   GDSunucuAdi     := INIDosya.ReadString('Veritabani_Ayarlari','SunucuAdi','') ;
   INIDosya.Free;
   eKullaniciAdi.Text:=GDKullaniciAdi;
     eParola.Text:=GDParola;
       cbVeritabani.Text:=GDVeritabani;
          eSunucuAdi.Text:=GDSunucuAdi;
end;
*)

  qrymaster.Open;
  qrydetail.Open;

end;
ogzark
Üye
Mesajlar: 6
Kayıt: 14 Kas 2016 03:04

Re: ConnectionString Ayarlarını Hakkınd

Mesaj gönderen ogzark »

s.a.

Toplamaktan kastını anlatabilrsen belki yardımcı olarabirim
Cevapla