Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

putanja prema bazi iz registrija

[es] :: Pascal / Delphi / Kylix :: putanja prema bazi iz registrija

[ Pregleda: 2238 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

prginfo
NS

Član broj: 174814
Poruke: 133
*.ADSL.neobee.net.



+1 Profil

icon putanja prema bazi iz registrija22.05.2008. u 12:28 - pre 192 meseci
Da li je izvodljivo i na koji nacin da kreiram relativnu putanju prema IB bazi (npr. baza.gdb) tako sto ce se pri pokretanju programa iscitavati neki .ini fajl ili putanja iz registrya?

Kako da oznacim da mi treba direktorijum u kom je instaliran program?

U nekom HELPu sam pronasao sledeci kod, ali mi treba objasnjenje:

Code:

uses
 Registry;
procedure TForm1.FormCreate (Sender:TObject);
 var
  Reg:=TRegistry.Create;
  try
   Reg.RootKey:=HKEY_LOCAL_MACHINE;
   IBDatabase1.DatabaseName:=Reg.ReadString ('Rootdir')+\baza.gdb;
  finally
   Reg.Free;
  end;
   Baza.DataSet.Open;
 end;


i zeleo sam da pitam sta tacno radi i na koji nacin funkcionise

ExtractRelativePath


Hvala

[Ovu poruku je menjao savkic dana 22.05.2008. u 19:39 GMT+1]
 
Odgovor na temu

Vic
Error974
BI&SE
Beograd

Član broj: 16118
Poruke: 396
*.imlek.co.yu.



+49 Profil

icon Re: putanja prema bazi iz registrija22.05.2008. u 14:48 - pre 192 meseci
Ako ti se aplikacija zove recimo: Project1.exe napravis fajl Project1.ini. U njemu recimo:

[DATABASE]
path=c:\baza\baza.gdb


U aplikaciji napravis

Code:

procedure getIniFile();
var
  iniFile:TiniFile
  databasePath:string;
begin
  iniFile:= TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini'));
  databasePath:=iniFile.ReadString('DATABASE','path','');
  IBDatabase1.DatabaseName:=databasePath;
end;


Inace Delphi ima odlican help, tako da ces lako naci sta radi ExtractRelativePath (mada je i sam prevod na srpski veoma jasan)




[Ovu poruku je menjao savkic dana 22.05.2008. u 19:34 GMT+1]
ERROR974
 
Odgovor na temu

_CaRtMan_

Član broj: 126731
Poruke: 305
89.146.174.*



+1 Profil

icon Re: putanja prema bazi iz registrija22.05.2008. u 15:02 - pre 192 meseci
Gdje mogu naci taj prevod na srpskom?
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: putanja prema bazi iz registrija

[ Pregleda: 2238 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.