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

drag and drop na ikonicu...

[es] :: Visual Basic 6 :: drag and drop na ikonicu...

[ Pregleda: 1402 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Proko
Martin Hric
St.Pazova

Član broj: 29355
Poruke: 1562
79.101.87.*

Sajt: proko.rs


+28 Profil

icon drag and drop na ikonicu...16.09.2008. u 09:52 - pre 190 meseci
Pokušavam da u VB6 uradim da, kada se na ikonicu aplikacije povuče i spusti ikonica neke slike (jpg,...), otvori tu sliku. Uspeo sam da mi se otvori VB aplikacija, ali kako da dobijem adresu slike. Slika i ne mora da se otvori, treba mi samo njena adresa.
Sve bi to bilo u cilju kačenja slike na internet (ImageShack), gde sam preostali deo koda već uradio, samo mi je još ovo ostalo nerešeno. Varijanta da VB aplikacija bude stalno podignuta ne dolazi u obzir. (Inače, tako mi sve radi, kada na formu spustim sliku.)
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: drag and drop na ikonicu...16.09.2008. u 12:40 - pre 190 meseci
stavi Debug.Print Command u Form_Load....
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
91.148.114.*



+7 Profil

icon Re: drag and drop na ikonicu...16.09.2008. u 13:29 - pre 190 meseci
Kao sto je Aleksandar napisao Command
A ako imas samo Sub Main onda tu procitaj komandnu liniju
Ovako
Code:

Sub Main()
Dim CmdLine As String
CmdLine = Command ' Command je fn koja vraca komandnu liniju programa
If CmdLine <> "" Then MsgBox CmdLine
End Sub

A za glavnu formu ovako
Code:

Private Sub Form_Load()
Dim CmdLine As String
CmdLine = Command ' Command je fn koja vraca komandnu liniju programa
If CmdLine <> "" Then MsgBox CmdLine
End Sub

 
Odgovor na temu

Proko
Martin Hric
St.Pazova

Član broj: 29355
Poruke: 1562
79.101.87.*

Sajt: proko.rs


+28 Profil

icon Re: drag and drop na ikonicu...16.09.2008. u 15:15 - pre 190 meseci
Hvala, probao sam i radi, ali se nešto čudno dešava...kada sve to ubacim u kod i probam korak po korak, procedura se završi do kraja, i dokument (slika) se zakači na NET. Kada idem korak po korak, moram ručno da upišem adresu, napr "C:\slika.jpg". To se pojavi u kontrolnom TextBoxu kao: C:\slika.jpg, dakle, bez navodnika. Kada startujem exe, onda ostaju navodnici, i ne uradi proceduru do kraja. Kako eliminisati znake navoda u stringu?
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
91.148.114.*



+7 Profil

icon Re: drag and drop na ikonicu...16.09.2008. u 15:59 - pre 190 meseci
Ovako
Code:

Private Sub Form_Load()
Dim str As String: str = Chr(34) & "tekst" & Chr(34)
Debug.Print str
'ovako
If Left(str, 1) = Chr(34) Then str = Right(str, Len(str) - 1)
If Right(str, 1) = Chr(34) Then str = Left(str, Len(str) - 1)
Debug.Print str
End Sub

 
Odgovor na temu

Proko
Martin Hric
St.Pazova

Član broj: 29355
Poruke: 1562
79.101.87.*

Sajt: proko.rs


+28 Profil

icon Re: drag and drop na ikonicu...16.09.2008. u 17:45 - pre 190 meseci
Hvala, to je to. Uskoro ću da postavim ceo projekat, možda će nekome trebati...





[Ovu poruku je menjao Proko dana 18.09.2008. u 01:04 GMT+1]
 
Odgovor na temu

Proko
Martin Hric
St.Pazova

Član broj: 29355
Poruke: 1562
93.86.80.*

Sajt: proko.rs


+28 Profil

icon Re: drag and drop na ikonicu...18.09.2008. u 00:05 - pre 190 meseci
Kao što sam i obećao, program je gotov.
Hvala svima na pomoći.
 
Odgovor na temu

[es] :: Visual Basic 6 :: drag and drop na ikonicu...

[ Pregleda: 1402 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

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