basic.1reggie,
Zanima kako da iz BASIC programa pozovem neku DOS naredbu ?
Npr.
DIR, CHKDSK, MEM.... Ili kako da iz BASIC programa izadjem u DOS ?
basic.2feniks,
-> #1, reggie│ Zanima kako da iz BASIC programa pozovem neku DOS naredbu ?
│Npr.
│DIR, CHKDSK, MEM.... Ili kako da iz BASIC programa izadjem u DOS ?
└──────────────
Ima dosta vrsta basic-a, ali kod TB (Borland)
to ide sa SHELL"DIR" , itd. a izlaz u DOS ide sa SYSTEM
basic.3zeljkoj,
-> #1, reggie> Zanima kako da iz BASIC programa pozovem neku DOS naredbu ?
> Npr.
> DIR, CHKDSK, MEM.... Ili kako da iz BASIC programa izadjem u
> DOS ?
Naredbu pozivaš sa SHELL "naredba", a ako napišeš samo SHELL onda će
biti pozvan COMMAND.COM. Iz programa izlaziš sa SYSTEM a možeš i sa
SYSTEM <broj> gde je <broj> vrednost koju želiš da dodeliš DOS
promenljivoj ERRORLEVEL.
basic.4ognjen,
-> #1, reggie)-> Zanima kako da iz BASIC programa pozovem neku DOS naredbu ?
Davno to beše... Da nije EXEC ? Bez parametara - Shell to dos,
a parametri (pod navodnicima) se prosleđuju DOSu.
basic.5zeljkoj,
-> #2, feniks> Ima dosta vrsta basic-a, ali kod TB (Borland)
Nije valjda da koristiš Turbo BASIC, pored onako moćnih
Microsoftovih BASIC-a?
basic.6feniks,
-> #5, zeljkoj│ Nije valjda da koristiš Turbo BASIC, pored onako moćnih
│ Microsoftovih BASIC-a?
└──────────────────
Pomenuti Turbo BASIC V1.1 koristio sam u periodu 1988.-90.
god. Tada je on bio bolji (bar meni :)) od Quick Basica V3.0 i
V4.0. Posle je Microsoft razvijao BASIC-e do V7.0 sa brojnim
bibliotekama, ali ja sam promenio firmu i ovaj jezik mi više
nije bio od vitalnog interesa. :) BTW, ipak me interesuje
koliko su ovi noviji BASIC-i brži od pomenutog? ;)
basic.7zeljkoj,
-> #6, feniks> V4.0. Posle je Microsoft razvijao BASIC-e do V7.0 sa brojnim
^^^^^^^^
7.1, a ne 7.0 :))). Kasnije su izgleda prestali da prave kompajler
pod tim imenom (koji, btw, pravi programe za DOS i OS/2) i počeli sa
proizvodnjom dva odvojena kompajlera pod imenom Visual BASIC (jedan za
DOS, drugi za Windows). Ova dva kompajlera sadrže sve što su imali
i njihovi predhodnici, ali imaju i dosta sasvim novih stvari (one
objektno orijentisane gluposti i tako to :)))
> bibliotekama, ali ja sam promenio firmu i ovaj jezik mi više
> nije bio od vitalnog interesa. :) BTW, ipak me interesuje
> koliko su ovi noviji BASIC-i brži od pomenutog? ;)
Evo ovako:
Ovo su rezultati rada nekih BASIC-a. Radi se o jednostavnom malom programu
koji samo vrti petlju od 1 do 500000 i ne radi ništa drugo.
---------------------------------------------------------------
B A S I C VREME [s] Dužina .EXE fajla [kB]
---------------------------------------------------------------
QBASIC iz DOS-a 11.64 -
Borland Turbo Basic 1.0 281 29
Microsoft QBX PDS 7.1 2.91 16
Microsoft VB for DOS 1.0 2.64 24
------------------------------------------------------------
Kao što se može videti, Turbo BASIC je strašno spor - trebalo mu je skoro
5 minuta (!!!), dok su Microsoftovi kompajleri znatno brži - više od 100
puta! Takođe, u tabeli vidite i veličine .EXE fajlova koje su
kompajleri napravili. Testiran je i QBASIC koji se dobija uz DOS, čisto
onako radi upoređivanja brzine.
basic.8mdave,
-> #7, zeljkojSubject: Re: Kompajleri
MD> Kao što se može videti, Turbo BASIC je strašno spor - trebalo mu
MD> je skoro 5 min
Isto koliko i tebi za kompletan test. ;) Sve sa paljenjem
kompjutera. :)
basic.9vcalic,
-> #7, zeljkoj>> 7.1, a ne 7.0 :))). Kasnije su izgleda prestali da prave kompajler
>> pod tim imenom (koji, btw, pravi programe za DOS i OS/2) i počeli sa
>> proizvodnjom dva odvojena kompajlera pod imenom Visual BASIC (jedan za
>> DOS, drugi za Windows). Ova dva kompajlera sadrže sve što su imali
>> i njihovi predhodnici, ali imaju i dosta sasvim novih stvari (one
>> objektno orijentisane gluposti i tako to :)))
Visual Basic for DOS je pre nastavak Quick Basic-a, i predstavlja neku
vrstu odgovora na Borlandov Turbo Vision. Može da radi kao običan Basic
kompajler (podržava potpuno Quick Basic i QBasic) a ima i deo za crtanje
dijaloga i pravljenje event-driven programa.
Basic Proffesional Development System je mnogo snažnija alatka, ali
izgleda da se više ne usavršava. Možda bi se i moglo reći da je VB naslednik
ovog Basica, ali su im koncepcije znatno drugačije.
Vlada
basic.10dr.grba,
-> #7, zeljkoj>> i njihovi predhodnici, ali imaju i dosta sasvim novih stvari (one
>> objektno orijentisane gluposti i tako to :)))
Objektno orijentisane - šta? (((:
basic.11zeljkoj,
-> #8, mdave> Isto koliko i tebi za kompletan test. ;) Sve sa paljenjem
> kompjutera. :)
???????
Hoćeš da kažeš da je test bio suviše jednostavan?
basic.12zeljkoj,
-> #9, vcalic> Visual Basic for DOS je pre nastavak Quick Basic-a, i
Pa to sam i rekao!!! VB je naslednik QBX PDS-a
(Quick BASIC Extended Professional Development System).
> kompajler (podržava potpuno Quick Basic i QBasic) a ima i deo
> za crtanje dijaloga i pravljenje event-driven programa.
Na to sam i mislio pod onim "objektno orjentisane gluposti" :)).
> Basic Proffesional Development System je mnogo snažnija alatka,
VB for DOS ima sve što i PDS (uključujući ISAM, kao i sve one
silne biblioteke :). Kako je onda PDS "snažniji"?
basic.13feniks,
-> #7, zeljkoj│ Ovo su rezultati rada nekih BASIC-a. Radi se o jednostavnom malom programu
│ koji samo vrti petlju od 1 do 500000 i ne radi ništa drugo.
│
│ ---------------------------------------------------------------
│ B A S I C VREME (s) Dužina .EXE fajla (kB)
│ ---------------------------------------------------------------
│ QBASIC iz DOS-a 11.64 -
│ Borland Turbo Basic 1.0 281 29
│ Microsoft QBX PDS 7.1 2.91 16
│ Microsoft VB for DOS 1.0 2.64 24
│ ------------------------------------------------------------
└────────────────────────
Ne znam na kojoj mašini si dobio ovako loše rezultate za TB
ali i ja sam isti program probao na jednoj 486DX/33 i evo rezultata:
---------------------------------------------------------------
B A S I C VREME (s) Dužina .EXE fajla (kB)
---------------------------------------------------------------
QBASIC iz DOS-a V6.22 67.3 -
Borland Turbo Basic 1.1 20.1 36.3
Isti test na 386/40, bez koprocesora
---------------------------------------------------------------
B A S I C VREME (s) Dužina .EXE fajla (kB)
---------------------------------------------------------------
QBASIC iz DOS-a V6.22 98 -
Borland Turbo Basic 1.1 133 36.3
Vidi se da koprocesor znatno utiče na brzinu. ;)
Možda u QBASIC-u treba navesti da koristi koprocesor (ako ga ima)?
Rezultati demantuju tvoju poruku a kao dokaz prilažem izvorni
program kompajliran Borlandovim TB V1.1. čao mi je sto nisam imao
prilike da probam i preostala 2 tvoja Microsoft-ova BASIC-a.
proba.zipbasic.14feniks,
-> #13, feniks│ Ne znam na kojoj mašini si dobio ovako loše rezultate za TB
│ ali i ja sam isti program probao na jednoj 486DX/33 i evo rezultata:
│
│ ---------------------------------------------------------------
│ B A S I C VREME (s) Dužina .EXE fajla (kB)
│ ---------------------------------------------------------------
│ QBASIC iz DOS-a V6.22 67.3 -
│ Borland Turbo Basic 1.1 20.1 36.3
└──────────────
Gornje rezultate dobio sam uz korišćenje EMM386, ali pazi sad:
Test programa proba.bas na čistoj 486DX/33, bez ikakvih memory menagera:
---------------------------------------------------------------
B A S I C VREME (s) Dužina .EXE fajla (kB)
---------------------------------------------------------------
QBASIC iz DOS-a V6.22 32.3 -
Borland Turbo Basic 1.1 3.3 36.3
- neverovatno, zar ne?
basic.15deva,
-> #13, feniks..> Isti test na 386/40, bez koprocesora
..> ---------------------------------------------------------------
..> B A S I C VREME (s) Dužina .EXE fajla (kB)
..> ---------------------------------------------------------------
..> QBASIC iz DOS-a V6.22 98 -
..> Borland Turbo Basic 1.1 133 36.3
Isti test 386/40 sa koprocesorom
Power Basic 2.00b 3.076 13680b
Nema Ctrl-Break testiranja, serijska komunikacija Off, koproce-
sor NPX (nije emulate ili procedure u kojima je dužina 22 odnosno
33 kB respektivno).
Ovo je valjda Basic razvijen iz Turbo Basica, vrlo lep i mali
- PB.EXE Editor + Compiler = 293kB
- PBC.EXE Command line compiler 220kB
basic.16zeljkoj,
-> #10, dr.grba> Objektno orijentisane - šta? (((:
Znao sam da će ovo da izazove ovakve reakcije.
:)))
basic.17zeljkoj,
-> #13, feniks> program kompajliran Borlandovim TB V1.1. čao mi je sto nisam
> imao prilike da probam i preostala 2 tvoja Microsoft-ova
> BASIC-a.
To ću ja da uradim, pošto si poslao sors.
:)
Što se tiče koprocesora, i u TB i u Microsoftovim BASICima postoji
mogućnost da se on koristi, međutim, u svim testovima koje sam naveo
on nije korišćen. Mašina je 386 SX.
basic.18zeljkoj,
-> #13, feniks> program kompajliran Borlandovim TB V1.1. čao mi je sto nisam
Ja imam verziju 1.0, i očigledno je ova tvoja 1.1 brža.
:)
basic.19zeljkoj,
-> #13, feniks> Rezultati demantuju tvoju poruku a kao dokaz prilažem izvorni
> program kompajliran Borlandovim TB V1.1. čao mi je sto nisam
> imao prilike da probam i preostala 2 tvoja Microsoft-ova
> BASIC-a.
Razlika između tvog i mog programa je u tome što sam ja koristio long
integer promenljivu (A&) a ti single precision promenljivu (A) u petlji.
Da bismo konačno lepo uporedili brzine kompajlera, isprobao sam BASICe
sa programom koji si ti poslao, bez ikakvih izmena. Takođe, startovao
sam i .EXE koji si poslao (kompajliran pomoću TB 1.1). Evo rezultata:
-------------------------------------------------------------------------
Vreme: sa EMM386 bez EMM386 Dužina .EXE fajla
-------------------------------------------------------------------------
Borland Turbo Basic 1.0 278.527 92.495 30544
Borland Turbo Basic 1.1 268.696 95.680 36304
Microsoft QBASIC 1.1 iz DOS-a 206.629 90.188 -
Microsoft GWBASIC 2.01 38.723 38.879 -
Microsoft QBX PDS 7.1 24.277 24.770 19884
Microsoft VB for DOS 1.0 24.770 24.988 25362
-------------------------------------------------------------------------
Kao što vidiš, kada vrte petlju sa real promenljivom umesto integer, MS
kompajleri su oko 10 puta sporiji, ali opet značajno brži od Borlandovih.
Istestirao sam i QBASIC i GWBASIC. Najviše me je začudilo što je GWBASIC,
koji je interpreter (!) postigao ovako dobar rezultat. Zaključak je da su
Microsoftovi kompajleri ipak brži. :))) Inače, ako neko ima još neke BASIC
kompajlere/interpretere, bilo bi lepo da isproba ovaj programčić. Ja sam
ga testirao na 386 SX na 33 MHz bez koprocesora. Uz poruku prilažem i fajl
sa prevedenim programima (PROBA = TB 1.1, PROBA3 = TB 1.0, PROBA1 = QBX,
i PROBA2 = VB), tako da možeš da ih istestiraš i na svojoj mašini.
P.S. Ukoliko nekog zanima, godine proizvodnje testiranih BASIC-a su:
TB 1.0 i 1.1 - 1987.
QBASIC 1.1 - 1992.
GWBASIC 2.01 - 1984.
QBX PDS 7.1 - 1990.
VB DOS 1.0 - 1992.
testbas.zipbasic.20dr.grba,
-> #14, feniks>> QBASIC iz DOS-a V6.22 32.3 -
Uzmi QBasic kompajler, pa njime poredi, a ne krnjom verzijom koja se
isporučuje uz MS DOS.
basic.21zeljkoj,
-> #20, dr.grba> Uzmi QBasic kompajler, pa njime poredi, a ne krnjom verzijom
> koja se isporučuje uz MS DOS.
Pa u tabeli imaš rezultate i za kompajler. (QBX PDS 7.1 :))
E sad, ako neko ima stari QB 4.5 mogao bi da proba i njega i da
pošalje rezultate.
basic.22djelovic,
Da li je u Visual Basicu moguće napraviti prozor sa oknima čija se veličina
može menjati?
basic.23hobit,
-> #22, djelovic> Da li je u Visual Basicu moguće napraviti prozor sa oknima čija se veličina
> može menjati?
Nisam baš najbolje razumeo pitanje ali pretpostavljam da si mislio na promenu
velicine aktivnog form-a. To se postiže sa:
Determine the dimensions of an object.
Usage
{[form.][control.]|Printer.|Screen.}Height[ = numericexpression ]
{[form.][control.]|Printer.|Screen.}Width[ = numericexpression ]
For a form, Printer object, and Screen object, these properties are always
measured in twips. For a form or control, the values for these properties
change as
the object is sized by the user or by code. Maximum limits of these properties
for all
objects are system-dependent.
Use the Height, Width, Left, and Top properties for operations or calculations
based on an object's total area, such as sizing or moving the object. Use the
ScaleLeft, ScaleTop, ScaleHeight, and ScaleWidth properties for operations or
calculations based on an object's internal area, such as drawing or moving
objects
within another object.
Ako sam promašio temu molio bih da se pojasni pitanje.
basic.24djelovic,
-> #23, hobit> Ako sam promašio temu molio bih da se pojasni pitanje.
Promašio si temu :). Treba mi prozor koji bi sadržao, recimo, četri okna.
Znači, prozor je podeljen na četiri dela pomoću dve "pregrade" (horiznotalne i
vertikalne crte) čijim pomeranjem bi mogao da povećavaš neka okna na račun
drugih.
basic.25hobit,
-> #24, djelovic> Znači, prozor je podeljen na četiri dela pomoću dve "pregrade"
> (horiznotalne i vertikalne crte) čijim pomeranjem bi mogao da povećavaš
> neka okna na račun drugih.
Onda pokušaj ovako:
Line is a graphical control displayed as a horizontal, vertical, or diagonal
line.
Remarks ...
You cannot use the Move method to move a line control at run time but you can
move
or resize it by altering its X1, X2, Y1, Y2 properties.
U help-u se daje primer za jednu liniju koja se mrda po ekranu. Možeš da nađeš
primer sa search: Line control a podnaslov X1,Y1,X2,Y2 Properties.
basic.26fancy,
-> #24, djelovicŮŢ> Promašio si temu :). Treba mi prozor koji bi sadržao, recimo, četri
ŮŢ> okna.
Hej..! Da li ja to vidim revolucionarno nastajanje WIN4WIN..??? :)
(zaštićujem ovo ime, ali ti ga možeš koristiti :)
*
basic.27kcurcic,
-> #22, djelovic> Da li je u Visual Basicu moguce napraviti prozor sa oknima cija
> se velicina moze menjati?
Nema niceg sto u Visual Basic-u nije moguce. :) Evo za primer 'program'
koji se sastoji od dve linije, Line1 i Line2 koje predstavljaju ivice
okana (kako se kaze okno u mnozini? :) i jedne male labelice, Label1,
koja se postavi na intersection te dve linije. Siroka je i visoka
svega 4-5 piksela, i ima BackGround color recimo plavu. E sad, kad
hoces da resizeujes okna, kliknes na njihov presek tj. tu malu labelu
(koja izgleda kao kvadrat) i odvedes ga do tacke na formi gde hoces
da bude novi presek. Program ima svega tri rutine: Form_Resize,
Form_DragOver i Form_DragDrop.
Linije i labela mogu biti pozicionirane bilo gde na pocetku, kao sto
ces videti kad ucitas ovu formu. Automatski se postavljaju na sredinu
po prikazivanju forme.
VERSION 2.00
Begin Form Form1
Caption = "Form1"
ClientHeight = 3975
ClientLeft = 1095
ClientTop = 1485
ClientWidth = 7365
Height = 4380
Left = 1035
LinkTopic = "Form1"
ScaleHeight = 3975
ScaleWidth = 7365
Top = 1140
Width = 7485
Begin Label Label1
BackColor = &H00FF0000&
DragMode = 1 'Automatic
Height = 75
Left = 3120
TabIndex = 0
Top = 1080
Width = 75
End
Begin Line Line2
X1 = 1320
X2 = 2640
Y1 = 2160
Y2 = 2520
End
Begin Line Line1
X1 = 4440
X2 = 4440
Y1 = 1200
Y2 = 2640
End
End
Option Explicit
Sub Form_DragDrop (Source As Control, x As Single, y As Single)
label1.Top = y
label1.Left = x
End Sub
Sub Form_DragOver (Source As Control, x As Single, y As Single, state As
Integer)
If state = 1 Then 'ne dozvoli da izadje izvan okvira forme
line1.X1 = label1.Left
line1.X2 = label1.Left
line2.Y1 = label1.Top
line2.Y2 = label1.Top
Exit Sub
End If
line1.X1 = x
line1.X2 = x
line2.Y1 = y
line2.Y2 = y
End Sub
Sub Form_Resize ()
label1.Top = Height / 2
label1.Left = Width / 2
line1.X1 = Width / 2
line1.X2 = Width / 2
line1.Y1 = 0
line1.Y2 = Height
line2.Y1 = Height / 2
line2.Y2 = Height / 2
line2.X1 = 0
line2.X2 = Width
End Sub
Naravno, ovo je samo scratch, iz toga ces lako izvuci sta ti treba.
basic.29jovca.car,
-> #22, djelovic/* Da li je u Visual Basicu moguće napraviti prozor sa oknima čija se
Oknima?
basic.30bigbrada,
-> #29, jovca.car*>> /* Da li je u Visual Basicu moguće napraviti prozor sa
*>> oknima čija se
*>>
*>> Oknima?
Ma pusti ih prave program za Borski rudnik ;)
basic.31paki,
žini mi se da u Visual Basicu opcija 'Grid' ne funkcioniše onako
kako bi trebalo.
Naime, kada napravim jedan textbox i jedan label, natpisi na
njima u većini slučajeva nisu u istoj liniji, i nikakvim
pomeranjima i menjanjima veličine se ne mogu doterati. Jedino
rešenje je da smanjim dužinu i širinu grida na minimum, ali mi se
onda isto hvata i da je isključim.
basic.32babbage,
Pitanje za Visual Basic-aše. Kako da otvorim datoteku? Probao sam da pogledam u
help-u ali on mi tamo ispisa primer na XX strana. Treba mi ekvivalent za dobro
staro:
OPEN "FILE.EXT" FOR RANDOM AS #1, LEN=XXX
FIELD #1,xx AS A$,yy AS B$...
LSET A$=X$
LSET B$=Y$
PUT #1
itd. Dakle, treba mi PROSTA random datoteka (ako VB program za takve stvari
prelazi 1KB, nemojte slati listing, samo javite da na vreme odustanem od njega)
babbage
P.S.
A, da, zaboravih da kažem, verzija 3.0pro.
basic.33zormi,
-> #31, paki* Naime, kada napravim jedan textbox i jedan label, natpisi na
* njima u većini slučajeva nisu u istoj liniji
Textbox i Label različito računaju položaj teksta u odnosu na
"svoj položaj".
basic.34paki,
-> #33, zormi> Textbox i Label različito računaju položaj teksta u odnosu na
> "svoj položaj".
Kako ih onda uravnotežiti? Ovako mi dijalozi izgledaju krajnje iščašeno.
basic.35paki,
Kako bi se u Visual Basicu napravila deklaracija niza konstanti?
Dakle, nešto kao paskalski: const imena:array[1..10] of string=('Mile',...);
basic.36zormi,
-> #34, paki* > Textbox i Label različito računaju položaj teksta u odnosu na
* > "svoj položaj".
*
* Kako ih onda uravnotežiti? Ovako mi dijalozi izgledaju krajnje iščašeno.
Ja "usitnim" grid na nekih 120, pa ručno podešavam :( Ne izbacujem ga
potpuno zbog slaganja kontrola istog tipa.
basic.37zeljkoj,
-> #32, babbage> Pitanje za Visual Basic-aše. Kako da otvorim datoteku? Probao
> sam da pogledam u
Pa u VB bi trebalo da je isto kao i u standardnom BASIC-u.
basic.38dr.grba,
-> #22, djelovic>> Da li je u Visual Basicu moguće napraviti prozor sa oknima čija se
>> veličina može menjati?
Prozor u prozoru, ako sam dobro razumeo? Da, može. MDI Form.
Zapravo, šta nazivaš terminom "okno"?
basic.39dr.grba,
>> 2.0), ali će puna podrška da bude ugrađena tek u VB 4.0. (recimo
Ima li vesti o VB 4.0? Ima li smisla da se pojavljuje pre Win 95?...
basic.40babbage,
-> #37, zeljkoj=> Pa u VB bi trebalo da je isto kao i u standardnom BASIC-u
NIJE isto kao u standardnom BASIC-u, ubio sam se isprobavajući razne
kombinacije pre nego što sam postavio pitanje ovde.
babbage
basic.41jovca.car,
-> #40, babbage/* NIJE isto kao u standardnom BASIC-u, ubio sam se isprobavajući razne
/* kombinacije pre nego što sam postavio pitanje ovde.
Šta hoćeš tačno da radiš sa fajlom? Da li ti Input # ili Line Input radi
posao? Da li fajl čitaš sekvencionalno? (zagubio sam tvoju originalnu
poruku)
basic.42djelovic,
Da li za Visual Basic postoji neki VBX koji bi radio tabelarni pregled neke
tabele u bazi podataka? Postoji, naravno, onaj GRID.VBX koji predstavlja
tabelu, ali on radi samo sa statičkom slikom ("snapshot"), a meni treba prava,
dinamička tabela.
Ne vidim kako bez toga iko može smatrati Visual Basic dobrom alatkom za
pravljenje baza podataka?
basic.43andrejt,
-> #35, pakiQ> Kako bi se u Visual Basicu napravila deklaracija niza konstanti?
Q> Dakle, nesto kao paskalski: const imena:array[1..10] of string=('Mile',...);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ovo nije niz konstanti.
basic.44dsisic,
-> #22, djelovic> Da li je u Visual Basicu moguce napraviti prozor sa oknima cija
> se velicina moze menjati?
Okna, Djekna jos nije ... a ka' ce ne znamo.
basic.45babbage,
-> #41, jovca.car=>Šta hoćeš tačno da radiš sa fajlom? Da li ti Input # ili Line Input radi
Input # i■˛ Line Input mi NE RADE POSAO. Treba mi RANDOM ACCESS
(OPEN "IME.EXT" FOR RANDOM AS #1, LEN=XXX)
Dakle treba mi ekvivalent u VB-u.
babbage
basic.46paki,
-> #43, andrejt> Q> Dakle, nesto kao paskalski: const imena:array[1..10] of
> string=('Mile',...);
>
> Ovo nije niz konstanti.
Tako mi i treba, kad pišem on-line :(
Izašao sam iz štosa, pretpostavljam da bi trebalo samo:
const imena=('Mile','Pera','Laza');
Svejedno, da li je ovako nešto moguće u VB-u?
basic.47zormi,
-> #45, babbage* Input # i Line Input mi NE RADE POSAO. Treba mi RANDOM ACCESS
* (OPEN "IME.EXT" FOR RANDOM AS #1, LEN=XXX)
* Dakle treba mi ekvivalent u VB-u.
Sintaksa je otprilike ta, imaš u helpu ako sam shvatio šta ti treba:
Syntax:
Open file (For mode) (Access access) (lock) As (#)filenumber (Len = reclen)
file File name or path.
mode Reserved word that specifies the file mode: Append, Binary, Input,
Output, Random.
access Reserved word that specifies which operations are permitted on the
open file: Read, Write, Read Write.
lock Reserved word that specifies which operations are permitted on the
open file by other processes: Shared, Lock Read, Lock Write,
Lock Read Write.
filenumber Integer expression with a value between 1 and 255, inclusive.
When an Open statement is executed, filenumber is associated with
the file as long as it is open. Other I/O statements can use the
number to refer to the file.
reclen For files opened for random access, the record length; for
sequential files, the number of characters buffered. The
argument reclen is a positive integer expression less than or equal
to 32,767 bytes.
.....
basic.49babbage,
-> #47, zormiAnd again you dont understand... All right here we go again...
Dakle treba mi fajl koji je FIELD-ovan ovako
OPEN "IME.EXT" FOR RANDOM AS #1, LEN = xxx
FIELD #1,xx AS A$,yy AS B$,zz AS C$
N%=1
:AAA
INPUT A$
IF A$="" GOTO :BBB
INPUT B$,C$
GOTO :AAA
:BBB
LSET...
Ma mrzi me više da pišem... Ajde samo mi pošalji sors iz kog mogu da shvatim
kako da otvorim bazu iz koje mogu da izvučem niz (A$,B$,C$) pod određenim
brojem i isto tako da upišem niz pod određenim brojem...
babbage
basic.50jovca.car,
-> #45, babbage/* (OPEN "IME.EXT" FOR RANDOM AS #1, LEN=XXX)
Ovako je i u VB-u, minus zarez iza keca.
basic.51babbage,
-> #50, jovca.carIzgleda da ću morati da zakačim fajl iz QB-a, pa da razumete o čemu se radi...
Nije problem u komandi OPEN, ona radi O.K., već ne znam kako da FIELD-ujem fajl
- izgleda da komanda FIELD u VB-u znači nešto sasvim drugo nego u QB-u...
No poslaću vam sutra fajl pa ćemte da vidite u čemu je stvar.
babbage
basic.52babbage,
So, here we go again...Šaljem vam jedno programče iz QB-a, treba mi ekvivalent
u Visual Basicu 3.0 pro. NE TREBA mi objašnjenje kako da izvršim PRINT i INPUT,
nego kako da otvrim fajl za upis/čitanje na način kao što je onaj u primeru.
babbage
example.basbasic.53galimpic,
-> #52, babbageU Help-u za naredbu FIELD lepo piše:
"Record variables usually provide a better way to handle record data."
Šaljem ti program u kome je sve rešeno bez naredbi FIELD i LSET, upotrebom
TYPE definicije.
Napomena: QB mi je prijavljivao grešku u tvom programu gde ima zarez ispred
LEN = 20 u OPEN naredbama, pa sam ga izbacio. Ako ti imaš neku verziju koja
traži sintaksu sa zarezom, vrati ga.
P.S. Ako je tvoje pitanje akademsko, odnosno ako INSISTIRAŠ na FIELD komandi,
onda se bojim da VB taj anahronizam ne podržava.
no_field.basbasic.55wizard,
Treba mi pomoć za jednu talentovanu devojčicu, buduću progamerku (veš
mašine ;).
Zadali su im u školi zadatak da naprave BASIC program za TIM 011 koji
će da nacrta kornet sa tri kugle sladoleda i okolo tri deltoida.
Dakle, otprilike, nešto ovako:
________
/ \
/\ | | /\
/ \ _______ _______ / \
/ 1 \ / \/ \ / 2 \
\ / | || | \ /
\ / ------------------- \ /
\/ \ / \/
\ /
/\ \ / /\
/ \ \ / / \
/ 2 \ \ / / 1 \
\ / \ / \ /
\ / \ / \ /
\/ \ / \/
\ /
Izvinjavam se svima sa YUSCII-jem. :))
Pa bih zamolio nekog njenog kolegu srednjoškolca da joj pomogne tako
što će da sastavi potrebno programče u TIM-ovom BASIC-u. Za nekog ko
je u fazonu sa tim programskim jezikom ne bi trebalo da predstavlja
problem.
Posebni zahtevi su sledeći:
--------------------------
Koordinate:
- donje teme korneta: 250, 50
- gornje levo teme: 100, 125
- gornje desno: 400, 125 (dakle sve je simetrično)
- centri donjih kugli su na četvrtinama oboda korneta, a centar
gornje kugle je u preseku ose simetrije korneta i tangente na
oba poluktuga koji predstavljaju dve donje kugle
- poluprečnici krugova su isti - četvrtina oboda korneta
- donji-levi deltoid: 50, 50 -- 100, 25 -- 150, 50 -- 100, 75
- gornji-levi deltoid: 50, 175 -- 100, 155 -- 150, 175 -- 100, 195
- ostala dva treba da su simetrična u odnosu na osu simetrije
korneta :)
Boje:
- kugle treba da imaju različitu nijansu
- isto važi i za deltoide, s tim što oni koje sam označio istim
brojem treba da imaju iste boje/nijanse
Muzička želja:
- na sve ovo treba ("ako može") dodati da odsvira i neku muziku
(bez zezanja :)). Nisu se izjasnili da li žele pank ili
klasiku...
Eto vidite šta deca (budući astronauti) uče u školi... Valjda nisam
pogrešio u koordinatama. :))
Zaistao bih bio zahvalan ako bi neko mogao ovo da mi napiše i pošalje.
Ne sumnjam da će i devojka da bude zahvalna (jednog dana). :))
Ne bi trebalo da bude teško i komplikovano. :) Hvala unapred!
basic.56dejanr,
Paket koji olakšava grupni rad na projektima u Visual Basic-u. Vodi
računa o verzijama, pravima pristupa i svemu ostalom.
NOVOSTI/microb 4.3765.
basic.57jovca.car,
-> #55, wizard/* Muzička želja:
Batali. Svojevremeno smo ja i ortak pokušali da nateramo TIM da otpeva "Tamo
daleko" u okviru seminarskog rada. To ne liči ni na šta. ;6 Em zvuči
groteskno, em na drugoj mašini zvuči skroz drukčije.
Samo programiranje je trivijalno - note se zadaju u nizu, po dva broja
(valjda, davno beše:).
basic.58boko,
Ako neko ima BQLB45.LIB (mozda je i.qlb) neka posalje, HITNO mi je.
basic.59vlajel,
Basic programeri help,u inp.bas-u je opisan problem
treba naterati promenljivu da broji koliko karaktera
sadrzi neki tekst,i to vrlo odredjenih ! & ima li neko
TurboBasic v2.0
inp.basbasic.60wizard,
-> #57, jovca.car> Samo programiranje je trivijalno - note se zadaju u nizu, po dva broja
> (valjda, davno beše:).
Ma note su bile samo "ako može", nadao sam se da će neko da pomogne za
ono ostalo. :(
basic.61cubra,
-> #58, boko.oOo. Ako neko ima BQLB45.LIB (mozda je i.qlb) neka posalje,
.oOo. HITNO mi je.
Evo ide...
bqlb.arjbasic.62boko,
-> #61, cubraThanks.
basic.63babbage,
Well, I've got a new problem! Potpuni sam novajlija u Visual Basic-u, tako da
će moje pitanje možda da bude smešno...ali neka :). Dakle imam niz
(5-dimenzionalni) i treba podatke iz njega da smestim u list box, po redu.
Kako? U stvari pitanje glasi - KAKO SE BILO ŠTA STAVLJA U LIST BOX...
babbage
P.S.
BTW obišao sam knjižare da bih nabavio neku osnovnu literaturu o VB-u, ali
ništa...gde može da se nađe neka literatura?
basic.64djelovic,
-> #63, babbage> U stvari pitanje glasi - KAKO SE BILO ŠTA STAVLJA U LIST BOX...
ctlList.AddItem "Ovaj red će biti stavljen u List Box"
A kako si to mogao i sam da saznaš:
1. Pozoveš help.
2. Uradiš search i nađeš help stranicu koja se odnosi na ListBox.
3. U toj stranici klikneš na "Methods", i dobiješ spisak funkcija koje
važe za ListBox.
basic.65galimpic,
-> #63, babbage> Well, I've got a new problem!
Konkretno, ime.AddItem "tekst".
Manje konkretno: startuj Help i čitaj! Preporučujem ti da redom
gledaš Help za svaku kontrolu i čitaš SVE Properties. Tu su i
vrlo poučni primeri.
> gde može da se nađe neka literatura?
Za početak, suvi početak, uzmi iz APP-a (imaš oglas u Računarima)
knjigu za apsolutne početnike o VB u njihovom izdanju. To sam ja
kupio kada sam čuo za VB, a nisam imao kući dovoljno jaku makinu da
ga instaliram. Pročitao sam je 3 puta. Sada mi je knjiga smešna,
ali draga. Cijena - sitnica.
basic.66babbage,
Thanks!
babbage
basic.67cubra,
QBX PDS 7.1 + library?
Molio bih za pomoć nekog iskusnijeg. Nabavio sam skoro MS BASIC 7.1
a skinuo sam i biblioteku QBEVGFX3.LIB, ali ne znam kako da je pustim
u rad. U uputstvu za biblioteku piše da treba biblioteku linkovati
naredbom:
LINK /QU QBEVGFX3.LIB,QBEVGFX.QLB,nul,QBXQLB
ali se posle toga traži neki Definitions file (NUL.DEF)
a ja ne znam šta je to. Posle toga se čak napravi neki fajl koji se
zove QBEVGFX.QLB i ja pozovem BASIC komandom:
QBX /l qbevgfx.qlb
međutim kada pozovem neki podprogram iz biblioteke, npr. stavim
u program BLANKSCN 1, pri izvršavanju mi ispiše grešku "subprogram
not defined" i pod helpom da taj podprogram nije našao ni u jednom
modulu ni biblioteci.
Pa molim za neke odgovore, ili gde da to pročitam:
-Kako se radi sa bibliotekama, zašto se linkuju, kakva je razlika
između .LIB i .QBX, kako se pozivaju podprogrami iz biblioteka,
mogu li se koristiti i kada se program interpretira (kad ga još
nisam preveo), kako se poziva HELP za linker (vidim da ima neki
LINK.HLP fajl a ne znam kako da pročitam karakuke koje se u njemu
nalaze) i kako se pozivaju ostali help fajlovi kojih ima masa u
poddirektorijumu /HELP.
Bio bih jako jako zahvalan, jer gubim već sate i sate uzaludno...
žubra
basic.68zeljkoj,
-> #67, cubra> ali se posle toga traži neki Definitions file (NUL.DEF)
Ma lupi samo ENTER.
> međutim kada pozovem neki podprogram iz biblioteke, npr. stavim
> u program BLANKSCN 1, pri izvršavanju mi ispiše grešku
> "subprogram not defined" i pod helpom da taj podprogram nije
> našao ni u jednom modulu ni biblioteci.
A da li si "uključio" include fajl sa deklaracijama procedura i funkcija?
> -Kako se radi sa bibliotekama, zašto se linkuju, kakva je
Kao i u svim drugim jezicima.
> između .LIB i .QLB, kako se pozivaju podprogrami iz biblioteka,
Razlika je u tome što .QLB biblioteku koristiš kada izvršavaš program
iz okruženja, a .LIB je standardni tip biblioteke koji koristiš pri
linkovanju programa.
> mogu li se koristiti i kada se program interpretira (kad ga još
> nisam preveo), kako se poziva HELP za linker (vidim da ima neki
Da, ali QBX moraš startovati sa QBX /L ImeQBXBiblioteke
> LINK.HLP fajl a ne znam kako da pročitam karakuke koje se u
Koristi program QH (Quick Help).
> Bio bih jako jako zahvalan, jer gubim već sate i sate
> uzaludno...
Eh, ja sam gubio dane i dane... ;)) Već tri godine se zaludjujem tim
QBX-om, ali sada sam ga konačno "provalio".
;))
Svašta on ima: procedure i funkcije za menije, prozore, miša, fontove,
bazu podataka, itd...
Samo pažljivo prouči onih stotinak primera iz \SRC direktorijuma, i pročitaj
pažljivo help.
basic.69maksa,
-> #68, zeljkoj>> Svašta on ima: procedure i funkcije za menije, prozore, miša,
>> fontove, bazu podataka, itd...
Njegova osnovna mana je što ima samo dva memorijska modela -
jedan koji bi, pretpostavljam, bio najbliži C compact memorijskom
modelu, i drugi kome bi odgovarao huge.
Ako je program ozbiljan, upotreba bilo koje biblioteke te skoro
automatski uteruje u huge model, a tu se stvari katastrofalno
usporavaju (spram onog prvog). Kod koji pravi je poslovično brz
MS kod, i nadasve pouzdan.
Ima i kompletnu biblioteku za rad sa matricama, al' kod nje ne
pomaže kopanje po primerima. Uputno je :) imati uputstvo.
basic.70zeljkoj,
-> #69, maksa> usporavaju (spram onog prvog). Kod koji pravi je poslovično brz
> MS kod, i nadasve pouzdan.
Sad će Borlandovci da se bune. ;>
> Ima i kompletnu biblioteku za rad sa matricama, al' kod nje ne
> pomaže kopanje po primerima. Uputno je :) imati uputstvo.
Ipak pomaže pregled primera. :))
basic.71cubra,
-> #68, zeljkojE pa, veliko ti hvala. Mnogo si mi pomogao, sad ću da prionem na Help!
pz
basic.72zeljkoj,
> ===============================
> 8.83 PC.PROG.5:cccc
> maksa, 04.03.95. 13:54, 452 chr
> ---------------------------------------------------------
> Shareware SVGA biblioteka za Borland/Microsoft C/C++. Mnogo bolja
> od svgabgi i sličnih. Između ostalog, sadrži f-je za 2D/3D translacije,
> rotacije, skaliranje, osnovne mouse f-je, čitanje/pisanje GIF-ova,
> tabelarno ubrzane trigonometrijske f-je ...
> Pokriva sve od 320x200x256 do 1024x768x256. Zahteva 386 ili bolje.
Evo zakačio sam uz poruku isto ovo, ali za BASIC.
U DOC-u piše da je biblioteka namenjena QuickBasic-u 4.x, ali ja sam je
isprobao sa MS BASIC-om 7.1, i sasvim lepo radi. Na žalost, zahteva 386,
ali zato je jako brza. :))
Evo i dela helpa:
*****************************************************************************
INTRODUCTION
*****************************************************************************
SVGAQB10 is a Super VGA graphics library designed for use with
MS Quick Basic 4.X. It is written in 100% assembly language for the best
possible speed. It provides the MS Quick BASIC programmer with an easy
interface to the high resolution/high color video modes of the newer SVGA
video cards. Because there is no "standard" for VGA video cards above the
320x200x256 resolution, each video card manafacturer has implemented a
slightly different method to access these high resolution/high color video
modes. This graphics library will automatically identify the video card and
its installed memory. This way, the programmer may write graphics programs
that will work on most any SVGA card without writing specific versions for
each individual SVGA card. Over 70 subroutines and functions are provided.
*****************************************************************************
SYSTEM REQUIREMENTS
*****************************************************************************
This SVGA graphics library requires a 386sx or bettor processor (to
take advantage of 32 bit instructions) as well as one of the following Super
VGA video card brands/chip sets:
Acumos SuperVGA
ATI Technologies SuperVGA
Ahead V5000 ver A SuperVGA
Ahead V5000 ver B SuperVGA
Chips and Technologies SuperVGA
Cirrus Logic CL-GD 500/600 SuperVGA
Everex Micro Enhancer SuperVGA
Genoa SuperVGA
NCR 77C22E SuperVGA
Oak Technologies OTI-067/037C SuperVGA
Paridise/Western Digital SuperVGA
Trident 8800/8900 SuperVGA
Tseng Labs 3000 SuperVGA
Tseng Labs 4000 SuperVGA
Video 7 SuperVGA
All VESA compatible SuperVGAs (version 1.00 and greater)
The maximum resolution is dependent on the video card, its
installed memory, and the video monitor. ALL VGA video cards support the
320x200x256 video mode. 512k of video memory is required to support the
640x480x256 and 800x600x256 video modes. 1 meg is required to support the
1024x768x256 video mode.
Also, video card manufactures are starting to provide VESA drivers
for their video cards. Contact the technical service department of your
video card manufacturer and see if they have a VESA driver available for
your card.
svgaqb10.zipbasic.73cubra,
-> #72, zeljkoj.oOo. Evo zakačio sam uz poruku isto ovo, ali za BASIC.
Vrlo dobro!
basic.74bulaja,
-> #72, zeljkoj│SVGAQB10 is a Super VGA graphics library designed for use with
│MS Quick Basic 4.X.
└───
Prebačeno je u R:\PROGRAM dir, hvala na prilogu :).
basic.75zeljkoj,
Evo jedne lepe biblioteke za BASIC. :) Ima stvarno sve što vam može
zatrebati: rad sa stringovima, xms/ems memorijom, grafikom, fajlovima,
funkcije za detekciju cdroma, i još mnoooogo lepih&korisnih stvari.
Skoro cela biblioteka je napisana u asembleru.
PBClone 2.2 library for MS BASICs:
QB, PDS, VB-DOS. Over 610 routines of all
descriptions. LIBMATxx.ZIP or LIBWIZxx.ZIP
recommended for creating subset libraries.
Iako se biblioteka može kreirati uz pomoć običnih LINK/LIB utilityja,
ipak ću poslati taj LIBWIZ prvom prilikom. :)
Biblioteka se sastoji iz dve arhive.
Evo prve. :)
pbc22a.zipbasic.76zeljkoj,
A evo i druge. :)
pbc22b.zipbasic.77zeljkoj,
Evo i LibWiz utilityja za lakše kreiranje biblioteka.
file_id.diz:
Library Wizard v1.4 for managing MS BASIC
libraries. LibWiz lets you create custom
libs, including .QLB and .BI declarations,
and resolves interdependencies of one
routine on another automatically.
libwiz14.zipbasic.78vlador,
Može li neko da preporuči literaturu za Visual Basic?
---
■ vlador ■ Dzentlmen, ajm going tu sej uan ting: magbet!
basic.79nick,
Imam problem, kako da preradim sledeci potprogram
tako da moze da salje screen na laserski stampac
300x300 dpi bar u rezoluciji 150x150 (u pitanju
je HP LASER JET 4L).
Sub HardP24(X1%,Y1%,X2%,Y2)
N%=X2%-X1%+1: N1%=N% MOD 256: N2%=N%\256
Print #9, FnLineFid$(7.5);
For Y%=Y1% to Y2% step 12
Print #9, Chr$(27);"*";Chr$(38);Chr$(N1%):Chr$(N2%);
For X%=X1% to X2%
A%=0: B%=0: C%=0: K%=2
Ya%=Y%+3: Yb%=Y%+7: Yc%=Y%+11
For I%=0 To 3
If Ya%<=Y2% Then A%=A%+FnPnt%(X%,Ya%)*K%
If Yb%<=Y2% Then B%=B%+FnPnt%(X%,Yb%)*K%
If Yc%<=Y2% Then C%=C%+FnPnt%(X%,Yc%)*K%
Ya%=Ya%-1: Yb%=Yb%-1: Yc%=Yc%-1: K%=4*K%
Next I%
Print #9, Chr$(A%);Chr$(B%); Chr$(C%);
If Inkey$=Chr$(27) Then Exit Sub
Next X%
Print #9,
Next Y%
Print #9,
End Sub
Def FnPnt%(X%,Y%)
Shared Fgr%
P%=Point(X%,Y%)
If P%=0 Then
FnPnt%=0
Else
If P%=Fgr% Then FnPnt%=1 Else FnPnt%=(X%+Y%) MOd 2
End if
End Def
Unapred hvala.
pozdrav, nick
basic.80eotek,
VB 3.0 i tekst, VB i C
========================
1. Kako da u tekst ramu sa vertikalnim skrolbarom
prikazem tekstualni fajl duzine oko 40 KB ? (Postoji funkcija
LoadPicture, ili tako nekako, a ne videh "LoadText" ?)
2. kako i da li se mogu VBprgs povezivati sa C kodom ?
Molim za "idiot-proof" objasnjenja, basic mi je potpuno
stran, o vizuelnosti i da ne govorim ;)
basic.81cubra,
-> #77, zeljkoj.oOo. Evo i LibWiz utilityja za lakše kreiranje biblioteka.
Pomagajte! Napravio sam biblioteke pbclone.LIB i pbclone.QLB pomoću LibWiz.
Ova prva radi, a ova druga (QLB) jok! Kada startujem basic sa
QBX /l pbclone.qlb
javi mi sledeće:
Error in loading file (pbclone.qlb) - invalid format
Jel može neko da mi pomogne?
Denis
basic.82zeljkoj,
-> #81, cubra> Ova prva radi, a ova druga (QLB) jok! Kada startujem basic sa
>
> QBX /l pbclone.qlb
>
> javi mi sledeće:
>
> Error in loading file (pbclone.qlb) - invalid format
> Jel može neko da mi pomogne?
žudno. Takvu poruku obično ispisuje kad je QLB napravljen nekom drugom
verzijom BASIC-a. Verovatno si pogrešio pri linkovanju. :)
Ja sam pravio .LIB i .QLB bez LIBWIZ-a, samo pomoću LINK-a i LIB-a, i sve
radi. Probaj i ti tako, imaš uputstva u PBCLONE.DOC. Ako ne pomogne, viči
pa ću da ti mailnem moj QLB. :))
basic.83zeljkoj,
Evo još jedne dobre biblioteke za BASIC.
File_Id.Diz:
BASIC Wizard's Library for QuickBasic and
PDS. BCD math, telecomm, graphics from Herc
to SuperVGA and dot matrix to laser printer,
equation solver, far strings in EMS, virtual
windowing system, more. Now includes source
for BASIC routines. LIBWIZxx.ZIP is needed
to create the library. By Tom Hanlin.
U R:\PROGRAM se nalazi ASMWIZ - ista ova bibioteka ali za asembler, pa
mislim da bi i ovu, BASWIZ trebalo prebaciti tamo.
Program LIBWIZ, koji je potreban za kreiranje biblioteke, sam već poslao
ovde. Zapravo on i nije _baš_ potreban - biblioteka se može sastaviti uz
pomoć običnog linkera i LIB utility-ja, ali to zahteva malo više vremena.
basic.84bulaja,
-> #83, zeljkoj│U R:\PROGRAM se nalazi ASMWIZ - ista ova bibioteka ali za asembler,
│pa mislim da bi i ovu, BASWIZ trebalo prebaciti tamo.
└───
Tamo je i prebačena :), hvala na prilogu.
basic.85mister.h,
Da li Visual Basic moze da iscita podatke sa COM1. Znaci,
^^^^^^^^^^^^^^^^^^^^^^^
bez modema, direktno. Preciznije na COM1, u buffer stizu
u hex formatu podaci (1A,..,FF,..), dakle po 2 bajta.
Znaci kako u VB 3.0 onog trenutka kad stigne podatak da
ga procita? Hvala unapred. (Pokusao sam ovako?)
Sub Form_Load ()
Dim Dummy
Comm1.CommPort = 1
Comm1.Settings = "9600,n,8,1"
Comm1.PortOpen = True
Do
Dummy = DoEvents()
Loop Until Comm1.InBufferCount >= 2
MsgBox Comm1.Input
Comm1.PortOpen = False
End Sub
Pokusao sam ovako, ali u MsgBox-u izbacuje svasta!
basic.86mister.h,
-> #85, mister.h> Da li Visual Basic moze da iscita podatke sa COM1. Znaci,
> ^^^^^^^^^^^^^^^^^^^^^^^
Posto izgleda niko ne prati ovu konferenciju,
sam odgovaram, dakle
nasao sam funkciju: ComInput(), koja
"prihvata i uklanja string iz prijemnog buffera"
.
.
jos, samo kad bi sintaksu provalio.....
basic.87zkis,
-> #80, eotek1. Nisam siguran da sam razuemo ovo prvo. Ako imas text1 na formi, stavis
vertical scroll bar i multiline property na true doboljno je da napises:
text1.text = "Ko to tamo peva...." ili
text1.text = promenjiva đ polje iz datoteke itd
2. C moze da lako veze sa VB-om pomocu DLL-a
U C-u napravis DLL sa glavnom LibMain funkcijom i svojim funkcijama po zelji.
Mozes ubaciti u RC script dijaloge, curzore, ikone , a moze i bez RC script-a
tj. suve funkcije. Kada to napravis i linkujes u DLL u VB-u pomocu
DECLARE naredbe registrujes taj DLL i njeove funkcije (ili funkciju) i posle je
pozivas iz VB-a na standardni nacin sa ulaznim parametrima.
Za ovo koristim BC++3.5 for Win.
Ako su ti potrebni detalji reci, pa cu da ti vrnem neki primer.
Pozdrav Misa
(Ovo Zkis je pozajmljeni od ortaka user)
basic.88eotek,
-> #87, zkis> text1.text = "Ko to tamo peva...." ili
ovo je jasno i radi za male stringove (<32 kb)
> text1.text = promenjiva d polje iz datoteke itd
hm, treba mi tekstualni fajl, plain ASCI, u medjuvremenu
sam pre(na)pravio OpenFile, ali nesto jednostavnije bi bilo bolje
> ovo koristim BC++3.5 for Win. Ako su ti potrebni detalji reci,
> pa cu da ti vrnem neki primer.
svaki primer dobro dosao ;)
basic.89mister.h,
-> #86, mister.h>> Da li Visual Basic moze da iscita podatke sa COM1. Znaci,
>> ^^^^^^^^^^^^^^^^^^^^^^^
Dosta ljudi mi je trazilo resenje ovog problema,
pa saljem program pomocu kojeg sam dosao do resenja.
Pozdrav i hvala svima.
vbcomm20.zipbasic.90aleck,
Imam u jednoj formi definisan FileListBox koji se zove lst_Of_File.
Interpreter mi prijavljuje da ne postoji Path property za njega u sledećoj
liniji:
lst_Of_File.Path = dir_Of_Dir.Path
gde je dir_Of_Dir DirListBox.
Po helpu i svemu ostalom ovo bi trebalo da je ispravno.U čemu je problem?
basic.92jovca.car,
-> #90, aleck/* Po helpu i svemu ostalom ovo bi trebalo da je ispravno.U čemu je problem?
Ovo _jeste_ ispravno. Probaj da obrišeš celu liniju, pa da je napišeš opet.
Zvuči glupo, ali mi je jednom rešilo sličan problem. :))
A da koristiš CMDIALOG.VBX?
basic.93kdrazan,
Kako da mu u VB-u riješim sljedeći problem:
Pravim neki priručnik, koji ima, onako, nepravilan
broj labela na svakom sljedećem formu. Labele mi služe
za ispisivanje teksta. Htio sam da uradim sljedeće:
da kažem VB-u da ako zatražim tu i tu lekciju, da mi
otvori neki novi form (il' postojeći, to je već svejedno)
međutim da mi po potrebi kreira nove labele i da im
zadam mjesto pojavljivanja (dobro za text je lako).
Dakle šta: na formu želim da mi se, ovisno od
želje pojave do tada ne postojeće labele (sada se to
odnosi na labele - može to biti bilo koji drugi objekat)
nad čijim pozicioniranjem bih ja mogao da imam kuckajuću
kontrolu...
Do sada sam to izvodio svaki put kreiranjem novog
forma, međutim beskonačan je to posao (i na kraju bih dobio
1000 formova - ovako hoću od jednog da napravim stotinu:
svaki put sa drugim sadržajem), dalje ima li načina da se
ubaci GIF-ić u VB. Gledao sam onaj VB Fundamentals, pa ljudi
rade sve sa GIFovima.
Izvinjavam se na zivjesnoj konfuznosti kod postavke
svog problema i zahvaljujem se svima koji budu imali
strpljenja da ovo pročitaju (a još i ako odgovore...) :)))
Dražan
basic.94.obj,
-> #93, kdrazan> da kažem VB-u da ako zatražim tu i tu lekciju, da mi
> otvori neki novi form (il' postojeći, to je već svejedno)
VB.HLP, "Adding and Deleting Controls at Run Time".
Uzgred, program o kome govoriš možda bi se mogao jednostavnije uraditi kao
obična HLP datoteka...
basic.95kaplan,
Da li neko ima kasete sa bejzikom i drugim programima
za stari Sharp MZ-700
Javiti se Duletu na 021/333-781
ili meni na mail
Pozdrav
basic.96kdrazan,
-> #94, .obj Ma znam momčino, pokušao sam ja svašta nešto prije nego li sam
ovamo zvrkn'o poruku. Tamo ima objašnjeno ubacivanje option dugmeta
međutim sa ovim mojim je to išlo malo komplikovano, naime uopšte
nije htio da mi kreira labelu u run-time :(
Jest' išlo bi to i kao help fajl, mećutim program treba da ima
(i ima) još neke kontrole koje se u helpu ne mogu izvesti
(recimo pravljenje nekih vježbica i sl.)
Dražan :))
basic.97superhik,
Jel može neko da mi preporuči knjigu o VB-u?
basic.98boko,
Kako se pravi QLB od LIB ?
Svuda pise da bi trebalo sa LINK /QU bibl.LIB,, . . . . ., ali kad to pokusam
link kaze da ne poznaje /QU switch ?
basic.99boko,
Kako u QuickBASIC-u 4.5 ili slicnom povecati stack, ali ne
pomocu CLEAR ?
basic.100boko,
Da li neko ima spisak switch-eva za kompajler QB 4.5 ?
basic.101pmarovic,
Zdravo,
Ima li dje novih kontrola za VB (novih VBX-ova)?
Ako ima dje ih ima? Posebno me interesuje kontrola kojom se dobijaju dijalozi
kao u Word for Windows 6 (listanje kataloga)
Unaprijed hvala, Pedja
basic.102zeljkoj,
-> #98, boko> Kako se pravi QLB od LIB ?
> Svuda pise da bi trebalo sa LINK /QU bibl.LIB,, . . . . ., ali
> kad to pokusam link kaze da ne poznaje /QU switch ?
Nije /QU nego samo /Q. Pogledaj poruke u ovoj temi u konf PC.PROG.5
i PC.PROG.4, već je više puta bilo reči o Quick Libraries.
Za pravljenje .QLB je, osim linkera, potrebna i biblioteka QBXQLB.LIB
ukoliko radiš sa MS QBX PDS 7.x, ili neka druga sličnog imena ukoliko
radiš sa nekim drugim jezikom, ili običnim QB-om.
basic.103zeljkoj,
-> #99, boko> Kako u QuickBASIC-u 4.5 ili slicnom povecati stack, ali ne
> pomocu CLEAR ?
Ne znam za 4.5, ali u 7.1 postoji naredba STACK kojom postavljaš veličinu
steka. STACK može da radi i kao funkcija, i u tom slučaju vraća veličinu
steka.
basic.104zeljkoj,
-> #100, boko> Da li neko ima spisak switch-eva za kompajler QB 4.5 ?
Nemam za 4.5 ali evo ga za 7.1:
Microsoft (R) BASIC Compiler Version 7.10
Copyright (C) Microsoft Corporation 1982-1990. All rights reserved.
Usage: BC sourcefile [objectfile] [listingfile] [optionlist] [;]
Options:
/? Display BC options /Ii:n Set number of ISAM indexes
/A Generate assembly listing /Lp OS/2 protected mode
/Ah Enable huge dynamic arrays /Lr DOS or OS/2 real mode
/C:n Set default COM buffer size /MBF Support MS binary format numbers
/D Run-time error checking /O Compile stand-alone EXE
/E Enable ON ERROR checking /Ot Quick call optimization
/Es Enable EMS sharing /R Store arrays in row-major order
/FBr Restricted Browse info /S Disable string compression
/FBx Extended Browse info /T Terse: no compiler warnings
/FPa Alternate math pack /V ON EVENT check each statement
/FPi 80x87 or emulator math pack /W ON EVENT check each label
/Fs Enable far-string support /X Enable RESUME NEXT support
/G2 Code generation for 286 /Z PWB-style error messages
/Help Display help on BC /Zd Limited CodeView information
/Ib:n Set number of ISAM buffers /Zi Full CodeView information
/Ie:n Reserve non-ISAM EMS