[es] - Open with / Wincmd F4

-wx-
Beograd

Član broj: 1766
Poruke: 34
*.beograd-1.tehnicom.net

Jabber: wx@jabber.com
ICQ: 166638118

Profil

^{15.08.2002. u 01:12 - pre 264 meseci}

Ok, znaci napravio sam text editor slicno kao Notepad. E sad u Windows Commander-u kad se selektuje fajl pristiskom na F4 pokrece se Notepad i otvara taj fajl.

Mene zanima sta treba da uradim sa mojim programom da bi on mogao da radi isto. Kad ocu da otvorim nesto stavim Open with QuickEdit.exe i da on to otvori.

Text se otvara u txtQuickEdit a kod za otvaranje je:

Dim BUFFER As String
Dim NRFILE As Integer
frmMain.txtQuickEdit.Text = ""
NRFILE = FreeFile
Open FilePath.Text For Binary As NRFILE
While Not EOF(NRFILE)
BUFFER = Space(2048)
Get NRFILE, , BUFFER
BUFFER = frmMain.txtQuickEdit.Text & BUFFER
frmMain.txtQuickEdit.Text = BUFFER
Wend
Close NRFILE

Verovatno treba neki kod za Command Line (QuickEdit.exe -open %1) ili slicno.
Zna li neko?

'This is a unique time in our history, in the history of any civilization, it's the moment of the acquisition of technology, that's the moment when contact becomes possible'

Odgovor na temu

degojs

Član broj: 4716
Poruke: 5096

+51 Profil

Re: Open with / Wincmd F4

^{15.08.2002. u 07:10 - pre 264 meseci}

Nisam siguran da li je pitanje vezano za VB ili Win Commander?

Ako zelis da procitas argumente koji se zadaju iz komandne linije ucinices to pomocu Command$.
Jednostavno ako svoj program startas sa npr.
myprog.exe -a -b -c d:\temp\aaa.txt

odradi jedno msgbox(command$) da vidis sta tu ima...

HTH

Commercial-Free !!!

Odgovor na temu

-wx-
Beograd

Član broj: 1766
Poruke: 34
*.beograd-2.tehnicom.net

Jabber: wx@jabber.com
ICQ: 166638118

Profil

Re: Open with / Wincmd F4

^{15.08.2002. u 21:19 - pre 264 meseci}

Hvala na odgovoru, pokusacu tako.

'This is a unique time in our history, in the history of any civilization, it's the moment of the acquisition of technology, that's the moment when contact becomes possible'

Odgovor na temu