basic.208gmatic,
-> #203, drejk==> 'teo sam, darthe, da crtkam sa LINE :))
==> al, ko sto reche gmatic, pogledacu u helpu :)
Koristi relpy molim te.
Da bi te svi razumeli.
basic.209gmatic,
-> #205, darth.vader==> Sta si bre dosao ovde da pljujes po Basicu i da hvalis C ?
==> Idi bre u neku drugu temu !
Tako je!
Reci im samo ti!
Meni je Basic dovoljan za moje potrebe.
Kad mi nesto vise zatreba ucicu.
basic.210hadzi,
Hi, folks!
Heeeeelp folks! Uzeh VB 5.0 i u njemu kompajlirah moj Blokcic+. Ali (uvek
jedno ALI!), bilo bi suvise lako kada bih to uspeo. Naime, moj blokcic snimi
text i/ili ucitava ga kao string (znate ono "Ovo nikako ne....", izmedju
navodnika). Kako ovo da, resim? Kako da skinem te znake navoda?
Pozdrav,
HADZI :(
P.S.
verybad$ = good$ + bad$
basic.211dr.grba,
-> #200, sabre>> VB je SHIT!!!
Kad ti kažeš, onda mora da je tako. (:
>> Kazem ti imam verziju 5.0 mozda moze da radi u 256
>> boja ali je nevidjeno spora!
Pa tvrdio si da može samo 16 boja. Šta je sad odjednom, 256? Da se
ganjamo još tri dana, pa ćeš možda reći da VB može da radi samo sa 16
miliona boja, a? (:
>> C++ 5.0 je zakon za sve visual
>> programe mada je pretezak!
Da, C++ se obično uvek poredi sa VB jezicima (:
>> Nesto izmedju je delphi koji je n puta
>> tezi od basica ali je zato toliko puta i brzi...
Delphi nema teret koji ima VB, napisan je de facto od nule. Zato je
uspeo da razreši mnoge probleme mnogo lepše i lakše nego VB, no opet,
poenta NIJE u tome...
>> A inace malo je
>> poznatih programa koje mi poznajemo pod win95-icom je pravljeno u
>> VB, skoro su svi pravljeni u visual c-u!
A sad, šalu na stranu. Pokušajmo malo da budemo racionalni.
Činjenica je da ti VB doživljavaš čista srca, kao ad-hoc programer,
misleći da je svaki programski jezik namenjen da rešava sve, pa kom
opanci, kom obojci.
A nije tako.
Visual Basic nije *prevashodno* namenjen pisanju programa i programčića
sveopštih namena za vaskoliko tržište. Naravno, ima takve mogućnosti i
mnogi uspešno koriste svoje programersko znanje pišući razne korisne
stvarčice u VB. Takve programe smo, uostalom, imali prilike da vidimo
i na Sezamu.
Fakat je da bi se sve to moglo programirati i u Delphiju ili u C++ ili
u ne znam ni ja čemu još. I bilo bi možda brže, možda "bolje" (ova reč
u informatici ipak teško prolazi bez argumenta), možda bi programer
ispao pametniji i lepši i za njega bi se kačile bolje cure (:
No, rasprava o takvim stvarima bi bila promašena, baš kao što je i
promašeno tvoje poređenje C++ i VB.
VB nije shit. VB je dobro osmišljen i veoma konzistentno projektovan
jezik programiranja namenjen prevashodno programiranju integrisanih
rešenja u poslovnom okruženju. Integrisanim rešenjima, prema
terminologiji Microsofta, smatraju se programske konstrukcije koje se
sastoje od koda, modula, dokumenata, i drugih bog-te-pita elemenata,
među kojima dominiraju gotovi delovi koji su rezultati rada programa
paketa Microsoft Office i njemu kompatibilnih programa.
Takav sistem je podvrgnut nizu veoma oštrih i jasnih specifikacija
definisanih prema projektnom zahtevu softverskog sistema koj itreba da
zadovolji potrebe u poslovnom sistemu (kako se danas popularno kaže:
WhitePaper).
Visual Basic se tu pojavljuje kao centralna figura u brzom i EFIKASNOM
rešavanju konkretnih problema konstruisanja integrisanih rešenja. U
tome mu na tržištu nema premca. Postojenje Visual Basica 3.0 je
SIGURNO jedan od važnijih razloga što je Microsoft Office 4.3 prodat u
12 miliona primeraka samo na angloameričkom tržištu do pojave Officea 95.
Priča ide i dalje. Visual Basic 5, Enterprise Edition, predstavlja
moćnu alatku za projektovanje i izvođenje složenih integrisanih
rešenja u klijent-server arhitekturi. Na strani klijenta MS Office 97.
Na strani servera Windows NT i BackOffice. Projektivni zahvat:
cirkulacija informacija u Intranetu, sa distribucijom kroz Information
Server. Peeping na Web, poneki upit na SQL Server, bla-bla...
VB radi u ovakvoj okolini mnogo posla, i to toliko efikasno da ne bi
verovao.
Izvini na čaršavu. Ako si došao do kraja ove poruke, zahvaljujem ti na
strpljenju. Nadam se da ćeš nakon ovoga bar na trenutak pomisliti da
VB ipak nije baš toliki shit kakvim ga ti smatraš.
basic.212gmatic,
-> #210, hadzi==> Heeeeelp folks! Uzeh VB 5.0 i u njemu kompajlirah moj
==> Blokcic+. Ali (uvek jedno ALI!), bilo bi suvise lako kada bih
==> to uspeo. Naime, moj blokcic snimi text i/ili ucitava ga kao
==> string (znate ono "Ovo nikako ne....", izmedju navodnika).
==> Kako ovo da, resim? Kako da skinem te znake navoda? Pozdrav,
Sto bi moj bivsi profa rekao "Uvek postoji jedno ali so devojci
srecu kvari".Nije bitno.
Probaj ovo:
a$-ucitani string sa navodnicima
b$-ono sto ti treba
a-broj znakova(nije bitno)
a=len(a$)
b$=mid$(a$,2,a-1)
Probaj mislim da ce raditi.
basic.213sabre,
-> #211, dr.grbaOK ako je VB tako dobar program imam za tebe jedan zadatak...
Slusaj ovako...
Ocu da uradis scroll ekrana u rezoluciji 1024x786 u 256 boja 60
puta! Znaci da skrolujes neki bitmap maximalnom brzinom ili da
budem precizniji brzinom osvezavanja ekrana!
Ako ovo uradis u VB skidam ti kapu i prelazim da radim u VB...
Inace ja sam uspeo na mojoj masini sa grafickom od 2 rama da
skrolujem ekran 5 frame-ova u sec! 60 je neizvodljivo!!!
basic.214dr.grba,
-> #213, sabre>> Ocu da uradis scroll ekrana u rezoluciji 1024x786 u 256 boja 60
>> puta! Znaci da skrolujes neki bitmap maximalnom brzinom ili da
>> budem precizniji brzinom osvezavanja ekrana!
Zar bi ti ovakav problem rešavao u Visual Basicu? Ja ne bih.
>> Ako ovo uradis u VB skidam ti kapu i prelazim da radim u VB...
Ja nemam nameru da ti dokazujem svoje veštine. Probao sam da
razgovaram za tobom vrlo razložno. Međutim, ti ne slušaš šta
ti se govori. Spreman sam da prihvatim svaki protivargument, a
hvala bogu, u ovoj konferenciji je uvek bilo takvih rasprava.
>> Inace ja sam uspeo na mojoj masini sa grafickom od 2 rama da
>> skrolujem ekran 5 frame-ova u sec! 60 je neizvodljivo!!!
Zbog ovakvog pristupa i imaš iskrivljenu sliku o tome čemu šta služi.
Niko ko ima sliku o tome šta koji sistem programiranja radi, ne bi ni
pomislio da rešava hardverski zavisne stvari u Visual Basicu.
Uzgred, kod mene je frekvencija osvežavanja 75 Hz u HiColoru, na istoj
rezoluciji, tako da mi nije jasno u čemu bi bila univerzalna primena
fiksiranja skrola ekrana na 60 puta.
I drugo uzgred:
Ako želiš da mi repliciraš od sada, molim te da malo spustiš ton.
Nemam nameru da se svađam sa tobom po ovom pitanju. Spreman sam
jedino na razložan razgovor.
basic.215hadzi,
Hi, folks, again!
'El zna neko kako se u VB-u 5 skroluje slika unutar prozorceta (rama) za
slike? Mnogo bi mi pomogli neki detalji!
Pozdrav,
HADZI :o
P.S.
Call ScrollScreen(1, 120)
basic.216sabre,
-> #214, dr.grba>> Ako zelis da mi repliciras od sada, molim te da malo spustis ton.
>> Nemam nameru da se svadam sa tobom po ovom pitanju. Spreman sam
>> jedino na razlozan razgovor.
Sorry covek ali ne mogu da spustam ton kad neprekidno hvalis VB...
Moje misljenje je da je VB spor i zato ga ne koristim... Ako tebi
odgovara meni je OK! Ali imam pravo da iznesem svoje misljenje o
Visual Basicu i Delphiu i da postavim paralelu koji je program
bolji i ekonomicniji za rad...
basic.217vule.,
-> #215, hadziJel mislis na PictureBox ?
Ako jeste,onda evo resenja:
sve se to moze resiti pomocu PictureClip-a,jednog ScrollBar-a i PictureBox-a
(moze i Image)
Cela caka je u tome da ti isecak iz PictureClip-a pomeras po PictureBox-u.
Evo konkretnog primera:
Podesis za Picture1 ScaleMode= 3-Pixel
Ubacis sliku u PictureClip i u PictureBox,
pa onda ide dalje...
Sub Form_Load ()
vscroll1.Max = picture1.Height / 20 - 1
picclip1.ClipX = 1
picclip1.ClipY = 1
picclip1.ClipHeight = picture1.Height / 11
picclip1.ClipWidth = picclip1.Width - 1
picture1.Picture = picclip1.Clip
End Sub
Sub VScroll1_Change ()
picclip1.ClipY = vscroll1.Value
picture1.Picture = picclip1.Clip
Nisam siguran za ispravnost koda jer je pisan u VB v3.0 ali
mislim da ces shvatiti...
basic.218gmatic,
-> #216, sabre==> Sorry covek ali ne mogu da spustam ton kad neprekidno hvalis
==> VB... Moje misljenje je da je VB spor i zato ga ne
==> koristim... Ako tebi
Pa spor je za nseto ali za druge stvari je super.
Dzabe je prepirati se oko toga nego recite lepo zasta ga ko
koristi (to jest sta ko pravi) pa vidite.
basic.219vule.,
-> #217, vule.Ooops !
Ovo radi jedino u veoma retkim slucajevima !
Moram da upozorim na gresku u KODU koji sam dao....
Nadam se da cete je primetiti i ispraviti....
Ovo radi, ali 1/20 slike koja se scroll-uje se nece videti,pa...
Nadam se da mi necete zameriti.
basic.220darth.vader,
-> #211, dr.grba
.......
>> Visual Basic se tu pojavljuje kao centralna figura u brzom i EFIKASNOM
>> resavanju konkretnih problema konstruisanja integrisanih resenja. U
.......
>> VB radi u ovakvoj okolini mnogo posla, i to toliko efikasno da ne bi
>> verovao.
.......
To Grbo majstore, ti si nas idol :)
Objasnio si mu ga svetski ;)))
BTW, ne verujem da ce taj da procita celu poruku...
See ya, Darth :)
basic.221darth.vader,
-> #203, drejk>> 'teo sam, darthe, da crtkam sa LINE :))
>> al, ko sto reche gmatic, pogledacu u helpu :)
Aaaaa, line te koci... Pazi vako...
Otkucas LINE i strelicama dovedes kursor na L ili bilo gde na tu komandu,
i pritisnes F1, i on ti da help, kako glasi sintaksa, neki primer i tako to...
Za svaku naredbu mozes da pritisnes F1 i da ti on da detaljno objasnjenje
o toj naredbi.
To ti pricam da se ne bi bacao po Index-u helpa, koji ja koristim iskljucivo
ako zelim da uradim nesto sto ne znam, pa trazim komandu...
See ya, Darth :)
basic.222darth.vader,
-> #204, drejk>> u jednom programchicu otvaram datoteku za upis...
>> i sad, kako da joj (valjda komandom append) naredim da se podaci
>> 'nadovezuju' tj. da mi ne obrishe svaki put datoteku i upishe nov podatak.
Open "imefajla.ext" for APPEND as #broj
See ya, Darth :)
basic.223darth.vader,
-> #210, hadzi>> jedno ALI!), bilo bi suvise lako kada bih to uspeo. Naime, moj blokcic
>> snimi text i/ili ucitava ga kao string (znate ono "Ovo nikako ne....",
>> izmedju navodnika). Kako ovo da, resim? Kako da skinem te znake navoda?
Pa da... To je posledica komande WRITE... Kod PRINT se top ne desava...
Probaj sa PRINT #broj, a$
See ya, Darth :)
basic.224sabre,
-> #220, darth.vader>> BTW, ne verujem da ce taj da procita celu poruku...
Zamisli "taj" je procitao celu poruku... Ali "tome" i dalje nije
jasno sta to basic moze, a pascal ili c ne mogu?!?
basic.225gmatic,
-> #224, sabre==> Zamisli "taj" je procitao celu poruku... Ali "tome" i dalje
==> nije jasno sta to basic moze, a pascal ili c ne mogu?!?
Pascal i c mogu sve to ali je mnogo teze coveku koji je navikao na
basic da predje na iste pa koriste ovo jer je lakse. A za neke stvari
je i dovoljno.
basic.226sani.,
'fala darthe... :)
basic.227dr.grba,
-> #224, sabre>> Zamisli "taj" je procitao celu poruku... Ali "tome" i dalje nije
>> jasno sta to basic moze, a pascal ili c ne mogu?!?
Može da iskoristi bazu makroa pisanu u VBA.
basic.228gmatic,
-> #226, sani.==> 'fala darthe... :)
Izvini a sto ne koristis reply?
Lakse svima da shvatimo kome je poruka upucena a i ti nemoras da
pises kome zahvaljujes.
basic.229sani.,
sorry gmaticu, ne koristim trenutno sor, pa ne mogu da replyiram
(a mrzi me da trazim brojeve poruka), nego darthe, u mojoj verziji
qbasica nema taj tip helpa koji si ti pomenuo, da se pritisne f1 na
komand űi...
pozdrav...
basic.230sani.,
kako da prochitam iz sekvencijalne datoteke podatak, ili da po
odredjenom svojstvu iz sek.datoteke 'biram' podatak.
pozdrav
basic.231vule.,
-> #224, sabreNe "nemogu" nego nemaju....
JEDNOSTAVNOST PROGRAMIRANJA
basic.232gmatic,
-> #229, sani.==> sorry gmaticu, ne koristim trenutno sor, pa ne mogu da
==> replyiram
A zasto crni sinko? Pa skini ga.
basic.233zeljkoj,
-> #195, drejk> pazite ljudi...
> imam qbasic, i sad kad 'ocu da nacrtam nesto, on nesto meni
> ILLEGAL... kako to bjeshe, znao sam ranije to reshiti?
Da li na početku postaviš grafički mod sa SCREEN?
Npr, SCREEN 12 za 640x480x16, ili SCREEN 13 za 320x200x256.
Tek onda možeš da koristiš LINE, DRAW, CIRCLE, PALETTE, itd.
basic.234nenad,
-> #207, gmatic> E pa lepo na vise strana.
Šta na više strana? Rekoh da to ne utiče ništa, sve se tretira
kao jedna forma.
basic.235nenad,
-> #211, dr.grba> Delphi nema teret koji ima VB, napisan je de facto od nule. Zato je
> uspeo da razreši mnoge probleme mnogo lepše i lakše nego VB, no
> opet, poenta NIJE u tome...
Hm, koliko je meni poznato Delphi nije napisan od nule već se u
velikoj meri oslanja na stari Turbo Pascal kompajler, što je,
međutim, više prednost nego mana. Turbo Pascal je bio revolucija
kada se pojavio upravo zbog izuzetno brzog kompajlera.
Interesantno je da kažu da i "Delphi za C++" (Builder) postiže
slične rezultate. Šteta što nije Microsoft-ov, bio bi mu
zagarantovan uspeh. ;)
S druge strane VB je prilično "od nule" urađen posao što možda i
jeste njegova osnovna mana - tek u verziji 5 MS je doneo neka
poboljšanja što se brzine tiče.
> Fakat je da bi se sve to moglo programirati i u Delphiju ili u C++
> ili u ne znam ni ja čemu još. I bilo bi možda brže, možda "bolje"
Pa brže bi bilo sigurno, a da li bi bilo i bolje to ipak najviše
zavisi od programera. :) Osnovni balast VB-a je što on nije pravi
kompajler već generiše među-kod koji run-time okruženje posle
interpretira. Nešto slično kao i Java. Interesantno je da MS
(konkretno - Bil Gejts) tu osobinu Jave navodi kao jedan od
osnovnih razloga zašto ona nije dobra za real-world aplikacije i
zašto neće uspeti. ;)
> VB nije shit. VB je dobro osmišljen i veoma konzistentno
> projektovan jezik programiranja namenjen prevashodno programiranju
> integrisanih rešenja u poslovnom okruženju.
VB kao jezik je prilično nedorečen i nedorađen (uz ogradu da
malo znam o verziji 5, osim da je spantic rekao da će ona
predstavljati kraj C programiranja ;). Iako se zasniva na
objektima (object-based) on nije objektno orijentisan što otežava
njegovu primenu u kompleksnim i velikim projektima, naročito kada
se radi o održavanju. Skoro sam bio našao jedan interesantan
primer na Internetu o tome, vrlo je egzaktan i na lepom primeru
objašnjava zašto je OO projetkovanje bolje od ne-objektnog
(slučajno su akteri bili upravo VB i Delphi).
basic.236gmatic,
-> #234, nenad==> Sta na vise strana? Rekoh da to ne utice nista, sve se
==> tretira kao jedna forma.
Pa uradi kao vise formi. Razdeli to malo. Kao na primer ovde
podesavas boje pa sledeca opcija ovde zvuk...
Malo improvizujesh.
basic.237vule.opaki,
Jel zna neko da li Visual Basic 3.0 za Windows
moze da radi u 3.1 CEE na 286 1 MB RAM-a i herculesu!
Ako moze, koliko ce brzo raditi. I koliko zauzima disketa.
I jel ga vredi uzimati, mislim, imam vb za dos i prezadovoljan
sam . Jedino me nervira sto ne mogu da se ubacuju slike. Cuo sam da
se u windowsu to lako radi, pa me interesuju kakve su mu jos
prednosti! Da li ga vredi uzimati ,s obzirom da ce verovatno
sporije raditi!
Ajd cao!
e, i jos nesto! Neko je bese pisao nesto slicno ovome "Sta moze da
se uradi u VB sto ne moze u C i Delphi"
E pa za gospodina imam poruku:
"AAAAAAAAAAAAAAAAAAAAA KAKO ME NERVIRAS!!!! IDU U SAVEZNU SKUPSTINU
PA TAMO SERI A NEMOJ NAMA DA SOLIS MOZAK U MIROLJUBIVOJ
KONFERENCIJI KOJA JE ZADUZENA DA POMAZE LJUDIMA A NE DA IM KIDA
ZIVCE!!!!!!! STA TEBE BRIGA STA MOZE VB A STA NE MOZE! IDI KUCI ,
IGRAJ TETRIS I OSTAVI NAS NA MIRU!!!!!!"
S ljubavlju tvoj iskreni prijatelj:
Vule OPAKI.
Najopakiji od svih opakih tipova!
Koji mnogo voli Quick i Visual Basic!
I zato i salje poruke u ovu konferenciju!
UH!
basic.238darth.vader,
-> #229, sani.>> (a mrzi me da trazim brojeve poruka), nego darthe, u mojoj verziji
>> qbasica nema taj tip helpa koji si ti pomenuo, da se pritisne f1 na
>> komandűi...
Kako bre nema prijatelju ? Koji qbasic koristis uopste ?
Koliko znam, to ima i onaj DOS-ov qbasic interpreter, a i novije
verzije paketa sa kompajlerima bi trebalo da sadrze taj help.
Meni to radi u verziji 4.5
Ako tebi ne radi, pokusaj da nabavis istu...
See ya, Darth :)
basic.239nenad,
-> #236, gmatic> Pa uradi kao vise formi. Razdeli to malo. Kao na primer ovde
> podesavas boje pa sledeca opcija ovde zvuk...
>
> Malo improvizujesh.
Ne bih se toga nikad setio. ;) Koje su uostalom druge opcije?
- "Ova kola su spora!"
- "Pa kreni ranije, snađi se, improvizuj malo!". ;)
basic.240vule.,
-> #237, vule.opaki│ Jel zna neko da li Visual Basic 3.0 za Windows
│ moze da radi u 3.1 CEE na 286 1 MB RAM-a i herculesu!
za 286 i 1Mb RAM-a nisam siguran, ali za Hercules i 3.1 CEE 100% !
Prijateljski savet:Zameni 286 na barem 386(kao sto sam i ja) i po
moguctsvu da uzmes 4Mb-a(mada se sa 386 to moze srediti VIRTUELNOM
MEMORIJOM) i veruj mi bice ti mnogo lakse raditi i programirati...
│ I jel ga vredi uzimati, mislim, imam vb za dos i prezadovoljan
│ sam . Jedino me nervira sto ne mogu da se ubacuju slike. Cuo
│ sam da se u windowsu to lako radi, pa me interesuju kakve su mu
│ jos prednosti! Da li ga vredi uzimati ,s obzirom da ce
│ verovatno sporije raditi!
1. Sa VB-om za Win( 3HD za ST ili 9HD za PRO verziju) bices odusevljen...
2. Sto se slika tice,lako se ubacuju(2xklika), a sa malo koda VEOMA dobro
EDITUJU.
3. Windows programiranje je za otprilike 80% lakse od DOS-a.
4. Prednosti? Dugacak odgovor, cim ga startujes videces...
5. Da vredi to obavezno, a da li je brz to zavisi od programera...
│ PA TAMO SERI A NEMOJ NAMA DA SOLIS MOZAK U MIROLJUBIVOJ
└────────────────────────────────────────────^^^^^^^^^^^^
Posle ovoga vise nije...
I u potpunosti te podrzavam...
NADAM SE I OSTALI !
basic.241dr.grba,
-> #235, nenad>> se radi o održavanju. Skoro sam bio našao jedan interesantan
>> primer na Internetu o tome, vrlo je egzaktan i na lepom primeru
>> objašnjava zašto je OO projetkovanje bolje od ne-objektnog
>> (slučajno su akteri bili upravo VB i Delphi).
Jesi li sačuvao to? Daj da vidimo.
basic.242dr.grba,
-> #237, vule.opaki>> Jel zna neko da li Visual Basic 3.0 za Windows
>> moze da radi u 3.1 CEE na 286 1 MB RAM-a i herculesu!
Može, barem teoretski, mada mi je specifikacija trenutno
udaljena... Da ne grešim dušu, proveriću posle, ali mislim
da je navod o minimalnoj konfiguraciji podrazumevao 286 i
2 MB RAM. Hercules nije problem.
>> Ako moze, koliko ce brzo raditi. I koliko zauzima disketa.
Radiće sporo, vrlo verovatno. Instalacija VB 3.0 Prof. zauzima
9 disketa x 1.44 MB.
>> "AAAAAAAAAAAAAAAAAAAAA KAKO ME NERVIRAS!!!! IDU U SAVEZNU SKUPSTINU
E, ovo ti baš i nije bilo protrebno. Nema potrebe da svoje lične
opservacije prema nekome izlažeš biulo gde drugde osim u ličnoj
poruci dotičnom. Budi drug, nemoj to ponovo da radiš.
basic.243sani.,
eee, darthe, ispravka, ima to i u mojoj verziji qbasica, ali
postize se sa
SHIFT+F1, al, to pokazuje isto kao i u indexu komandi, tako da i
nije
nesto neophodan... jedino ustedjuje vreme, i nema primera, ima samo
sintaxa komande.
nego, nisi mi reko, kako da iz sekvencijalne datoteke izlistam
podatke prema odgovarajucem svojstvu??
i moderatore, sankcionishi malo.
(ne mene ;)
basic.244vule.,
-> #243, sani.│ nego, nisi mi reko, kako da iz sekvencijalne datoteke izlistam
│ podatke prema odgovarajucem svojstvu??
└─────────────────────────────────────────────────────────────────
Svojstvu ?
malo mi to pojasni...ne znam na sta mislis...
I sta to bese Sekvencijalne ? to ono sa RANDOM ?
Cekam...
basic.245gmatic,
-> #237, vule.opaki==> Jel zna neko da li Visual Basic 3.0 za Windows
==> moze da radi u 3.1 CEE na 286 1 MB RAM-a i herculesu!
386 4Mb a za grafiku neznam ali oce valjda i na Hercules ako i win oce.
basic.246gmatic,
-> #239, nenad==> Ne bih se toga nikad setio. ;) Koje su uostalom druge opcije?
==> - "Ova kola su spora!"
==> - "Pa kreni ranije, snadi se, improvizuj malo!". ;)
-"Kupi avion!" iliti plati nekog da ti napravi program u delphima ;)
basic.247gmatic,
-> #244, vule.==> I sta to bese Sekvencijalne ? to ono sa RANDOM ?
Da.
basic.248vule.,
Ako se bavite VB-om ili Obicnim BASIC-om i ako NE zelite da vam
zivot zagorcavaju ostali...
MAIL vule.
za uclanjenje u grupu BASIC !
basic.249zeljkoj,
-> #247, gmatic> ==> I sta to bese Sekvencijalne ? to ono sa RANDOM ?
>
> Da.
Ne. Te ('sa random' ;), su, kao što i sama reč kaže, datoteke sa
direktnim (slučajnim) pristupom. Znači, radi se sa GET/PUT, pri čemu se
navodi broj sloga kome se direktno pristupa.
Sekvencijalne su one koje moraš da čitaš/pišeš redom (one koje se
otvaraju običnim FOR INPUT ili OUTPUT, a ne RANDOM). U njih se upisuje
običnim PRINT# (ili WRITE# ako se želi da podaci budu ograničeni znacima
navoda što je vrlo korisno ako sadrže zarez, pošto se on koristi
za razdvajanje polja u slogu, pa bi ako se koristi PRINT došlo do greške).
Čitaju se običnim INPUT#.
Da napomenem da sintaksa tipa OPEN "xyz" FOR RANDOM AS #1 LEN = 72
radi samo u novijim BASICima. Ako se piše program koji treba da radi i
u GWBASIC-u, ili možda na nekom drugom kompjuteru (TIM 011, Spectrum...),
bolje je koristiti tradicionalnu sintaksu OPEN "R", #1, "xyz", 72
Ono 72 je u oba slučaja dužina sloga (u bajtovima), što se ne mora navesti.
Podrazumevana veličina je 128, što znači da će se, ako vam je slog kraći,
gubiti dosta mesta na disku.
Ako pišete program koji treba da radi u multitasking okruženju ili pod mrežom,
pametno je da koristite prvu sintaksu, jer možete zadati još i opcije
vezane sa pristup i file sharing (npr. ACCESS READ SHARED).
basic.250zeljkoj,
-> #248, vule.> MAIL vule.
> za uclanjenje u grupu BASIC !
A zašto ne biste pisali u konf? Poruke će čitati mnogo više ljudi, dobijaćete
više odgovora, a što je najvažnije, sve to će ostati na sistemu.
basic.251sani.,
nego, kako se koriste biblioteke u qbasicu, imam par
nesto valjda treba sa link.exe ali... ne ide mi, i sta sve one
pruzaju??
basic.252nenad,
-> #241, dr.grba> >> objašnjava zašto je OO projetkovanje bolje od ne-objektnog
> >> (slučajno su akteri bili upravo VB i Delphi).
>
> Jesi li sačuvao to? Daj da vidimo.
Možda jesam, ali ako i nisam mislim da ću umeti da nađem. Znači
sutra ili prekosutra, nadam se... :)
basic.253sani.,
bre, kazem, űiz datoteke ocu da recimo omogucim korisniku da
izlista one podatke koji recimo pochinju odredjenim slovom ili tako
nesto... dakle selektivno listanje podataka iz datoteke...
pozdrav
basic.254zeljkoj,
-> #251, sani.> nego, kako se koriste biblioteke u qbasicu, imam par
> nesto valjda treba sa link.exe ali... ne ide mi, i sta sve one
> pruzaju??
Umesto da neke procedure i funkcije koje koristiš u svom programu pišeš
u samom .BAS fajlu, možeš ih posebno kompajlirati (u .OBJ fajlove) i onda
sve zajedno povezati u jedan fajl - biblioteku. Dakle, .LIB je kolekcija
.OBJ-a. Šta se ovim dobija? Kada imaš neke procedure ili funkcije koje često
koristiš (recimo u svakom projektu koji pišeš), glupo bi bilo uvek ih
stavljati u BAS fajl projekta - samo se nepotrebno povećava njegova veličina,
smanjuje preglednost i povećava vreme kompajliranja. Zato se one na opisani
način povežu u biblioteku, a u samom izvornom kodu ih nema. Jedino je na
početak programa potrebno staviti njihove deklaracije (DECLARE SUB... odnosno
DECLARE FUNCTION...), kako se kompajler ne bi bunio što u programu koristimo
nepostojeću proceduru/funkciju. Program zatim kompajliramo u .OBJ kao i obično.
Tek u procesu linkovanja dodaju se one nedostajuće proc/funkc (uzimaju se
iz biblioteke), i dobija se ispravan .EXE fajl.
Postoje razne, već gotove biblioteke, sa raznim korisnim funkcijama i
procedurama (neke možeš naći i u diru). Naravno, one ne moraju biti
pisane u BASIC-u (i najčešće nisu, zbog brzine).
Primer:
Recimo da imaš gotovu biblioteku BIB.LIB, i želiš da iz nje u svom programu
koristiš proceduru ShowUserData, koja ima argument User$. U izvornom fajlu
(recimo MOJPROG.BAS) pišeš sledeće:
DECLARE SUB ShowUserData(User$)
........
........ ' ovde ide tvoj program
........
ShowUserData ("Mika") ' ovde pozivaš proc. ShowUserData
........
........ ' ovde ide ostatak programa
........
Kada završiš pisanje programa, na redu je prevodjenje:
npr:
BC /O /Ot MOJPROG.BAS
(ne znam da li se kompajler u tvojoj verziji zove baš BC.EXE)
Dobijaš MOJPROG.OBJ
Zatim sledi linkovanje, pri čemu treba uključiti biblioteku BIB.LIB.
LINK MOJPROG.OBJ i na prompt 'Libraries' otkucaš BIB.LIB
To je to... dobijaš MOJPROG.EXE.
Sve ovo važi za rad iz komandne linije. Ako radiš iz okruženja, postupak je
dosta jednostavniji. Potreban ti je BIB.QLB (koji se može dobiti od BIB.LIB
na način opisan u nekoj od ranijih poruka).
Editor (tj. kompletno okruženje) umesto sa QB (ili QBX, VBDOS, itd, zavisi
od verzije) startuješ sa QB /L BIB.QLB. Program pišeš na već opisan način,
s tim što se ceo postupak kompajliranja i linkovanja automatski obavlja
kad izabereš MakeExeFile iz menija.
basic.255vule.,
-> #253, sani.│ izlista one podatke koji recimo pochinju odredjenim slovom ili
│ tako nesto... dakle selektivno listanje podataka iz
│ datoteke...
└──────────────────────────────────────────────────────────────────────
To mozes na vise nacina...
1. Napravis program koji cita red po red iz datog fajla,i pritom
proverava da li taj red pocinje tim slovom 'ili tako nesto',
pa zatim taj podatak upise u neki drugi fajl pa citas taj
drugi fajl...
2. Ako se radi o fajlu sa slucajnim pristupom(Random), obelezis
redove koji ispunjavaju dati uslov i citas samo njih...
Nacina ima dosta, ali je princip maltene isti:
┌────────────────────┐
Sledeca linija ───>│ Ucitavanje linije │
└──────────┬─────────┘
│ │
│ │ ┌────┐ ┌────────────┴───────────┐ ┌────┐
│ └───┤ NE ├─┤ Da li ispunjava uslov ?├──┤ DA ├─> Markiraj(zapisi)
│ └────┘ └────────────────────────┘ └────┘
└────────────────────────────────────────────────────────┘
Nadam se da je jasno :)
basic.256vule.,
-> #250, zeljkoj│ A zasto ne biste pisali u konf? Poruke ce citati mnogo vise
│ ljudi, dobijacete vise odgovora, a sto je najvaznije, sve to ce
│ ostati na sistemu.
└────────────────────────────────────────────────────────────────────
Zato sto se tamo necemo niti pitati niti odgovarati...za to josh uvek
sluzi ova KONFERENCIJA i ova tema...
Tamo ce mo se baviti necim drugim...
basic.257darth.vader,
-> #237, vule.opaki>> Jel zna neko da li Visual Basic 3.0 za Windows
>> moze da radi u 3.1 CEE na 286 1 MB RAM-a i herculesu!
Phew... Ne verujem da moze da radi na takvoj masini prvenstveno
zbog 1Mb rama, ali nista te ne kosta da pokusas. Ali, i ako radi,
tesko da ce to ici i sporo, a kamoli brzo...
U svakom slucaju, staje na 9 disketa...
See ya, Darth :)
basic.258sani.,
moze li neko da mi da primer na koji bi se mogao prochitati
odredjen podatak iz ű sekvencijalne datoteke
NE TREBA MI ALGORITAM!!
:)
basic.259dr.grba,
Konačno sam se setio da pogledam specifikaciju makine potrebne za
Visual Basic 3.0 Prof. Dakle, traži se ražunar na kome je instaliran
Windows 3.1 i 2 MB RAM, 4 MB preporučeno. Nema eksplicitne reči o
procesoru, a pošto Win 3.1 ide na 286, dakle to jest ovaj da! (:
basic.260vule.opaki,
-> #259, dr.grbaPuno hvala, ali vec sam saznao! :)
Uostalom kupujem 486 pa necu imati nikakvih problema!
CAO
basic.261darth.vader,
-> #258, sani.>> moze li neko da mi da primer na koji bi se mogao prochitati
>> odredjen podatak izű sekvencijalne datoteke
Evo ti primer kako da trazi u datoteci neki string, i ako ga nadje, onda
da ga ispise na ekranu...
OPEN "ime_datoteke.ext" FOR INPUT AS #1
DO WHILE NOT EOF(1)
INPUT #1, a$ ' iz datoteke cita prvu liniju
IF a$ = "Trazena rec" THEN PRINT a$ ' uporedjuje sa onime sto se trazi
' i pise na ekran
LOOP
CLOSE #1
Oces i algoritam ? ;))))
See ya, Darth :)
basic.262zeljkoj,
-> #261, darth.vader> INPUT #1, a$ ' iz datoteke cita
> prvu liniju
INPUT# čita jedno polje, a ne liniju iz ulaznog fajla. Ako nisi siguran da
u ulaznom fajlu nema zareza (što je znak za razdvajanje polja), bolje je
koristiti LINE INPUT# (radi upravo to što ti treba - čita liniju).
basic.263vule.,
HI !
Ako ovde ima nekog sa QB 4.50 i malo jacom masinom od 386/33Mhz,
zamolio bih ga da startuje program koji je uz ovu poruku i da
me izvesti o rezultatu.
sort.arjbasic.264vule.,
A da...
Ako neko ima fajl VBRUN300.DLL nek mi ga posalje. ja sam svoj malo
prepravljao i zajebao sam ga.
basic.265vule.,
-> #264, vule.│ A da...
│
│ Ako neko ima fajl VBRUN300.DLL nek mi ga posalje. ja sam svoj
│ malo prepravljao i zajebao sam ga.
└─────────────────────────────────────────────────────────────────
Nemojte se muciti, nabavio sam ga...
basic.266dr.grba,
-> #264, vule.>> Ako neko ima fajl VBRUN300.DLL nek mi ga posalje. ja sam svoj malo
>> prepravljao i zajebao sam ga.
Sezamov direktorijum, windows\system\vbrun300.dll
basic.267darth.vader,
-> #262, zeljkoj>> INPUT# cita jedno polje, a ne liniju iz ulaznog fajla. Ako nisi siguran da
>> u ulaznom fajlu nema zareza (sto je znak za razdvajanje polja), bolje je
>> koristiti LINE INPUT# (radi upravo to sto ti treba - cita liniju).
Komanda...
INPUT #1, a$
...na mom racunaru cita celu liniju iz fajla koji je otvoren sa
OPEN "file.ext" FOR INPUT AS #1
U ovo sam 100% siguran, i u zivot bih smeo da se kladim.
See ya, Darth :)
basic.268morkin,
-> #263, vule.> Ako ovde ima nekog sa QB 4.50 i malo jacom masinom od 386/33Mhz,
> zamolio bih ga da startuje program koji je uz ovu poruku i da
> me izvesti o rezultatu.
Prijavljuje grešku: Out of string space.
basic.269morkin,
Da li neka dobra duša može da mi pošalje primer upotrebe naredbe CALL
INTERRUPT za QB 4.5? U helpu postoji samo primer za INT86OLD.
Takođe, zamolio bih za opis naredbe SSEG koja ne postoji u QB 4.5.
basic.270zeljkoj,
-> #267, darth.vader> ...na mom racunaru cita celu liniju iz fajla koji je otvoren sa
Nisi pažljivo čitao ono što sam napisao.
Da ponovim:
INPUT# čita celu liniju samo ukoliko u njoj ne postoji zarez,
u protivnom čita samo deo do zareza.
Sigurnije je upotrebiti LINE INPUT# jer uvek čita celu liniju, bez
obzira na njen sadržaj.
basic.271zeljkoj,
-> #268, morkin> Prijavljuje grešku: Out of string space.
Kod mene (QBX 7.1) radi, ispisuje imena nekih programa na ekranu...
basic.272gmatic,
-> #267, darth.vader==> Komanda...
==>
==> INPUT #1, a$
==>
==> ...na mom racunaru cita celu liniju iz fajla koji je otvoren
==> sa
==>
==> OPEN "file.ext" FOR INPUT AS #1
==>
==> U ovo sam 100% siguran, i u zivot bih smeo da se kladim.
Aj edituj taj fajl i stavi zarez negde u serd reda.
basic.273gmatic,
-> #268, morkin==> Prijavljuje gresku: Out of string space.
I kod mene. Dodushe ja sam probao u qbasicu koji se dobija uz dos.
Aj probacu i sa VB za dos pa cu reci.
basic.274vule.,
-> #268, morkinHvala
basic.275vule.,
-> #271, zeljkoj│ Kod mene (QBX 7.1) radi, ispisuje imena nekih programa na
│ ekranu...
└────────────────────────────────────────────────────────────
I jel zavrsio ?
Trebalo bi da se u direktorijumu gde je on pojavi novi fajl.
Ako se pojavio, bilo bi lepo da mi ga posaljes.
HVALA
basic.276vitez.koja,
-> #267, darth.vader#=> INPUT #1, a$
#=> ...na mom racunaru cita celu liniju iz fajla
ako ne naidje na zarez... Probaj.
sk
basic.277ivkeb,
Izvinjavam se sto pisem u ovoj temi ali kako mi se ucinilo ne
postoji tema za fortran
naime imam pitanje vezano za F77:
U knjizi pishe:'Kraj unoshenja ulaznih podataka moguce je
kontrolisati tako sto se po zavrsenom unosenju kontrola prenosi na
naredbu sa brojem n,ta naredba bi bila
READ(*,*,END=n)lista
moje pitanje:kako da kontrolisem? ovde je napisano 'tako sto se na
kraju...' i koja je to naredba sa brojem(labelom)n?
Ako moze neki konkretan primer.
Hvala u napred.
basic.278darth.vader,
-> #263, vule.>> Ako ovde ima nekog sa QB 4.50 i malo jacom masinom od 386/33Mhz,
>> zamolio bih ga da startuje program koji je uz ovu poruku i da
>> me izvesti o rezultatu.
Rezultati su sledeci posle startovanja:
General Faliure reading drive C:
;)))
Salim se, sad cu da isprobam... Naravno, samo ako ima i sors, jer zelim
da znam sta startujem na svojoj masini :)
See ya, Darth :)
basic.279dzakic,
-> #277, ivkeb> READ(*,*,END=n)lista
> moje pitanje:kako da kontrolisem? ovde je napisano 'tako sto se na
> kraju...' i koja je to naredba sa brojem(labelom)n?
...
READ(*,*,END=50)lista
...
50 WRITE *,"Kraj"
END
Sve naredbe fortrana kucaju se počev od sedme kolone pa na
desno. Prvih 5 kolona rezervisano je za labelu - zamisli to kao
broj linije u bejziku, s tim da brojevi ne moraju ići po redu,
nego je jednostavno labela 50 u ovom slučaju oznaka mesta u
programu i može se naći bilo gde.
basic.280darth.vader,
-> #270, zeljkoj>> Nisi pazljivo citao ono sto sam napisao.
>> Da ponovim:
>> INPUT# cita celu liniju samo ukoliko u njoj ne postoji zarez,
Aaaa, sad sam shvatio sta si napisao...
Sorry, moja greska. U potpunosti si u pravu...
See ya, Darth :)
basic.281darth.vader,
-> #275, vule.>> │ Kod mene (QBX 7.1) radi, ispisuje imena nekih programa na
>> │ ekranu...
>> └────────────────────────────────────────────────────────────
>> I jel zavrsio ?
>> Trebalo bi da se u direktorijumu gde je on pojavi novi fajl.
>> Ako se pojavio, bilo bi lepo da mi ga posaljes.
Kod mene isto ispisuje neka imena programa, ali bezveze, u nekoj velikoj
petlji, tako da ponovi jedno ime puuuuno puta.
Startovao sam ga pod QB4.5
See ya, Darth :)
basic.282zeljkoj,
-> #275, vule.> I jel zavrsio ?
Radi jaaaaako sporo (ili je moj kompjuter spor :), tako da nisam
imao strpljenja da čekam da završi.
basic.283vule.,
Ne mogu da se setim kako se bese u QB 4.5 deklarise prom. na nivou
modula(vidljiva u svim procedurama i funkcijama) i kako se
deklarise prom. na nivou procedure tako da cuva vrednost i nakon
izlaska iz iste(STATIC u VB-u) ?
Hvala
basic.284zeljkoj,
-> #283, vule.> Ne mogu da se setim kako se bese u QB 4.5 deklarise prom. na
> nivou modula(vidljiva u svim procedurama i funkcijama) i kako
Na nivou modula sa DIM SHARED promenljiva, a ako treba da bude vidljiva u
svim modulima (.BAS fajlovima) onda COMMON SHARED promenljiva na samom
početku svakog modula. Naravno da se i u prvom slučaju može koristiti
COMMON SHARED, ali nije preporučljivo (zauzima se dodatni prostor).
> deklarise prom. na nivou procedure tako da cuva vrednost i
> nakon izlaska iz iste(STATIC u VB-u) ?
Isto STATIC, ukoliko je to postojalo u verziji 4.5 (u kasnijim ima).
basic.285vule.,
-> #284, zeljkoj│ Na nivou modula sa DIM SHARED promenljiva, a ako treba da bude
│ vidljiva u svim modulima (.BAS fajlovima) onda COMMON SHARED
│ promenljiva na samom početku svakog modula. Naravno da se i u
│ prvom slučaju može koristiti COMMON SHARED, ali nije
│ preporučljivo (zauzima se dodatni prostor).
│
Hvala mada mi to ne znaci sada mnogo jer sam se setio.
│> deklarise prom. na nivou procedure tako da cuva vrednost i
│> nakon izlaska iz iste(STATIC u VB-u) ?
│
│ Isto STATIC, ukoliko je to postojalo u verziji 4.5 (u kasnijim
│ ima).
└────────────────────────────────────────────────────────────────────
STATIC u QB 4.5 ima potpuno drugacije znacenje :(
basic.286zeljkoj,
-> #285, vule.> │ Isto STATIC, ukoliko je to postojalo u verziji 4.5 (u
> kasnijim │ ima).
> └───────────────────────────────────────────────────────────────
> STATIC u QB 4.5 ima potpuno drugacije znacenje :(
Pa čuva vrednost promenljive od jednog do drugog poziva proc/funkcije.
Na to sam mislio. Ako misliš da da vednost postane dostupna ostalim
proc/funkc onda STATIC to ne radi ni u jednoj verziji QB-a.
U tom slučaju koristi DIM SHARED i gotovo...
basic.287sigmund,
Kako da u Visual Basic-u (4.0 32bit) primenim pretraživanje baze
podataka po podstringu.
Primer:
trebaju mi svi zapisi koji u polju "Prezime" sadrže "vić".
Da li je to moguće postići primenom naredba FindNext (upotrebom nekih
džoker znaka ili kako već...) ili moram da pišem program koji će
"ručno" da prelazi kroz bazu i da traži podstringove.
Pozdrav Sigmund
basic.288gmatic,
-> #287, sigmund==> Kako da u Visual Basic-u (4.0 32bit) primenim pretrazivanje
==> baze podataka po podstringu.
if left$(a$,3)=b$ then ....
gde je a$ podatak iz baze a b$ je ono vic na pocetku.
Samo dodaj petlju.
Naravno ovo je bolje uraditi sa mid$ ili slicnim ali to vec zavisi
od programa koli pises (sta je sve potrebno).
Ako hoces da se sve ispita onda vidi ovo
a=len(a$)
b=len(b$)
c=a-b+1
for i=1 to c
if mid$(a$,i,b)=b$ then....
next i
basic.289zvezdan,
-> #287, sigmund>> Kako da u Visual Basic-u (4.0 32bit) primenim pretraživanje
>> baze podataka po podstringu.
Dim db As Database, rs As Recordset, mySQL As String
Set db = OpenDatabase("nazivFajla")
mySQL = "SELECT * FROM nazivTabele WHERE Prezime Like '*vić*'"
Set rs = db.OpenRecordset(mySQL, dbOpenDynaset)
basic.290sigmund,
-> #289, zvezdan║ Dim db As Database, rs As Recordset, mySQL As String
║ Set db = OpenDatabase("nazivFajla")
║ mySQL = "SELECT * FROM nazivTabele WHERE Prezime Like '*vić*'"
║ Set rs = db.OpenRecordset(mySQL, dbOpenDynaset)
╚═══════════════════════════════════════
tHankS! fROjD
basic.291zeljkoj,
Korisna biblioteka za ASIC 4.0+. Pisano u čistom asembleru.
ibrary31.zipbasic.292vule.,
Treba mi kod koji ce da zarobi(snimi) ekran i kasnije ga ponovo
vrati.
Naravno treba mi za TEXT mod, a ne za graficki...
pokusavao sam sa SCREEN 0,,1,0 ali ne ide...
Puno HVALA unapred...
basic.293sigmund,
Da li neko zna kako da u programu generišem string promenjljivu koja
će biti multi line.
Probao sam sa TEXT(1)+CHR(13)+TEXT(2)+...
...ali nisam uspeo. Otkrio sam da za novi red treba da postoji
kombinacija CHR(13) i još NEŠTO. E.. ako neko zna šta je to nešto,
nek' mi javi.
Ostao sam bez ideja...
cu Frojd.
basic.294supers,
-> #293, sigmund>> ...ali nisam uspeo. Otkrio sam da za novi red treba da postoji
>> kombinacija CHR(13) i još NEŠTO. E.. ako neko zna šta je to nešto,
>> nek' mi javi.
To je čuvena CR/LF (carriage return i line feed) kombinacija, CHR(13)+CHR(10)
basic.295vule.,
-> #293, sigmund│ ...ali nisam uspeo. Otkrio sam da za novi red treba da postoji
│ kombinacija CHR(13) i još NEŠTO. E.. ako neko zna šta je to
│ nešto, nek' mi javi.
CHR$(10)
│ Ostao sam bez ideja...
└────────────────────────────────────────────────────────────────
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
e TO je najgore...
basic.296sigmund,
-> #293, sigmund║ Da li neko zna kako da u programu generišem string promenjljivu koja
║ će biti multi line.
╚═══════════════════════════════════════
Eureka! Otkrio sam.
Treba da se ubaci CHR(13) i CHR(10)
Imam još par pitanja:
1. Kako da meniju dodelim shortcut koji nije ponuđen u Menu Editor-u?
(probao sam sa direktnim editovanjem .FRM fajla ali daje mi poruku
o grešci.)
2. Kako mogu da očitam poslednji pritisnut taster? Recimo u Timer-u.
(da bi program mogao da se upravlja sa tastature)
cu Frojd
basic.297sigmund,
Da li neko ima iskustava sa Visual Basic-om 5.0.
Pitanja:
1. Da li je učitavanje forme stvarno toliko ubrzano? (da li ubrzanje
postoji i kod učitavanja Startup forme ili samo kod formi koje se
javljaju kasnije?)
2. Čuo sam da se program sad razvija u Developer Studiu. Šta će im to?
3. Da li to mnogo otežava rad? (probao sam nešto da radim u VC++ 4.1,
al' mi ne "miriše")
4. Koliko mesta zauzima? (broj "disketa" kod pirata)
5. Da li mi vredi da prelazim sa 4.0 na 5.0?
cu Frojd
basic.298zvezdan,
-> #296, sigmund1. Kako da meniju dodelim shortcut koji nije ponuđen u Menu
Editor-u?
Staviti Form.KeyPreview = True, u Form_KeyPress vrsiti proveru
pritiska odredjenog tastera i u slucaju njegove detekcije
pozivati
menu_Click event.
2. Kako mogu da očitam poslednji pritisnut taster? Recimo u
Timer-u.
Na isti nacin kao gore: stavi se Form.KeyPreview = True i onda se
u Form_KeyPress proveri vrednost argumenta KeyAscii.
Resenje sa tajmerom bi moglo da se izvede tako sto bi se sa
GetAsyncKeyState vrsila provera da li je odredjeni taster
pritisnut.
Ako je most significant bit setovan znaci da je taster down, ako
je
least significant bit setovan znaci da je taster pritisnut nakon
prethodnog poziva ove funkcije. Ovo resenje je i jedino moguce
ukoliko su svi event-i (Timer, KeyPress, ...) onemoguceni (npr.
beskonacna petlja bez DoEvents, a nekada je bas to potrebno).
basic.299zvezdan,
-> #297, sigmund>> 1. Da li je učitavanje forme stvarno toliko ubrzano?
Jeste.
>> 2. Čuo sam da se program sad razvija u Developer Studiu.
Razvojno okruzenje veoma podseca na ono iz verzije 4, ali ima i
par lepih noviteta. Moze da se podesi da izgleda isto kao u
prethodnim verzijama gde se glavni prozor sastoji u sustini samo
od title bar, menu i toolbar-a, dok su ostali prozori i
toolbox-ovi slobodni (providan izgled), a moze da se promeni
tako da bude sa MDI izgledom (unutar glavnog prozora se nalaze
svi ostali prozori).
>> 4. Koliko mesta zauzima? (broj "disketa" kod pirata)
>80
>> 5. Da li mi vredi da prelazim sa 4.0 na 5.0?
Jezik nije menjan, nije primetna ni jedna vaznija nova naredba
ili funkcija. Kontrole su dobile par novih properties. Postoji
mogucnost pravljenja kontrola. Postoji mogucnost generisanja
Native code EXE fajla (sada je pravi kompajler u pitanju). Ne
postoji 16-bitna verzija ...
basic.300sigmund,
-> #298, zvezdan║ Staviti Form.KeyPreview = True, u Form_KeyPress vrsiti proveru
║ pritiska odredjenog tastera i u slucaju njegove detekcije
║ pozivati
║ menu_Click event.
╚═══════════════════════════════════════
Thanks!
cu Frojd.
basic.301sigmund,
Da li može u VB 4.0 da se pretražuje polje u MDB bazi tipa Long Binary?
Polje Long Binary koristim za tekst raznih dužina.
Primenio sam pretraživanje sa Data1.Recordset.FindNext "Tekst like '*reč*'"
ali ništa se nije desilo. (siguran sam da postoji zapis koji u polju Tekst
tipa Long Binary ima podstring reč)
cu Frojd.
basic.302vule.,
Kako u VB-u prebacujem CEO ekran u clipboard i kako da napravim
da neka forma postane neaktivna ili da bude stalno vidljiva ?
basic.303zvezdan,
-> #301, sigmund>> Da li može u VB 4.0 da se pretražuje polje u MDB bazi tipa
Long Binary?
Ako ne može direktno, valjda može posredno:
Dim myStr as String
Data1.Recordset.MoveFirst
Do Until Data1.Recordset.EOF
myStr = Data1.Recordset(Tekst).GetChunk (0, numbytes)
If myStr Like "*reč*" Then
...
Else
...
End If
Data1.Recordset.MoveNext
Loop
numbytes je maksimalna veličina memo polja sa kojom će se raditi.
BTW, rad sa Data objektom je znatnooo sporiji od direktnog rada
sa Recordset objektom (Dim rs As Recordset, ...).
basic.304zvezdan,
-> #302, vule.>> Kako u VB-u prebacujem CEO ekran u clipboard
Rešenje za kopiranje ekrana u picture box je priloženo kao fajl.
Sadržaj picture box-a se prebacuje u clipboard sa:
Clipboard.SetData pictureBox.Picture, vbCFBitmap
>> kako da napravim
>> da neka forma postane neaktivna ili da bude stalno vidljiva ?
Rešenje da forma bude uvek iznad drugih (Always on Top kao
npr. Clock, da li je to ono što se traži?) je takođe unutar
priloženog fajla.
Forma se skriva sa Form.Hide. Šta znači "da forma postane
neaktivna"?
howto.txtbasic.305vule.,
-> #304, zvezdan│ Forma se skriva sa Form.Hide. Šta znači "da forma postane
│ neaktivna"?
└────────────────────────────────────────────────────────────
NE ZNAS STA ZNACI "NEAKTIVAN" ?
i mozda nije moja stvar, ali cini mi se da je onaj tekst koji
si poslao sastavljen iz 2 dela, pa ako imas josh nesto
slicno, voleo bih da posaljes ako ti nije tesko...
i da, nisam ti se zahvalio.............HVALA PUNO !
basic.306popovics,
Ima li negde u Sezamovim direktorijumima neki VISUAL alat (za Basic
naravno)
basic.307zvezdan,
-> #305, vule.>> Šta znači "da forma postane neaktivna"?
>>
>> NE ZNAS STA ZNACI "NEAKTIVAN" ?
Što vičeš na mene? Znam ja šta je neaktivna forma, ali ne znam
šta ti podrazumevaš pod time jer su ti pitanja nepotpuna i
neprecizna. Ako želiš da prikažeš formu koja ne treba da dobije
fokus uradi sledeće:
Form.ZOrder
Call ShowWindow(Form.hWnd, SW_SHOWNOACTIVATE)
>> cini mi se da je onaj tekst koji si poslao sastavljen iz
>> 2 dela, pa ako imas josh nesto
Naravno da je bio iz dva dela. Ostalo potraži na Microsoft
sajtu. Zove se VB Knowledge Base, veličine je oko 5 MB.