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

ShellExecute problem

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

[ Pregleda: 3006 | Odgovora: 5 ] > FB > Twit

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 - pre 233 meseci
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
 
Odgovor na temu

IgLo
Igor Lovric
Sremski Karlovci

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

Sajt: www.unicornsoft.net


Profil

icon Re: ShellExecute problem 04.02.2005. u 10:58 - pre 233 meseci
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.
 
Odgovor na temu

Delphin
Sarajevo

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



+1 Profil

icon Re: ShellExecute problem 04.02.2005. u 14:39 - pre 233 meseci
Covjek je potpuno upravu...pozivaj ARJ.EXE a ima fajla koji zelis kompresovati proslijedi kao parametar...
 
Odgovor na temu

edin_jak

Član broj: 45093
Poruke: 33
212.200.53.*



Profil

icon Re: ShellExecute problem 07.02.2005. u 07:27 - pre 233 meseci
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.
 
Odgovor na temu

Peke
Ventis Media Inc.
Novi Sad

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

Sajt: www.mediamonkey.com


Profil

icon Re: ShellExecute problem 07.02.2005. u 20:06 - pre 233 meseci
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, Peke
Speed IO ADSL+ Rezultat
SpeedTest.NET ADSL+ Rezultat
 
Odgovor na temu

edin_jak

Član broj: 45093
Poruke: 33
212.200.53.*



Profil

icon Re: ShellExecute problem 08.02.2005. u 11:39 - pre 233 meseci
Da dosta je bolje.
 
Odgovor na temu

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

[ Pregleda: 3006 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

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