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

ShellExecute problem

[es] :: Pascal / Delphi / Kylix :: ShellExecute problem

[ Pregleda: 1149 | Odgovora: 5 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

edin_jak

Član broj: 45093
Poruke: 33
212.200.53.*



Profil

icon ShellExecute problem 04.02.2005. u 08:10

Imam sledeci problem: pokušavam da izvršim DOS naredbu koja je promenljiva :

arjcommand := '/c arj a ' + destpath + ' ' + sourcefile;
ShellExecute(Handle, 'open', PChar('command.com'), PChar(arjcommand), nil, SW_HIDE);

i nikako da prođe, radi jedino ako je deo "PChar(arjcommand)" oblika PChar('Neka komanda')

Ubih se ne mogu da rešim
04.02.2005. u 08:10 

IgLo
Igor Lovric
Sremski Karlovci

Član broj: 19524
Poruke: 128
*.neobee.net.

Sajt: lovric.narod.ru


Profil

icon Re: ShellExecute problem 04.02.2005. u 10:58
Interesantno, kod mene radi savrseno, sa jednom izmenom.... umesto ARJ, stavio sam punu putanju do ARJ.EXE fajla... mozda je tu tvoj problem? Pazi da kada koristis ARJ da koristis iskljucivo kratka imena foldera,... mozda si kao parametar dao ime foldera sa razmakom, pa ARJ to konta kao dva razlicita parametra.

Usput, zasto koristis command.com da bi pozvao ARJ,... radi savrseno i kada pokreces ARJ direktno?

Ako nista ne uspe sa ove dve ideje od malo pre, posalji ceo kod gde definises ove promenljive arjcommand, destpath i source file i napisi sta im dodeljujes, pa da probamo da resimo.
04.02.2005. u 10:58 

Delphin
Sarajevo

Član broj: 43866
Poruke: 9
*.europronet.ba.



Profil

icon Re: ShellExecute problem 04.02.2005. u 14:39
Covjek je potpuno upravu...pozivaj ARJ.EXE a ima fajla koji zelis kompresovati proslijedi kao parametar...
04.02.2005. u 14:39 

edin_jak

Član broj: 45093
Poruke: 33
212.200.53.*



Profil

icon Re: ShellExecute problem 07.02.2005. u 07:27
Nije problem arj bio je u path-u, nego u putanji za test sam koristio putanju koja u sebi sadži manje od osam karaktera, kao statički string, a kao string koji dinamički menjam bila je putanja koja sadrži više od osam i ima space, pa sam odradio funkciju koja konvertuje windows-ov path u format DOS-a i proradilo je.
07.02.2005. u 07:27 

Peke
Novi Sad

Član broj: 24103
Poruke: 51
*.dialup.neobee.net.



Profil

icon Re: ShellExecute problem 07.02.2005. u 20:06
Evo ti lezernije resenje:
Code:
Procedure ARJ();
Var
  Test : Integer;
begin
  Test := ShellExecute(Application.Handle,'open',ExtractFilename(ArjEXEFiilename),'a '+ExtractShortPathName(destpath)+ExtractFilename(Archivefilename)+' '+ExtractShortPathName(destpath)+'*.*', ExtractShortPathName(ArjEXEFiilename),SW_Hide);
  If Test <= 32 Then // Uraditi ako se desila greska
  Begin
    // Error Handler
  End;
End;


Nadam se da je ovo bolje a i lezernije je stim da imas usput i kontrolu nad greskama.
Pozdrav svima, Peke
07.02.2005. u 20:06 

edin_jak

Član broj: 45093
Poruke: 33
212.200.53.*



Profil

icon Re: ShellExecute problem 08.02.2005. u 11:39
Da dosta je bolje.
08.02.2005. u 11:39 

[es] :: Pascal / Delphi / Kylix :: ShellExecute problem

[ Pregleda: 1149 | Odgovora: 5 ]

 Postavi temu Odgovori

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