|
 | | |
| Autor | Správa |
|---|
1115Lukas
Užívateľ
Založený: 30.03.2009
Príspevky: 7
 |  Zaslal: St 29.04.09 13:07 |   |
Dajme tomu ze mam 2 buttony:
Button1:
otvara obycajny textak ( assignFile(t, 'data.txt') .....
Button2:
otvara do niakej bitmapy obrazok ale pomocou TOpenPicDialog ( napriklad nacitam obr z plochy)...
tak a teraz ten problem ked kliknem najprv button1 a potom button2 tak je to v poho ale ak kliknem naopak tak mam pruser lebo nenajde mi data.txt , teda ostal ten "pracovny adresar" nastaveny na ploche... napadlo mi ze by som pri Form create nacital do stringu adresu kde je projekt nahraty.. a potom volal assignFile(t, s + 'data.txt'); ..... len neviem ako to dostat do toho stringu... na to je mozno niaky spec. prikaz fakt netusim
dakujem za radu.... |
| |
  |
|
Fico
Skúsený užívateľ
Založený: 11.01.2009
Príspevky: 1052
| | Zaslal: St 29.04.09 15:34 | |
Presne ako si napísal, pri vytvorení Formu si inicializuj nejakú premennú (string) následovným spôsobom:
| kód: | var s: string;
// ...
s:= ExtractFileDir( ParamStr(0) ); |
Vysvetlenie:
ParamStr(0) - prvý parameter (označuje sa nulou) každej aplikácie obsahuje celú cestu, kde sa táto aplikácia nachádza. Napríklad "C:\Document and Settigns\Uživateľ\Plocha\Project1.exe"
ExtractFileDir - vracia cestu k súboru bez názvu tohoto súboru. Napríklad predchádzajúcu cestu by to upravilo na: "C:\Document and Settigns\Uživateľ\Plocha"
Teda potom už iba stačí súbor načítať takto:
| kód: | | AssignFile(t, s + '\data.txt'); |
|
| |
 |
|
1115Lukas
Užívateľ
Založený: 30.03.2009
Príspevky: 7
| | Zaslal: St 29.04.09 16:34 | |
|
|
|
|
Nemôžete pridávať nové témy do tohto fóra.
Nemôžete odpovedať na témy v tomto fóre.
Nemôžete upravovať svoje príspevky v tomto fóre.
Nemôžete mazať svoje príspevky v tomto fóre.
Nemôžete hlasovať v tomto fóre.
|
| |
