alias ımı eklemiyor

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
sga
Üye
Mesajlar: 60
Kayıt: 08 Tem 2005 12:49

alias ımı eklemiyor

Mesaj gönderen sga »

merhaba
installshield express te
objects/merge modules seçeneğinden bde_ent i seçiyorum ve oradan aliasımı tanımlıyorum.fakat programı kurduğumda bde administrator u kurulmuş fakat benim alias ım eklenmemiş oluyor. neden?
ben alias ımı nasıl ekleyeceğim?
sga
Kullanıcı avatarı
hbahadir
Kıdemli Üye
Mesajlar: 544
Kayıt: 06 Ara 2004 05:03
Konum: BURSA idi artık İST.
İletişim:

Mesaj gönderen hbahadir »

Kod: Tümünü seç

var

  MyList: TStringList;
begin
  MyList := TStringList.Create;
  try
    with MyList do
    begin
      Add('SERVER NAME=IB_SERVER:/PATH/DATABASE.GDB');
      Add('USER NAME=MYNAME');
    end;
    Session1.AddAlias('NewIBAlias', 'INTRBASE', MyList);
  finally
    MyList.Free;
  end;
end;
Kullanıcı avatarı
hbahadir
Kıdemli Üye
Mesajlar: 544
Kayıt: 06 Ara 2004 05:03
Konum: BURSA idi artık İST.
İletişim:

Mesaj gönderen hbahadir »

Ek olarak aşağıdaki kodda olmayan bir alias ' ı kontrol edip düzeltmeye yarar (delphi helpinden alıntıdır)

Kod: Tümünü seç

procedure TForm1.ChangeAlias;

var
  AParams: TStringList;
  Dir: string;
begin
  if not Session.IsAlias('MyAlias') then
    begin
      ShowMessage('Alias MyAlias does not exist');
      Exit;
    end;
  AParams := TStringList.Create;
  try
    // get the current PATH parameter
    Session.GetAliasParams('MyAlias',AParams);
    Dir := Copy(AParams.Strings[0],6,255);
    // get the new PATH parameter
    if InputQuery('MyAlias Alias Path','Path:' ,Dir) then

      begin
        // Update the alias parameters
        AParams.Clear;
        AParams.Add('PATH=' + Dir);
        Session.ModifyAlias('MyAlias',AParams);
        Session.SaveConfigFile;
      end;
    finally
      AParams.Free;
    end;
  end;
Kullanıcı avatarı
sga
Üye
Mesajlar: 60
Kayıt: 08 Tem 2005 12:49

Mesaj gönderen sga »

iyide ben bu kodu nereye yazacağım alias olmayınca program hiç açılmıyorki? kod nasıl çalışacak?
sga
Kullanıcı avatarı
hbahadir
Kıdemli Üye
Mesajlar: 544
Kayıt: 06 Ara 2004 05:03
Konum: BURSA idi artık İST.
İletişim:

Mesaj gönderen hbahadir »

Datamodule' ün oncreate olayına olabilir, Uygulaman formları yaratmadan önce koyabilirsin vs...
Kullanıcı avatarı
sga
Üye
Mesajlar: 60
Kayıt: 08 Tem 2005 12:49

Mesaj gönderen sga »

ben yapamadım bunu,zaten pek anlamadım :oops: bunu installshield kendisi zaten yapmıyor mu?
sga
Kaptan
Üye
Mesajlar: 395
Kayıt: 01 Tem 2005 04:02

Mesaj gönderen Kaptan »

Parameter overhieds de şu kodların olması lazım.

PATH=[DATABASEDIR]
ENABLE BCD=FALSE
DEFAULT DRIVER=PARADOX

Driver name i alias name i de seç eklemesi lazım.
Kullanıcı avatarı
sga
Üye
Mesajlar: 60
Kayıt: 08 Tem 2005 12:49

Mesaj gönderen sga »

ben database kısmına tam adresi yazıyordum sizin dediğiniz gibi yapınca oldu.ne farketti anlamadım ama artık aliasım yükleniyor.teşekkür ederim :D
sga
Cevapla