[ inherited @ 06.09.2006. 16:35 ] @
Kako bih mogao iz programa pozvati textualni fajl, npr. Uputstvo.txt?
Ali da se ne ogranicim na putanju C:\Folder\Uputstvo.txt.
Nego, gde god da se postavi .exe i Uputstvo.txt, mislim na isti folder,
da se moze pozvati iz programa.

Hvala unapred.
[ Bojan Kopanja @ 06.09.2006. 16:45 ] @
Ovako:
Code:
var f: TextFile'
begin
  AssignFile(f, 'Uputstvo.txt');
  //...
[ reiser @ 06.09.2006. 16:58 ] @
Ako mislis da otvoris Uputstvo.txt u notepadu onda ovako:

Code:

ShellExecute(0, nil, 'Uputstvo.txt', nil, nil, SW_SHOWNORMAL);


ili eventualno:

Code:

ShellExecute(0, nil, PAnsiChar(IncludeTrailingBackslash(ExtractFilePath(ParamStr(0))) + 'Uputstvo.txt'), nil, nil, SW_SHOWNORMAL);
[ inherited @ 06.09.2006. 20:11 ] @
Hvala na odgovorima.

Strog@
Ovo ne funkcionise!!!

reiser@
Oba koda koja si postovao funkcionisu. U cemu je razlika izmedju njih?
[ reiser @ 06.09.2006. 22:09 ] @
Paaa ovaj drugi kod "pravi" apsolutnu putanju do Uputstvo.txt fajla, znaci ovaj IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)) u stvari vraca direktorijum gde se nalazi exe fajl.
[ Bojan Kopanja @ 06.09.2006. 23:40 ] @
@inherited

Ovo sto sam ja napisao jos kako funkcionise, ali ti ocigledno nije trebaloto nego ovo sto je reiser napisao... Ja te samo nisam razumeo sta ti je trebalo.
[ inherited @ 07.09.2006. 12:05 ] @
Hvala raiser-u i Strog-om na odgovorima.