Srodne teme

14.04.2024. Re: Gde je Kejt? (samo pogrešni odgovori)
08.07.2004. Poziv storniranih procedura is Access-a ?
13.02.2005. Procedura koja "ceka"
17.06.2010. Kakva je procedura za prenosenje diskova preko gr..
19.04.2005. Delay procedura?
17.12.2012. stored procedura ne radi
19.08.2005. Izvrsavanje SQL-a uz timeout
31.08.2014. Da li ebay.com i ebay.co.uk šalju robu u Srbiju,..
05.10.2005. Firebird PSQL Dokumentacija
07.12.2005. Procedura oko ugostiteljskog objekta ?

Navigacija

Brisanje liste

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

Svijesna procedura

[es] :: Visual Basic 6 :: Svijesna procedura

[ Pregleda: 4617 | Odgovora: 3 ] > FB > Twit

Autor

Skulltor
Nemoj me krivit
zg , hr

Član broj: 13208
Poruke: 29
*.cmu.carnet.hr

Profil

Svijesna procedura

^{05.09.2003. u 13:49 - pre 251 meseci}

Zanima me kako da napravim da procedura u nekom modulu
zna iz koje je forme pozvana.

Naprimjer imam form1,2 i 3 te proceduru proc1 u modulu1.
Kada se u form1 klikne na gumb on pozove proceduru1
u modulu1 a ona pozove msgbox u kojem pise
procedura je pozvana iz form1 isto tako kad bi
se kliknulo na gumb u form2 ili 3.

We can't afford to be neutral on a moving train.

SOAD

Odgovor na temu

ssteva
Beograd

Član broj: 12533
Poruke: 55
*.jugopetrol.co.yu

Profil

Re: Svijesna procedura

^{05.09.2003. u 14:13 - pre 251 meseci}

Probaj ovo:

Code:

Sub procedure1(FORMA as Form)
Msgbox "Procedura je pozvana iz " & FORMA.Name
end sub

Proceduru pozivas ovako:

Code:

Sub Command1_Click()
Call procedure1(Me)
end sub

Pozdrav

Odgovor na temu

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.yubc.net

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz

Profil

Re: Svijesna procedura

^{05.09.2003. u 14:37 - pre 251 meseci}

Moze kao sto je napisao ssteva, s tim sto bi ja deklarisao procedure1 ovako (ako vec prosledjujes objekat - univerzalnije je), a poziv je isti kao u sstevinoj poruci:

Code:

Sub procedure1 (Src as Object)
Msgbox "Procedura je pozvana iz " & Src.Name
end sub

a mozes i ovako:

Code:

Sub procedure1 (Src as String)
Msgbox "Procedura je pozvana iz " & Src
end sub

a pozivas ovako (za forme i klase)

Code:

call procedure1 (Me.Name)

a ako zoves iz modula onda prosledis naziv modula

Blue Man Group

Odgovor na temu

Skulltor
Nemoj me krivit
zg , hr

Član broj: 13208
Poruke: 29
*.cmu.carnet.hr

Profil

Re: Svijesna procedura

^{05.09.2003. u 15:01 - pre 251 meseci}

Hvala.
Jos jednom ste mi skratili muke.