clipper.715ciki,
Ho!
Posto nisam dobio odgovor, ponavljam pitanjce.
1.
procedure Ja
local ff:=0
...
vv:=0
...
...
return
Pitanje: Kako je deklarisano vv
a) Public && Nije ali ipak da se vidi
b) Local
c) Static
d) Private
P.S. Tacan odgovor zaokruziti
2. Zasto ovo rad if konto==alltrim(sifra) , a ovo
copy to u1 for konto==alltrim(sifra)
Pozdrav Ciki!
clipper.716d.petrovic,
-> #715, ciki> procedure Ja.
> local ff:=0
> ...
> vv:=0
> ...
> ...
> return
>
> Pitanje: Kako je deklarisano vv
> a) Public && Nije ali ipak da se vidi
> b) Local
> c) Static
>╔════════════╗
>║ d) Private ║
>╚════════════╝
> P.S. Tacan odgovor zaokruziti
> 2. Zasto ovo rad if konto==alltrim(sifra) , a ovo
> copy to u1 for konto==alltrim(sifra)
Šta je pisac hteo da kaže ?!
Hi!
P.S.
R:Đ>mail wr d.petrovic
Dolazim inkriminisanog dana u Bgd... :)
clipper.717ciki,
-> #716, d.petrovic>> 2. Zasto ovo rad if konto==alltrim(sifra) , a ovo
> copy to u1 for konto==alltrim(sifra)
>
> Šta je pisac hteo da kaže ?!
Pisac je hteo da kaže ovo:
Kada ispitujem uslov sa if-om, sve radi Ok, tj. za odredjen uslov
program ga prepozna i nastavi da radi naznečeno.
Ako 1 proceduru i to handmade zamenim sa onim
COPY..., program neće da radi.
Znači umesto COPY..., ja sam pisao uz pomoc for, if ,... 1 proc.,
koja zamenjuje COPY....
P.S. Hvala ti za odgovor. Mrzelo me je da testiram prg. preko
debugger-a.
Pozdrav Ciki!
clipper.718ndragan,
-> #712, dpaun/ Molim znalce za komentar. Reč je o prestižu Sezama; toliko sam ga
/ nahvalio prijatelju da je ovo poduže ćutanje kontraproduktivno.
Xm, to je moglo na Spektrumu, može na Meku, Atariju i Amizi - znači na
računarima koji su stalno u grafičkom modu. Kod PCa postoji caka da je
set naredbi za ispis u tekst režimu i u grafičkom režimu sasvim
različit (u jednom slučaju se 'gađaju' određene lokacije u video
memoriji kodovima slova, a u drugom se na grafičkom ekranu 'crtaju'
slova).
Eventualno da nateraš kliper da radi stalno u grafičkom režimu, ili da
koristiš neku bazu za pendžere - ne znam za bolji način. Jel neko
uopšte probao nešto od ta dva?
clipper.720d.petrovic,
Braćo po CLIPPER-u:
U P O M O O O O O O O O O O Ć !!!!!!!!
Elem da počnem:
Hteo sam da biblioteku NANFOR.LIB sredim, t.j. da izmenim pet funkcija
(znate već koje) da ne bi morao da ih duplo definišem u programu.
Glavni razlog za to je što tu biblioteku nemogu da smestim u *.PLL fajl,
jer kasnije te funkcije neće biti predefinisane i program neće raditi kako
valja.
E, tu se javlja problem:
LIB.EXE (verzija 3.15, a pre toga i verzija 3.10) završi svoj pos'o,
izmeni šta već treba i biblioteka je prividno OK., ali...
Neke druge funkcije, koje ja nigde nisam pomenuo pri radu sa LIB-om, a to
su:
FT_DEC2BIN
FT_DEFAULT
FT_SQZN
FT_ORIGIN
onda neće da rade, t.j. kad linker (rtlink) formira *.EXE fajl njih prijavi kao
nedefinisane (možda bi prijavio i neke druge da ih koristim u programu).
Pokušavao sam i njih da vadim pa da vraćam u biblioteku, ali sve je
ostajalo po starom :(
Vrlo važno:
Ovo se dešava samo pri radu sa *.PLL bibliotekom (zbog koje je sve ovo i
počelo), a ako sve normalno linkujem sve je OK.
Još važnije:
OVO SVE ME TOLIKO NERVIRA DA 'OĆU IZ KOčE DA IZAĐEM, žAS OĆE, žAS NEĆE,
PRAVIO SAM JE I RASTURAO n PUTA (n>>50) I UVEK ISTO, ISTE FUNKCIJE, ISTA
SR*NJA. Dobro de, mogu ja njih i da izbacim iz programa dok je u razvoju,
ali NEĆU!
Ajde neka dobra duša nek proba da mi to reši, jerbo ja za taj pos'o nemam
više ič živaca.
Za sada prilažem listu funkcija u biblioteci (iz zadnjeg pokušaja) i oba
RMK fajla, onaj sa kojim radi, i onaj sa kojim me za*ebava. Ako nekom bude
trebala zakačiću i biblioteku, da je ne šaljem sad džabe kad to svi imate.
Ajd zdravo, znam da će neki da me pcuju što sam im i ovoliko napunio pad.
Hi!
list.arjclipper.721nbatocanin,
-> #712, dpaun>>> 2. U vezi grafike u Clp: može li se, u toku uobičajenog
>>> tekst moda, kreirati jedno prozorče pa tamo nešto
>>> izgrafikovati? A!
Slike se mogu crtati samo u grafičkom modu. Ne postoji mogućnost
mešovitog moda - ili je grafički ili tekst. Naravno, slova se mogu
crtati i u grafičkom modu, a to je verovatno ono što ti treba. Neke
grafičke biblioteke omogućavaju da bez ikakvih prerada Clipper
program radi u grafičkom modu. Ja znam da to ima dGE, a mislim i
Force i Flipper.
clipper.722toma,
-> #714, dejanr■■>>>> 2. U vezi grafike u Clp: može li se, u toku uobičajenog tekst
■■>>>> moda, kreirati jedno prozorče pa tamo nešto izgrafikovati? A!
■■>>
■■>> Ne može, koliko znam. Clipper radi samo u tekst modu.
Ajde mi ti, života ti, u nekom jeziku >koji radi i u graf modu<
napiši program koji će u tekst modu samo jedan prozor da prebaci
u graf mod. Još ako to radi i na hercules onda svaka ti čast.
-=> Toma <=-
clipper.723zkrstic,
-> #717, ciki> P.S. Hvala ti za odgovor. Mrzelo me je da testiram prg. preko
> debugger-a.
Znam još jednog takvog ;) Aman, šta ti je teško da malo brčneš
prstiće kroz dibager i iskopaš šta te zeza :)
Zkr
clipper.724ciki,
Zdravo!
Imam jedan problem oko arhive r075clpr.zip iz Đrsoft-a sa sezama.
Ukratko evo u cemu je stos.
U arhivi se izmedju ostalog dobijaju 2 source fajla na asembleru,
koja moj masm 6.0 ne moze da prevede!!!!!!!!!!!!!!!!!!!!!!!!!!!!
1. Ako prevodim program onakav kakav jeste, javi mi gresku da
ne moze da nadje EXTENDA.INC(e se bese tako zove).
2. ja mu onda izbacim ono l: iz INCLUD direktive (kad ono bolje da
to nisam radio)
3. Izbacuje mi xž12312313 greskica(Saljem jedan txt fajl,pa ce te
tu moci da vidite sta me muci.)
Propratni fajl je pisan nbatocanin-u, pa ako se njegovo ime
pomene, vi smatrajte da ste to vi :)))
P.S. Nemoj neko da pomisli da nemam EXTENDA.INC(Imam Imam.Dobio ga
uz Clipper 5.01 u dir. INCLUDE), ali NEEEEE RAAADIIIII!!!!!
Da nije u pitanje MASM.
Ako je neko preveo ta 2 fajla, zamolio bih ga da mi OBJ nakaci ili u
mail ili ovdiii!
Izvinite na ovolikoj gnjavazi.
Unapred hvala
Pozdrav Ciki!
ciki.arjclipper.725toma,
Ima li neko uputstvo za Flipper.
Bilo kakvo, sem NG-a.
clipper.726ppekovic,
-> #725, toma>> Ima li neko uputstvo za Flipper.
Svrati večeras do kluba.
BTW. Pošto je tema grafike i clipper-a jedna od onih koje nazivamo
večitima, a nije se do sada pronašao dobar način za njenu realizaciju, jel može
neko ko ima neka iskustva sa tim flipper-om (jel beše 5.0 verzija) da kaže da
li smo konačno našli rešenje za večiti problem?
Paya
clipper.727toma,
-> #726, ppekovic■■>> Svrati večeras do kluba.
Eto, a nisam ni znao da i u Paraćinu postoji klub. :(((((
clipper.728dpaun,
-> #724, ciki
>> 1. Ako prevodim program onakav kakav jeste, javi mi gresku da
>> ne moze da nadje EXTENDA.INC
Problem je sigurno u putanji.
U autoexec.bat treba da imaš:
SET INCLUDE=C:CLIPPER5ĐINCLUDE /tj. konkretnu putanju do *.inc fajlova/
Onda ti u zaglavlju *.asm fajla ne treba l:, dovoljno je:
INCLUDE EXTENDA.INC, ili umesto l: napiši celu putanju:
INCLUDE C:ĐCLIPPER5ĐINCLUDEĐEXTENDA.INC
Onda MASM ImeAsmFajla ...
dPaun.inc
clipper.729hercog,
-> #726, ppekovic
Koliko je to uputstvo?
Hercog
p.s. ako neće Toma može posudba na jednu drugu stranu?
clipper.730toma,
Bavi li se neko od vas pisanjem UKRAS rutina za clipper ?
clipper.731ciki,
-> #728, dpaunHo!
Da ti nesto kazem unapred.
Nije problem u putanji posto:
1. Imam u autoexec-u definisan taj path.
2. Extenda.inc sam ubacio i u INCLUDE dir i u tekuci dir iz koga
vrsim kompajliranje.
Ono sto je glavni su linije 78,79,80,81(tako nesto) u fajlu
EXTENDA.INC -----
Znaci ili nisam naveo odgovarajuce prekidace prilikom kompa., ili ...
P.S. Ipak hvala ti na trudu i izgubljenom vremenu.
Sto se tice uputstva za Flipepr 5.0 (Da ne bi ponovo pisao porukicu),
nije mi jasno sta ce ti uz onolike primere i onakav NG(ali ima nas
raznih)
Pozdrav Ciki!
clipper.732ratman,
Imam AT/12MHz sa 1M RAM, pa mi je RTLink od Clipper-a strasno spor.
Sta sve moze da se uradi da se ovo ubrza?
A da probam dobri stari TLink? Bar dok pravim samo
male, probne pgm.e?
Pozdrav,
Dejan
clipper.733ratman,
Gde se, ustvari nalaze trigonometrijske funkcije za Clipper (i slicne njima)?
MIsl'o sam da je u EXTEND.LIB, ali jok...
clipper.734toma,
-> #729, hercog■■>> p.s. ako neće Toma može posudba na jednu drugu stranu?
Oće toma uputstvo ali ne može na dođe u klub. :((((
clipper.735janko,
-> #730, toma>
> Bavi li se neko od vas pisanjem UKRAS rutina za clipper ?
>
Tomo, majstore! Ja ne, ali, ako počneš da pišeš i negde zapneš,
imaš moju podršku. Napr. epoštom.
Dodatno pitanje:
***************************************************************
A ima li neko ko bi to FINANSIRAO? CLIPPER aplikacije su
izuzetno komercijalne. Napr. neka softverska firma, pa da to
bude njeno ekskluzivno vlasništvo? Ili opet sanjam, da to može
i kod nas?
***************************************************************
clipper.736bulaja,
-> #735, janko│ A ima li neko ko bi to FINANSIRAO? CLIPPER aplikacije su
│ izuzetno komercijalne. Napr. neka softverska firma, pa da to
│ bude njeno ekskluzivno vlasnistvo? Ili opet sanjam, da to moze
│ i kod nas?
└───
A sta da bude vlasnistvo? Koliko sam video C/PAS verziju Ukrasa, prenos
na Clipper bi zahtevao "tezak" rad izmedju dva zvanja Sezama :), znaci
nekoliko sati. Ako mislis da na tome namlatis lovu ...
Vecina onih koji ozbiljnije rade sa Clipper-om verovatno ima vec neki
svoj sistem za rad sa razlicitim YU standardima, tako da ne verujem da
bi im mnogo trebao Ukras :).
clipper.737fric,
-> #731, ciki> Nije problem u putanji posto:
> 1. Imam u autoexec-u definisan taj path.
Ako ga imaš u path = ..., onda jeste problem u tome jer se kroz
promenljivu path mogu nalaziti samo exe, com i bat fajlovi.
Ako imaš eksplicitno deklarisano SET INCLUDE=... - e onda stvarno
ne znam.
fric
clipper.738fric,
Muči me sledeće:
Treba da štampam dokument sa lepim zaglavljem. Nacrtam zaglavlje u
Corelu, iz WP-a doteram i snimim u fajl, ručno CR na kraju zamenim
sa LF. Sve je u redu, sad treba napraviti rutinu u clipperu koja će
crtati zaglavlje (tj. logo) pa ispisivati tekst ispod.
Zaglavlje ispišem jednim RUN ('copy logo.prn lpt1 > nul')
I to lepo radi, ali nikako ne mogu da posle toga nateram štampač
da primi i ispiše ostatak teksta (štampač je LQ550). Stavio sam
iza gornje RUN naredbe jednu petljicu u kojoj se čeka da štampač
nacrta šta ima (isprazni bafer, tj. da ISPRINTER() da bude true).
Proveravao sam dibagerom, ta petlja se uredno provrti, ali štampač
ništa dalje ne štampa, iako se PROW() uredno inkrementira:
SET DEVICE TO PRINT
SET PRINTER TO cLptG
č PROW() ,0 SAY CHR(27) + 'č' //inicijalizacija printera
č PROW()+nDYG,0 SAY Razmak_8 + Elit_ON + 'tekst...'
...
Nije radilo ni kada sam ubacivao/izbacivao liniju sa kodom za
inicijalizaciju štampača, ni kada sam u logo.prn apendovao na kraj
isti taj kod ... Štampač samo ostane on-line i ne reaguje.
Pretpostavljam da se neko na Sezamu bavio sličnim poslom i da ga je
uspešno okončao - kako je ovo realizovao ?
fric
clipper.739ciki,
-> #737, fricHo!
::>>Ako imaš eksplicitno deklarisano SET INCLUDE=...
Imam eksplicitno definisan path!!!!
Ma ljudi nije putanja problem vec veza MASM 6.0 i EXETNDA.INC.
P.S. Ali najbolje bi bilo da to zaboravimo!!!!!!
P.P.S. Nisam bas dobro procitao tvoju porukicu, ali imas nesto
slicno u nekom od starijih racunara.
Pozdrav Ciki!
clipper.740kzoran,
Ljudi,
da li SORT source i SORT target fajl mogu biti ista (source) datoteka, ili je
neophodno izvoditi vratolomije tipa
SELECT source
SORT ON key TO target
CLOSE source
USE target
COPY TO source
CLOSE target
ERASE target
USE source
INDEX ON key TO xx
CLOSE source
da bi na kraju sortirana datoteka imala isto ime kao na startu?
Odnosno, je li moguce uraditi jednostavno
SELECT source
SORT ON key TO source
i resiti problem?
Napominjem da bi navedene operacije trebalo vrsiti nekoliko puta u programu
sa 4(!) potencijalno vrlo velike datoteke, i da svaka usteda u vremenu moze
da bude fundamentaaaalna...
(Ako vas cudi ono indeksiranje sortirane datoteke, razlog je u tome sto se
na jednom mestu datoteci pristupa putem indeksa, a na drugom pristup mora da
bude funkcijom DBGOTO(x), koja indekse ne priznaje - inace mi sort ne bi ni
trebao.)
Pozdrav,
Zoran.
clipper.741zkrstic,
-> #730, toma> Bavi li se neko od vas pisanjem UKRAS rutina za clipper ?
Jok ;) Ja mrzim svoje kupce, korisnike i teram ih da rade il' sa
CP 852 il' sa Juskijem. I to kako meni volja ;) Ne dam im ništa da
biraju ;) Dovoljno je što su mene odabrali :))))))
Pozdrav, Zkr :)
clipper.742zkrstic,
-> #733, ratman> Gde se, ustvari nalaze trigonometrijske funkcije za Clipper (i
> slicne njima)? MIsl'o sam da je u EXTEND.LIB, ali jok...
Nema ih, na žalost tvoju.
Mislim da sam imao negde LIB sa takvim funkcijama, pa ako ga nađem,
šaljem vamo.
Pozdrav, Zkr
clipper.743zkrstic,
-> #740, kzoran> da li SORT source i SORT target fajl mogu biti ista (source) datoteka
NE!
Pozdrav, Zkr
clipper.744janko,
-> #736, bulaja> A sta da bude vlasnistvo? Koliko sam video C/PAS verziju
> Ukrasa, prenos na Clipper bi zahtevao "tezak" rad izmedju
> dva zvanja Sezama :), znaci
Znači... bićemo ti zahvalni da toliko uradiš. Ja sam mislio da
je to teže od C i Paskal verzije, jer mora da se piše na
mašincu da bi bilo efikasno... priznajem, meni bi trebalo dosta
vremena za takav poduhvat. Znači...
***********************************
žekamo Bulajun UKRAS za Clipper. :)
***********************************
(BTW molim te, da bude kompatibilan i sa Summer '87!)
clipper.745kzoran,
-> #743, zkrstic
> NE!
HVALA!
Pozdrav,
Zoran.
clipper.746pjankovic,
-> #730, toma> Bavi li se neko od vas pisanjem UKRAS rutina za clipper ?
Na osnovu jankovog programa u C-u napisao sam u Clipperu funkciju
za inicijalizaciju. Pošto se inicijalizacija vrši samo jedanput na početku
tu brzina nije kritična.
Funkciju juk() (koja vrši konverziju) sam modifikovao da se poziva iz
Clippera i da joj se prosleđuje tabela kodova. Brzinu nisam testirao ali
mi se čini da bi za većinu zahtjeva ova funkcija trebala da je dovoljno brza.
Ako ima zainteresovanih mogu to da okačim. Naravno, trebalo bi mi
malo vremena da sve to sredim i napišem neke komentare.
clipper.747pjankovic,
-> #732, ratman
> Imam AT/12MHz sa 1M RAM, pa mi je RTLink od Clipper-a
> strasno spor.
Ako već tako ne radiš, startuj RTLink sa opcijom /PLL:base50.
Korišćenjem Pre Link Libraries brzina linkovanja se po mojoj slobodnoj
procjeni povećava 2-3 puta.
clipper.748dpaun,
-> #739, ciki>> Ma ljudi nije putanja problem vec veza MASM 6.0 i EXETNDA.INC.
>> P.S. Ali najbolje bi bilo da to zaboravimo!!!!!!
Ma čoveče, takav defetizam nije u duhu Sezama!
Ajmo lepo od početka: prva poruka, koju si dobio, vezana bila je vezana
za putanju, onda si stvar rešio tako što si izbrisao ono l:, pa onda
prebacio EXTENDA.INC radni direktorijum itd. Tvrdiš da ti je putanja u
redu ... Neka bude po tvom! Ja tvrdim da ASM fajlovima koje si hteo da
asembliraš ne fali ništa. Dokaz je u prilogu ove poruke (šaljem ti ih
u obj stanju!). Pre nego što ponovo nalegneš na taster sa znacima
čuđenja, učini i ovaj pokušaj: prebaci asm fajlove u direktorijum MASM,
prebaci tamo i EXTENDA.INC, obriši ono l: iz zaglavlja asm-a, napiši
MASM view ... pa ako i tada ne bude u redu, u redu.
PS. Reagovao sam na tvoj vapaj zato što sam i sam prošao kroz to. Za
razliku od tebe, nisam bes iskalio na ASCII 33!
dPaun
clipper.749andrejl,
-> #735, janko>│ Tomo, majstore! Ja ne, ali, ako počneš da pišeš i negde
>│ zapneš, imaš moju podršku. Napr. epoštom.
Ako Toma neće mogu ja da prionem poslu, u stvari već sam
razmišljao da UKRASim clipper :) ili možemo competition :)
Šalu na stranu, ja sam spreman.
bye, andrejl
clipper.750nbatocanin,
-> #724, ciki Izvinjavam se zbog zakašnjenja odgovora. Evo o čemu se radi.
Direktiva INCLUDE služi za uključivanje standardnog Clipper zaglavlja
za rad sa extend sistemom - to je datoteka EXTENDA.INC koja se dobija
uz Clipper. Znači, umesto L:\... napišite *puno* ime kataloga na kome
se nalazi ta datoteka i to će biti OK. Kao što reče dPaun++, može i
menjanjem DOS promenljive INCLUDE.
Ja koristim MASM 5.1 i mada sam veoma nezadovoljan njegovim radom,
koristim ga jer je određeni standard. TASM, bez obzira na agresivnu
najavu, ne može da prevede EXTENDA.INC, ni u jednom modu. Tačan
razlog ne znam, a i ne interesuje me.
Pretpostavljam da je sličan razlog i kod MASM 6.0. Sasvim posebno
pitanje je kompatibilnost verzija *asemblera* istog proizvođača. žini
mi se da je razvijanje makro dela jezika na uštrb kompatibilnosti
veoma nerazumno. Izvinjavam se unapred u slučaju da postoji neki
prekidač za kompatibilnost. Ali, eto. Sve što ja mogu da uradim je da
odsad, pa nadalje i ubuduće šaljem i odgovarajuće OBJ datoteke.
objs.zipclipper.751janko,
-> #746, pjankovic> Na osnovu jankovog programa u C-u napisao sam u Clipperu
> funkciju za inicijalizaciju. Pošto se inicijalizacija vrši
> samo jedanput na početku tu brzina nije kritična.
Da. I ja mislim da je neisplativo (ili teško izvodljivo,
zbog korišćenja C-ovih bibliotečkih rutina koje MOčDA ne ulaze
u Clipper.lib, ili mu smetaju) inicijalizaciju raditi u nečem
što nije sam Kliper.
> Funkciju juk() (koja vrši konverziju) sam modifikovao da
> se poziva iz Clippera i da joj se prosleđuje tabela
> kodova. Brzinu nisam testirao ali mi se čini da bi za
> većinu zahtjeva ova funkcija trebala da je dovoljno brza.
A je li juk() na Kliperu ili C-u? Pitam zbog ovog 'čini mi se
da je dovoljno brza.' Ako je na C-u, valjda je to dovoljno?
> Ako ima zainteresovanih mogu to da okačim. Naravno,
> trebalo bi mi malo vremena da sve to sredim i napišem neke
> komentare.
Naravno da ima. Kad sve to središ, tražićemo od moderatora da i
to smesti u neki direktorijum, na opštu korist.
clipper.752janko,
-> #749, andrejl> Ako Toma neće mogu ja da prionem poslu, u stvari već sam
> razmišljao da UKRASim clipper :) ili možemo competition :)
> Šalu na stranu, ja sam spreman.
Nije šala, već, bolje da sarađujemo. Evo, i pjanković se javio,
on je već i napisao dosta toga. Uvek je dobro da više ljudi
učestvuje u nekom projektu -- ponudi mu se da mu pomogneš, ako
je on na to spreman?
A ako vas se još skupi, možete da formirate grupu (za razvoj)!
Usput, imaš li iskustva sa ubacivanjem mašinskih (ili C) rutina
u Clipper? Bilo bi zgodno da sama f-ja za konverziju ne bude na
Kliperu, zbog brzine. Znaš već, kad se stavi kao f-ja indeksa i
slično...
A onda, kada kompletiramo rutine za latinicu, konačno možemo
krenemo i u osvajanja ćirilice! Biće još posla za programere! :)
Vou, jea!
clipper.753toma,
-> #749, andrejl■■>> Ako Toma neće mogu ja da prionem poslu, u stvari već sam
■■>> razmišljao da UKRASim clipper :) ili možemo competition :)
■■>> Šalu na stranu, ja sam spreman.
Nije da neću, nego sam malo tesan sa vremenom, a i zaboravio sam
i ono malo C-a što sam znao. (ATARI ST -> vojska -> PC)
clipper.754bstevan,
Zdravo !
Evo jednog pitanja u vezi rada u mrežnom okruženju,
radi se o verziji 87'.
Sa SET EXCLUSIVE OFF - postavim da su baze na raspolaganju
svim korisnicima.
Sad kad otvorim bazu sa USE (nDataBase) ECLUSIVE i sa NETERR(),
proverim uspešnost otvaranja baze sve je ok, odnosno kad sledeći
korisnik pokuša da otvori istu bazu javlja zauzeće baze.
Problem nastaje kad želim da istu bazu koriste više korisnika,
i da pojedine slogove menjaju ili da pojedine slogove u bazi
zaključam, odnosno otključam.
Konkretno ako se PRVI korisnik nalazi u bazi XXXXX.dbf na 10-tom
slogu, i ako pokuša korisnik DRUGI u istoj bazi da radi na tom slogu,
kako da ga sprečim pre nego što program padne uz poruku "lock
required".
I još jedno interesantno zapažanje samo sa USE (nDataBase), bez
EXCLUSIVE mogu da koriste datoteku oba korisnika, ali ne mogu da
menjaju ništa u datoteci, jer pri pokušaju da to učine pozdravna
poruka je "database requried" ili "exclusive requried".
Jer ako otvorim bazu sa EXCLUSIVE javlja mi zauzeće baze.
Da li neko ima iskustva sa ovim stvarima i koja su rešenja ?
Kopao sam po literaturi o radu sa mrežama, ali to su uglavnom
kratka objašnjenja, bez nekih praktičnih iskustva autora.
pozdrav BSTEVAN
clipper.755dvasiljevic,
HELP ! HELP ! HELP ! HELP ! HELP ! HELP ! HELP !
Imam jednu muku sa poteškoćama u vezi tbrowse objekata.
:(
Nikako ne mogu da postignem da se sa pomeranjem kursora
gore-dole naglašava (tb:hilite()) cela linija. :(
Pokušavao sam nešto u fazonu :
:
:
for i := 1 to tb:colCount - 1
++ tb:colPos
while !tb:stabilize() ; end do
tb:hilite()
next
while !tb:stabilize() .and. (ch:=inkey()==0); end do
if tb:stable ; ch:=inkey(0) ; end if
do case
case ch == K_ESC .or. ch == K_ENTER ; exit
:
:
Šta sve nisam probao, i ne pomaže.
Ako je neko voljan da mi pomogne, biću mu veoma zahvalan.
Pozdrav
Veličko :(
clipper.756hercog,
-> #740, kzoran**> SELECT source
**> SORT ON key TO source
Ovako nipošto ne smeš da uradiš. Radiće par puta dobro, a onda posle
nekog vremena ćeš na disku da dobiješ samo ime od datoteke. Nestaće i
njena struktura i podaci. A program će da ti prijavi CORUPTION DETECTED...
Hercog
p.s. zato koristi prvi način
clipper.757bulaja,
-> #740, kzoranPrilikom SORT-a source i target moraju biti razlicite datoteke, ali
nemoj koristiti SORT, umesto toga indeksiranje po kljucu pa COPY TO
radi mnogo brze (i pouzdanije). Takodje ne treba COPY TO source za celu
datoteku, posto bi COPY TO file trebalo da radi brze (pre toga uradi
jedan COMMIT da ne bude haosa sa neispraznjenim baferima :). Ali ovde ti
ne treba ni COPY vec jedan DELETE FILE pa RENAME. Dakle:
select source
index on key to xx
copy to target
close source
delete file source.dbf
rename target.dbf to source.dbf
delete file target.dbf
// ovde vec imas napravljen xx.ntx
// pa ne treba dalje raditi index
clipper.758bulaja,
-> #751, janko│Naravno da ima. Kad sve to sredis, trazicemo od moderatora da i
│to smesti u neki direktorijum, na opstu korist.
└───
Pa necu da smestam pojedinacno ukras rutine za svaki jezik, vec ih ti
ubaci u novu verziju Ukraz paketa (onog sto je u \pc\yu) pa cu komplet
da stavim u dir umesto stare verzije. Eno stoji podrska za Modulu 2 u
conf, a nikako da je ubacis u paket.
clipper.759janko,
-> #758, bulaja> Pa necu da smestam pojedinacno ukras rutine za svaki
> jezik, vec ih ti ubaci u novu verziju Ukraz paketa (onog
> sto je u ĐpcĐyu) pa cu komplet da stavim u dir umesto
> stare verzije. Eno stoji podrska za Modulu 2 u conf, a
> nikako da je ubacis u paket.
Pa, može, ako insistiraš... ne bi mi bilo teško. Meni je nekako
bilo logičnije da čoveka koji piše Modulu 2 ne zanima kako
izgledaju rutine na C-u... Najviše bih voleo da za svaki jezik
postoji poseban paket...
Šta misle Sezamovci o ovome? Da li biste više voleli po 20 K
'ukrasa za paskal,' 'ukrasa za kliper' itd. ili (potencijalno)
120K 'ukrasa za sve živo'?
---
PS. Kad se već razgovaramo, a što ne stavi Tank_v2 program u
dir? Garantujem da se skoro neće pojaviti brži, osim ako se
neko dooobro ne pomuči.
clipper.760fric,
-> #754, bstevan> Evo jednog pitanja u vezi rada u mrežnom okruženju,
> radi se o verziji 87'.
Ja ti ovo pričam za 5.01, ali mi se čini da treba da važi
i za '87.
> Sa SET EXCLUSIVE OFF - postavim da su baze na raspolaganju
> svim korisnicima.
Kao prvo, preporuka je da ne koristiš set exclusive,
već da exsplicitno uvek USU-ješ exclusive ili shared.
To je čisto pitanje stila, i otpornosti na greške.
> Konkretno ako se PRVI korisnik nalazi u bazi XXXXX.dbf na
> 10-tom slogu, i ako pokuša korisnik DRUGI u istoj bazi da
> radi na tom slogu, kako da ga sprečim pre nego što program
> padne uz poruku "lock required".
- Ako neko drži ekskluzivno bazu, *niko* drugi ne može ni da prismrdi
- Zato obojica treba bazu da otvore shared
- Ako hoće obojica samo da čitaju, nema problema
- Ako neko hoće da radi replace, pack, zap, i još po nešto, *mora* pre
toga da zaključa celu bazu ili record, zavisno od slučaja.
Ako ti treba, mogu da prepišem tabelu gde piše koja operacija zahteva
kakav način zauzeća baze ili zaključavanja, ko koga potire (šta je
'starije') i sl.
> I još jedno interesantno zapažanje samo sa USE
> (nDataBase), bez EXCLUSIVE mogu da koriste datoteku oba
> korisnika, ali ne mogu da menjaju ništa u datoteci, jer
> pri pokušaju da to učine pozdravna poruka je "database
> requried" ili "exclusive requried".
Vidi gore.
> Kopao sam po literaturi o radu sa mrežama, ali to su
> uglavnom kratka objašnjenja, bez nekih praktičnih iskustva
> autora.
Ja sam u 'Clipper 5 - vodič za programere' or Ricka Spence-a
(knjiga sa jedrenjakom) našao poglavlje sa 40-50 *veoma* korisnih
stranica o razvoju kliper aplikacija za rad na mreži.
fric
clipper.761kzoran,
-> #756, hercog> Ovako nipošto ne smeš da uradiš. Radiće par puta dobro, a onda posle
> nekog vremena ćeš na disku da dobiješ samo ime od datoteke. Nestaće i
> njena struktura i podaci. A program će da ti prijavi CORUPTION DETECTED...
To sam i pretpostavljao, ali ko pita ne skita.
Hvala!
Pozdrav,
Zoran.
clipper.762kzoran,
-> #757, bulaja
COMMIT mi valjda ne treba, posto program (za sada) ne radi u mrezi.
A sto se listinga tice:
> select source
> index on key to xx
> copy to target
> close source
> delete file source.dbf
> rename target.dbf to source.dbf
> delete file target.dbf
> // ovde vec imas napravljen xx.ntx
> // pa ne treba dalje raditi index
u pravu si za COPY TO - ponovni COPY mi ne treba (zaboravio sam da COPY TO
kopira slogove u logickom redosledu na koji ukazuje indeks), ali zar mi ne
treba INDEX ON .. TO .. na kraju, jer indeks koji je vazio za prvobitni
source vise ne odgovara novom redosledu u "sortiranom" source-u.
U svakom slucaju, sva ova resenja su mi previse spora, i moracu se pozabaviti
zamenom onog DBGOTO(x) nekom drugom sekvencom za nalazenje trazenog sloga bez
kopiranja i sortiranja fajlova.
Hvala na pomoci.
Pozdrav,
Zoran.
clipper.763bulaja,
-> #756, hercog│Ovako niposto ne smes da uradis. Radice par puta dobro, a onda posle
│nekog vremena ces na disku da dobijes samo ime od datoteke. Nestace i
│njena struktura i podaci. A program ce da ti prijavi CORUPTION DETECTED...
└───
E bre Hercog, pa opet to o onoj misteriji oko nestajanja datoteka koja
se pojavila samo kod tebe i niko drugi nije uspeo da je ponovi! :) SORT
jeste glupa naredba, ali uglavnom radi (lose), ne plasi narod :).
clipper.764bulaja,
-> #759, janko│PS. Kad se vec razgovaramo, a sto ne stavi Tank_v2 program u
│dir? Garantujem da se skoro nece pojaviti brzi, osim ako se
│neko dooobro ne pomuci.
└───
To mu dodje nesto za Tanjug raspored? Aj' pogledacu ga, pricekaj malo
dok mi se smire ispiti.
clipper.765janko,
-> #764, bulaja> To mu dodje nesto za Tanjug raspored? Aj' pogledacu ga,
> pricekaj malo dok mi se smire ispiti.
Jeste. I dovoljno je mali da ti ne treba više vremena nego da
odgovoriš na 4 poruke u SORu. Nije to operativni sistem, već
samo program za konverziju.
clipper.766bulaja,
-> #762, kzoran│COMMIT mi valjda ne treba, posto program (za sada) ne radi u mrezi.
└───
COMMIT ti treba ponekad bez obzira sto se ne radi u mrezi, u ovom
slucaju zato sto je baza koju kopiras otvorena pa treba isprazniti
bafere pre toga. Inace ne treba kopirati otvorene baze :), ali nije
stetno ako uradis commit pre toga, a moze i prvo close pa copy.
clipper.767ciki,
-> #748, dpaunMa čoveče, takav defetizam nije u duhu Sezama!
Ovako.Možda jesam preterao :-((((, ali sam u pravu, jer
sam nekoliko puta naglasavao da mi javlja greske prilikom
kompajliranja EXTENDA.INC fajla(Da nemoze da ga nadje ne
bi ni prijavljivao greske. Sta mislis o tome.)
Znaci nije u pitanju ni putanja ni nesto II, jer imam i
SET INCLUDE i PATH i fajlove u istom dir-u.
Hvala nbatocaninu za odgovor.nazalost u pravu je.
MASM 6.0 nije u potpunosti kompatibilan sa MASM x,x<6, iako
ima prekidac /Zm koji kobajagi omogućava kompa, ali to je
za neku drugu konf..
Inace morao sam i sam nabaviti neku stariju verziju MASM(Hvala
tomi).
P.S. Nisam se javljao od 31.8.1992. pa nisam u toku.
P.P.S. Hvala ti za utroseno vreme.
Pozdrav Ciki!
clipper.768nbatocanin,
-> #755, dvasiljevic> Imam jednu muku sa poteškoćama u vezi tbrowse objekata.
X := TB:RowPos
Y := TB:ColPos
ACur := {X, 1, X, TB:colCount}
ACurC := {X, Y, X, Y}
TB:colorRect (ACur, {5,1})
TB:colorRect (ACurC, {2,1})
Ch := InKey(0)
TB:colorRect (ACur, {1,2})
clipper.769toma,
Zna li neko kako da saznam datum uz fajl na disku, iz clipper-a
naravno.
clipper.770ppekovic,
-> #769, toma>> Zna li neko kako da saznam datum uz fajl na disku, iz clipper-a
>> naravno.
Beše jedan programer, nemogu da se setim koji ;))) koji je to
rešavao na sledeći način:
Sačuva ekran, postavi istu boju fg i bg, zatim pozove dir
ime_fajla, pa onda lepo sa ekrana isčita u string datum, i na
kraju vrati originalni ekran ;)))). Posle je unapredio algoritam
tako sto je preusmerio izlaz u fajl pa čitao iz fajla, tako da
nije bilo zatamnjivanja ekrana ;))))
Paya
clipper.771dvasiljevic,
-> #768, nbatocanin
> Imam jednu muku sa poteškoćama u vezi tbrowse objekata.
H V A L A !
Svaka čast nbatocaninu !
Pozdrav !
Veličko
clipper.772hercog,
-> #763, bulaja**> se pojavila samo kod tebe i niko drugi nije uspeo da je ponovi! :) SORT
Pa probaj da u nekom programu napišeš da i izvorna i ciljna datoteka
kod sorta budu jedna ista. Videćeš i sam kad posle nekog vremena dobiješ
CORUPTION DETECTED, baš zbog tako napisanog sorta...
Hercog
clipper.773ndragan,
-> #740, kzoran/ SELECT source
/ SORT ON key TO target
Itd... zar ne bi mogao da prekrstiš (rename) izvornu pre sorta, pa da tu
prekrštenu sortiraš u novu verziju izvorne? Gubi se bar jedno
kopiranje.
clipper.774toma,
-> #769, toma■■>> Zna li neko kako da saznam datum uz fajl na disku, iz clipper-a
■■>> naravno.
Ha! Evo sad ja znam.
Za ostale koje zanima: funkcija FindDate( <DTA> )
biblioteka: Clipper 5.01 Expand Library v2.0
OPS! Pa može i clipper funkcijom ADIR().
clipper.775bstevan,
-> #760, fric Za 5.01 je ok. što si napisao ali za 87' ne važi,
neke stvari na primer otvaranje sa SHARED ili pak sa NEW.
Konkretno sa 5.01 nema problema sa radom u mreži
jer su dodate još niz komandi za olakšani rad u mreži.
Kod verzije 87' ide malo teže.
I dalje me interesuju iskustva sa radom u mreži u verziji 87'.
Kad sam pomenuo literaturu i rad u mreži
nisam mislio na 5.00 i 5.01, već na pomenutu verziju 87'.
Knjigu koju ti imaš sa "jedrenjakom",
to je za clipper 5.00, a ja imam za 5.01 od Alempje Veljovića,
i u njoj ima dosta o radu u mreži ali dati primeri ne rade u 87'.
---POZDRAV---
---BSTEVAN---
clipper.776fric,
-> #769, toma> Zna li neko kako da saznam datum uz fajl na disku, iz
> clipper-a naravno.
Ako te zanima datum fajla na disku, imaš funkciju directory()
koja za zadati fajl/fajlove vraća niz sa informaciojom o imenu,
datumu i vremenu kreiranja, dužini, atributima.
clipper.777fric,
-> #775, bstevan> Kod verzije 87' ide malo teže.
čao mi je što ti nisam bio od pomoći. :(
Pretpostavljao sam da ima dosta sličnosti između
5.01 i '87 po pitanju mrežnog rada - kad ono jok !
clipper.778vkrstonosic,
-> #770, ppekovic>> Bese jedan programer, nemogu da se setim koji ;))) koji je to
>> resavao na sledeci nacin:
Jel u QBasicu ? ;)))))
clipper.779zkrstic,
-> #772, hercog>**> se pojavila samo kod tebe i niko drugi nije uspeo da je ponovi!
> :) SORT
>
> Pa probaj da u nekom programu napišeš da i izvorna i ciljna datoteka
> kod sorta budu jedna ista. Videćeš i sam kad posle nekog vremena
> dobiješ CORUPTION DETECTED, baš zbog tako napisanog sorta...
Uvešću ja bijenje prisutnih ovde kao obavezan detalj :))))
Aman bre Hercogu, uzmi lepo bilo kakvo uputstvo za Clipper,
pa ćeš videti da to jednostavno nije zdravo što radiš.
Da sprečim buduću diskusiju (misteriju) Pusti pack i prouzrokuj
nestanak struje. Bespovratno će ti nestati i baza ;>
Zkr
clipper.780zkrstic,
-> #775, bstevan> Knjigu koju ti imaš sa "jedrenjakom",
> to je za clipper 5.00, a ja imam za 5.01 od Alempje Veljovića,
> i u njoj ima dosta o radu u mreži ali dati primeri ne rade u 87'.
Staaaaaaaaaaaaaani brajko!
Neke stvari ste preskočili ;) U Clipperu 5.01 ima jedna i
po nova naredba za rad sa mrežama i to je USE <baza> SHARED. Prostudiraj
lepo neki od onih fajlića koji idu uz (FILES.PRG) C87.
BTW, najbolje objašnjen rad sa mrežama za ma koji Clipper,
je u knjizi sa jedrenjakom, čak primeri rade na oba Clippera, uz možda
maaale izmene.
Zkr
PS. 1. Šta's se uvatio Clipper 87 ko pijan plota?
2. Ko ti uvali onu Alimpijevu knjigu?
clipper.781zkrstic,
-> #774, toma> Za ostale koje zanima: funkcija FindDate( <DTA> )
> biblioteka: Clipper 5.01 Expand Library v2.0
Pošalji bre to na Sezam, kad već ne daš žvake! To je PD ili SH,
koliko me pamćenje služi.
Zkr
clipper.782makas,
-> #754, bstevan ==> Evo jednog pitanja u vezi rada u mrežnom
==> okruženju,
Ako te interesuje baš Clipper '87 onda pogledaj fajlove koji
idu uz njega. Treba da postoji fajl network.prg u kome su date
funkcije za sve osnovne radnje za rad u mreži (APPEND, REPLACE, USE...).
Pozdrav
█▀▀▀▀▀▄ ▄▀▀▀█ █▄▀▀ ▄▀▀▀█ ▄▀▀
█ █ █ ▀▄▄ █ █▀▄▄ ▀▄▄ █ ▀▄▄▀▀▄
▄▄▄ ▄▄▄ ▄▄ ▄▄ ▄▄ ▄ ▄ ▄JILL▄▄▄▄▀
clipper.783ndragan,
-> #757, bulaja/ rename target.dbf to source.dbf
/ delete file target.dbf
Ovde će da javi da ne postoji target.dbf.
clipper.784nbatocanin,
Ima li neko neki od sledećih programa:
Blinker, FlexFile, SIx driver?
clipper.785toma,
-> #781, zkrstic■■>> Pošalji bre to na Sezam, kad već ne daš žvake! To je PD ili SH,
■■>> koliko me pamćenje služi.
Evo <demo verzije> Expand library-a za slucaj da nije PD ili SH !
clipper.786dejanr,
Da li je neko čuo za nešto što se zove FUNCKYxx.LIB (FUNCKY87, FUNCKY50 itd)?
Šta radi i čemu služi?
clipper.787pjankovic,
-> #746, pjankovic Evo rutina za konverziju kodnih rasporeda za CLIPPER.
Sve rutine su date u izvornom obliku i dozvoljena je njihova
izmjena i prilagođavanje potrebama korisnika.
Uključeni su i .OBJ fajlovi za direktno linkovanje u program kao i
program TEST za provjeru da li je sve dobro podešeno.
Tu je i .LNK fajl kao i uzorak datoteke sa definicijom rasporeda.
Svima koji će u svoje programe ugraditi ove funkcije želim puno
uspjeha u radu.
P.S. Kolika je vjerovatnoća da dužina arhive bude izražena u istim ciframa? :)
Je li veća ili manja od vjerovatnoće dobitka prve nagrade u igri "Računara"? :)
ukrasclp.arjclipper.788janko,
-> #786, dejanr> Da li je neko čuo za nešto što se zove FUNCKYxx.LIB
> (FUNCKY87, FUNCKY50 itd)? Šta radi i čemu služi?
FUNCKY
The ultimate CLIPPER developers tool
With FUNCY you can create applications with "look" and "feel"
of the future (...itd...)
- F. includes over 400 fully optimized functions
- Dinamicaly resizable windows
- Mouse driven applications with drop down / tear off menus
- Emulate dBedit with mousable scrollbars and resizable windows
- Read and write arrays to/ from text files
- Nested reads with save and restore gets
- Set 43 or 50 lines mode with different fonts for EGA and VGA
Sve je to proizvod firme dLESKO ASSOCIATES, kojoj je predsednik
Dirk Lesko, autor FUNCKY biblioteke. Firma je iz Nju Džrzija.
Dirk Lesko je držao kurs "Advanced Assembler Routines" na
konferenciji "1990 NANTUCKET DEVELOPER CONFERENCE" u
Australiji.
Jel' dosta? :)
clipper.789toma,
-> #788, janko■■>> Jel' dosta? :)
Kako dosta kad nigde ne videh DEMO tih biblioteka prikačen
uz poruku ?
clipper.790fric,
-> #738, fricRešio sam problem pošto sam ponovo pogledao tekst nbatocanina
'Slike u kliperu' u R70.
> Zaglavlje ispišem jednim RUN ('copy logo.prn lpt1 > nul')
>
> I to lepo radi, ali nikako ne mogu da posle toga nateram
> štampač da primi i ispiše ostatak teksta (štampač je
... pa su prvobitno sledile komande
> SET DEVICE TO PRINT
> SET PRINTER TO cLptG
...
E, greška je bila u ovom set printer to cLptG. Kad sam to izbacio,
proradilo je. Zašto i kako - ne znam, ali tako stoje stvari.
clipper.791ratman,
Da li u funkciji DBEDIT() *mora* da se izvrsi korisnicka funkcija ako
hocemo da editujemo slogove? Moze li umesto nje da se stavi neka vrednost?
(Clipper 5.01)
Zasto sledeci program zeza? Naime, polja se edituju kao da string fil sadrzi
sva polja, dakle redom (donja linija), a na ekranu izgleda drukcije:
Nesto, izgleda ne valja u user-funkciji, ali sta?
Ima li neka slicna funkcija koja radi to slicno (BROWSE ne moze da izabere
polja)?
Evo pgm.-a:
use enzymes
fil={'datum','ck','ldh'}
/* baza inace ima polja: no, datum, vreme, ck, ck1,ck2, ldh,ldh1,ast*/
cls
dbedit(10,10,20,70,fil,'dbfunc1')
function dbfunc1
parameters pf1,pf2
if pf1=0
return(1)
elseif pf1=3
return(0)
endif
keyval=lastkey()
do case
case keyval=5 .and. pf1=1
@23,0 say "Pocetak fajla!"
return(1)
case keyval=23 .and. pf1=2
@23,0 say "Kraj fajla!"
return(1)
case keyval=27
return(0)
case keyval=13
temp=fieldname(pf2)
@23,0 say "Nova vrednost"+field(pf2)+"?..." get &temp
read
return(1)
otherwise
@18,0 say " "
return(2)
endcase
Pozdrav,
Dejan
clipper.792dejanr,
-> #788, janko>> Jel' dosta? :)
Hvala :) E sad, jel ima neko ko taj FUNCKY koristi i ima neka iskustva
sa njim? Osim jednog Sezamovca koji je sada u Australiji i koji je to
koristio u svojim programima, pa se sada ja patim da shvatim šta
se tu dešava? ;)
clipper.793hercog,
-> #779, zkrstic**> Aman bre Hercogu, uzmi lepo bilo kakvo uputstvo za Clipper,
**> pa ćeä videti da to jednostavno nije zdravo äto radiä.
Ma samo sam čoveku objašnjavao da ne sme da koristi sort u istu bazu...
Hercog
clipper.794janko,
-> #787, pjankovic> Evo rutina za konverziju kodnih rasporeda za CLIPPER.
žestitam Predragu Jankoviću na objavljivanju ovoga paketa!
Ovo je PRVI paket koji podržava UKRAS u Kliperu!
BTW: Ono što Predrag Janković nije naglasio, rutine su pisane
za Kliper 5.0
Konverzija, vremenski najkritičniji deo, radi se pomoću C
rutine.
Sad imam pitanje: da li je C rutini potrebno da zna dužinu
stringa koji dobije iz Klipera 5.0, ili je string koji dobije
SIGURNO ograničen sa chr(0) ? Ja sam bio ubeđen da je potrebno
da uhvati i dužinu?
Druga stva se tiče rutine za konverziju, kojoj mora da se
pošalje i adresa tablice.
Da li bi se nekako moglo rešiti da se napr. tablica nalazi kao
deo statičkih podataka te C rutine, pa da se tamo prepiše
jednim pozivom druge C rutine, koja bi išla uz juk? (nadam se
da me je neko shvatio? Uputstvo: morate da znate šta je u sorsu
o kome pričamo)
Onda ne bismo imali poziv jedne kliper rutine, pa poziv C
rutine za svaku konverziju?
clipper.795ndragan,
-> #779, zkrstic/ Aman bre Hercogu, uzmi lepo bilo kakvo uputstvo za Clipper,
/ pa ćeš videti da to jednostavno nije zdravo što radiš.
Gore od toga - ponekad mu i uspeva. Kako? Misterija...
clipper.796banex,
-> #784, nbatocanin>> Blinker
Ja imam neki blinker koji ide uz flipper 5.0. Ako je taj
viči da ti pošaljem demo :)
CU! -BANE-
clipper.797hercog,
-> #795, ndragan**> Gore od toga - ponekad mu i uspeva. Kako? Misterija...
A äta mi to uspeva? :))
Hercog
clipper.798janko,
-> #797, hercog> A äta mi to uspeva? :))
>
> Hercog
Naprimer, da promašiš raspored :)
clipper.799d.petrovic,
-> #798, janko> Naprimer, da promašiš raspored :)
Ma to su ovih dana menjali (valjda je to u pitanju) Moj mikro i Latin 2 na
Sezamu pa su mu slovca zbog toga poludela.
clipper.800ciki,
-> #791, ratmanHo!
Koliko se secam(od kada sam presao na 5.01 ne radim sa DBE.fun.) nije
potrebno navesti funkciju, cak i samo dbedit() cini mi se da ce
listati datoteku preko celog ekrana.
U svakom slucaju probaj pa javi kako ide.
Pozdrav Ciki!
clipper.801dejanr,
-> #799, d.petrovic>> Ma to su ovih dana menjali (valjda je to u pitanju) Moj mikro i Latin 2 na
>> Sezamu pa su mu slovca zbog toga poludela.
Ništa ta promena nije mogla smetati, tu je samo promenjeno IME kodnog
rasporeda, a svakome su ostala izabrana slova.
Dakle, hercog je zadao sebi pogrešan set code... ili je to u vezi one
krađe passworda
clipper.802hercog,
-> #801, dejanr**> Dakle, hercog je zadao sebi pogrešan set code... ili je to u vezi one
**> krađe passworda
Rekao bih da je ona osoba koja mi je maznula password napravila
haos što se coda tiče...
Hercog
clipper.803vili,
Neko je trazio trig.funkcije za Clipper?
Evo trig & drugih funkcija za Clipper.
sinus(x) - sinus od x (rad)
tang(x) - tangens od x (rad)
cosin(x) - kosinis od x (rad)
ln(x) - prirodni logaritam od x
ln10(x) - dekadni logaritam od x
asinus(x) - arkus sinus od x
acosin(x) - arkus kosinus od x
atang(x) - arkus tangens od x
sinush(x) - hiperbolicki sinus od x
cosinh(x) - hiperbolicki kosinus od x
tangh(x) - hiperbolicki tangens od x
power(x,y) - x na y
rnd() - slucajni broj od 0 do 1
Linkuj sa : RTLINK FI ..,..,..,mat LIB ..,..,LLIBCA
U prilogu: MAT.OBJ.
mat.zipclipper.804nbatocanin,
Ne znam da li ste primetili jednu zgodnu osobinu CLD-a: Call
Stack. žudna mi čuda - daje vam redom spisak aktiviranih procedura,
reći ćete. A da li znate da sa <Tab> možete da menjate aktivan prozor
i da birate prozor za listing, za komande, Watch prozor, pa i prozor
za Call Stack? I to je "čudna mi čuda" - dobijete kursor i možete ga
pomerati po spisku procedura. Uradite to i prijatno ćete se
iznenaditi - pomeranjem se listing menja, tj. dobija se baš onaj deo
listinga sa koga je usledio poziv te funkcije!
clipper.805bstevan,
-> #780, zkrstic-->U Clipperu 5.01 ima jedna i po nova naredba za rad sa mrežama i to
-->je USE <baza> SHARED.
Ova tvoja tvrdnja nije istina.Zaviri u pomenutu knjigu ali sad
malo detaljnije.
-->1. Šta's se uvatio Clippera 87 ko pijan plota?
A jel to tebi smeta, šta mu fali, još dobro služi.
-->2. Ko ti uvali onu Alimpijevu knjigu?
Šta joj fali, kupio sam zato da vidim razlike izmedju 5.00 i 5.01
pa da donesem odluku šta je bolje od te dve stvari.Moja odluka je
5.01 zbog niz novih boljih rešenja u 5.01 .
---POZDRAV---
---BSTEVAN---
clipper.806bstevan,
-> #782, makas-->Treba da postoji fajl network.prg u kome su date funkcije za sve
osnovne radnje za rad u mreži (APPEND, REPLACE, USE...).
Taj fajl network.prg nemam ako neko ima da li bi mi poslao.
MAKAS, hvala na informaciji !
---POZDRAV---
---BSTEVAN---
clipper.807toma,
Pozdrav Clipper-aši !
Znate li kako u Clipper-ovom ALERT-u napisati dva reda poruke, jedan
ispod drugog ?
Ja znam !
Evo primera:
text:="Ovo je prvi,;a ovo drugi red."
* └> Eto nama separatora !
opcije:={" Super "," Ne valja "}
a:=alert(text,opcije)
to je to.
Pozdrav from Toma.
ps. Ako ste ovo znali a niste rekli onda nije u redu :)))
clipper.809ndragan,
-> #797, hercog/ A äta mi to uspeva? :))
Ako me sećanje ne vara, počelo je od one priče o sortu u istu datoTETKU
(max, jel sad vidiš na šta sam mislio) iz koje se sortira... pa je
stiglo dovde. žak više ni ne znam da li se odnosilo na tebe -
jednostavno nisam odoleo šlagvortu. Bilo bi neskromno da očekujem sam od
sebe da pamtim trideset lanaca poruka i da kod svakog citata znam kako
je sve počelo. Korisnik SORa u glavi ima skraćenu verziju FIFO steka.
More, samo da smo mi živi i zdravi, a svaki programer ionako mora da
uništi dva mega podataka godišnje :)
clipper.810ndragan,
-> #803, vili/ sinus(x) - sinus od x (rad)
Šta, kliper nema ugrađenu trigonometriju? Svašta.
BTW, danas smo imali dobar bag u svom generatoru za foks. Maska koja se
generisala zvala se log.fmt, i generišu se programi log_m, log_u itd, i
pomoćne funkcije log1, log2 itd. Prilikom pozivanja 'get ... valid ...
.and. log1()' javi 'invalid number of parameters'. Kolega koji je radio
se blago zabezeknuo. Stao mu mozak. Posle nekog vremena smo ukapirali
da je foks ono 'log1()' shvatio kao 'log10()' ugrađenu funkciju (foks
dozvoljava skraćivanje naredbi i funkcija do 4 znaka) koja _obavezno_
ima parametre :)
clipper.811janko,
Ako još niste skinuli NDraganove rutine za Ukras na Foxu, koje
se nalaze u SEZAM.3:yu.kod, skinite ih i uporedite sa onime što
biste morali da napišete na Kliperu! Između ostalog, program je
i sjajna reklama za Fox. :)
clipper.812nbatocanin,
Nedavno sam dobio neke diskete sa veoma interesantnim demo
programima firme QBS Software:
SNTXDEMO.COM SubNtx() Demonstration
OVLAYDEM.COM OverLay() Demonstration
SCOMMDEM.EXE SilverComm Demonstration
GFORCE_W.EXE GFORCE world map Demonstration
GFORCE.EXE GFORCE Big demonstration see GFREAD.ME too
FUNVDEMO.EXE FUNCky Summer '87 Demonstration
CFTSDEMO.EXE Fast Text Search Demo
DRSWITCH.EXE Dr Switch ASE demo
SCRIPTON.EXE Scripton printing demo
BLI15DEM.EXE Blinker 1.5 Demonstration
EDDEMO.EXE ED programmer's editor demo
BABELDEM.EXE BabelFish Paradox Data Driver demo
NETLIB.EXE NetLib demonstration
SPANTDEM.EXE Silverpaint Demonstration
Ima veoma lepih stvari: alternativni indeksi, pravljenje rezidentnih
Clipper programa, grafičke biblioteke, komunikacije, editor, itd.
Uglavnom se sve odnosi na Clipper, ali ima i za ostale xBase
proizvode.
Sve skupa ima oko 2.5M, pa ako ima zainteresovanih, mogu poslati
na Sezam.
clipper.813bulaja,
-> #794, janko│Sad imam pitanje: da li je C rutini potrebno da zna duzinu
│stringa koji dobije iz Klipera 5.0, ili je string koji dobije
│SIGURNO ogranicen sa chr(0) ? Ja sam bio ubeden da je potrebno
│da uhvati i duzinu?
└───
Clipper ne koristi zero-terminated stringove, zato treba koristiti
funkcije _parclen() i _retclen() za odredjivanje duzine stringa.
clipper.814bulaja,
-> #812, nbatocanin│Sve skupa ima oko 2.5M, pa ako ima zainteresovanih, mogu poslati
│na Sezam.
└───
Mislim da je preveliko, pogotovo zato sto je rec o obicnim demo (ne
previse korisnim) verzijama. Btw da li je SubNTX isti onaj koji (u
shareware verziji sa kojom se moglo ponesto i uraditi) stoji nakacen
uz neku od poruka u ovoj temi?
clipper.815d.petrovic,
-> #812, nbatocaninĂ> Ima veoma lepih stvari: alternativni indeksi, pravljenje
Ă> rezidentnih Clipper programa, grafičke biblioteke, komunikacije,
Ă> editor, itd. Uglavnom se sve odnosi na Clipper, ali ima i za ostale
Ă> xBase proizvode.
Šalji nego šta! Samooooo, baš 2,5 M bi bilo mnogo, proberi ti korisnije
stvari od toga i šalji njih.
clipper.816pstojanovic,
Pozdrav,
trebalo mi je zbog specificnih menija, da ugradim neke f-je u kliperu koje
bar za sada kliper nema. Evo svima na uvid, zajedno sa demo-programom, pa
kome treba neka koristi.
Funkcija PEEK(Segment,Offset) -> NUMERIC (BYTE)
Segment,Offset : NUMERIC (WORD)
Vraca vrednost sa adrese odredjene sa SEGMENT:OFFSET
Procedura POKE(Segment,Offset,Value)
Segment,Offset : NUMERIC (WORD)
Value : NUMERIC (BYTE)
Menja vrednost na adresi SEGMENT:OFFSET u VALUE
Procedura PUTCOLOR(y1,x1,y2,x2,Color)
y1,x1,y2,x2,Color : NUMERIC (BYTE)
Menja kolor atribut na prozoru definisanom sa Y1,X1,Y2,X2 u COLOR.
Funkcija GETCLR(Foreground,Background) -> NUMERIC (BYTE)
Foreground,BackGround : NUMERIC (BYTE)
Vraca vrednost kolor atributa za definisanu boju i pozadinu,
zgodno za koriscenje u PUTCOLOR (Color); tj vrsi racunsku
operaciju Background*16+Foreground.
Funkcije AAD, AOR i AXOR (Vrednost1,Vrednost2) -> NUMERIC (BYTE)
Vrednost1,Vrednost2 : NUMERIC (WORD)
Vraca vrednost aritmetickog AND,OR ili XOR-a.
Funkcija SCRCHAR(y,x) -> NUMERIC (BYTE)
y,x : NUMERIC (BYTE)
Vraca vrednost karaktera sa ekrana na koordinatama Y,X.
spex50.arj