clipper.106magbet,
Ima li neko ISPRAVNU biblioteku FIVEWIN.LIB iz istoimenog kompleta
koji se nalazi na Sezamu. Ja sam to sve lepo pokupio, ali je .LIB,
koju tražim, neispravna. Biblioteka ima oko 650 Kb nekomprimovano.
Bio bih vrlo zahvalan dobroj duši, koja bi mi to poslala, na ovaj
ili onaj Sezam.
Unapred zahvaljujem, Magbet.
clipper.107zkrstic,
-> #106, magbet>> Ima li neko ISPRAVNU biblioteku FIVEWIN.LIB iz istoimenog kompleta
Ima ga na brzom sezamu, conf TEST, tema pc.prog. Traži sa
CONF LIST /T ili neku od mojih poruka.
Zkr
clipper.108stanic,
-> #99, sbrkZahvaljujem.
clipper.109stanic,
-> #101, nbatocanin:)))))))))))))))))))))) Wow.
clipper.110pzivic,
-> #68, goxx> Evo kompletan primer. Tekst stvarno izgleda zamršeno bez sorsa
> i ne verujem da ga je pročitalo više od 5 ljudi.
Tekst stvarno izgleda zamršeno bez sorsa. Hvala.
Peđa.
clipper.111stosic,
Clipper clone of Norton Commander, prilagodjen za verziju 5.3
clipcmd.zipclipper.112magbet,
-> #107, zkrstic*-> Ima ga na brzom sezamu, conf TEST, tema pc.prog. Traži sa
Nađeno & preuzeto. Zahvaljujem unazad :).
clipper.113stosic,
-> #45, bulaja> Izasao je jos jedan manji patch za 5.3, videcu sta je menjano i vredi li
> ga skidati.
CL53UP.ZIP
This update to CA-Clipper 5.3 fixes real-mode indexing problems experienced
with the release version of CA-Clipper 5.3.
cl53up.zipclipper.114pzivic,
Postoji li izvorni kod za fukciju ACHOICE ().
clipper.115d.petrovic,
-> #114, pzivic> Postoji li izvorni kod za fukciju ACHOICE ().
tbrowsenew() i napraviš ga između užine i ručka, ako odustaneš od "potpune"
kompatibilnosti.
clipper.116kcurcic,
Problem:
Runtime greska
'Unrecoverable error 669 Eval stack fault'
nastaje u jednom delu programa. E sad, nastaje ako je koriscen Blinker.
.RTL daje ispravan program. Zna li se mozda nesto vise o ovome
(eksperimenti sa 'blinker proc depth nnn' & 'stack' samo pogorsavaju stvar
- program puca pri samom startovanju sa nekom greskom koja potice od
MSC-a (bar mislim) i cuvenim 'null pointer assignment' :))
Ah, da: kombinacija je Clipper 5.01 i Blinker 2.0
clipper.117rmarjan,
-> #116, kcurcicEvo ovako:
System has tried to expand the MEMVAR table, and is unable to do so
due to insufficient memory...
(by IERR.NG - CA Clipper Interna˘Ęl errors)
Napred u nove radne pobede...
Pozdrav Boris
clipper.118tvucko,
>> Spisak originalnog softwer-a i knjiga za CLIPPER, VO i DELPHI
softbook.txtclipper.119kcurcic,
-> #117, rmarjan
> System has tried to expand the MEMVAR table, and is unable to
> do so due to insufficient memory...
Dete ga marisalo. :) Ono sto ostaje kao pitanje je zasto se
vec navedeni pozdrav pojavljuje samo posle Blink tretmana. Pokusaji sa
drugim verzijama Blinkera daju iste rezultate, tako da mi ostaje da se
manem istog. A steta, prirast'o mi srcu *ebo on mater svo'ju :)
clipper.120rmarjan,
-> #119, kcurcicMislim da ti nije dobra ideja da se manes Blinkera. Mnoge stvari bez njega
ne bi ni mogao da obavim.
- Jedna stvar je da poslednja aplikacija koju razvijam, jednostavno NE moze
da se memorisjski uglavi pri startu u iole tanku m űemorijsku situaciju,
Blinker to resava kao od sale (smanjio mi je "load" velicinu za 100K
- Druga stvar je da recimo iz aplikacija "ladno" poteram ARJ u i radim neko
arhiviranje iz iste aplikacije (da jetlink i provukao aplikaciju za start) ne
bih ipak mogao ARJ ni slucajno. Blinker izmedju ostalog ima i SWMMMAP..
funkciju za startovanje ekesternih procesa...
- Itd
Dakle savet je CLIPPER 5.01 -> CLIPPER 5.2e i Blinker 2.00 -> 3.xx
Pozdrav
clipper.121magbet,
Drugar (odnosno ja za njega) skinuo FiveWin biblioteku, ali nikako da
napravi IDE. Molim uputstva...
clipper.122nbatocanin,
-> #121, magbet> Drugar (odnosno ja za njega) skinuo FiveWin biblioteku,
> ali nikako da napravi IDE. Molim uputstva...
U čemu je problem? Ima tamo neki make file, potera ga i dobije
IDE.EXE.
clipper.123magbet,
-> #122, nbatocanin*-> U čemu je problem? Ima tamo neki make file, potera ga i dobije
*-> IDE.EXE.
Prilikom pokretanja RMAKE IDE blinker kaže:
BLINKER : 1128 : FIVEWIN.LIB(MONITOR) : unrecognised OBJ record type 00H
Error RMAKE/R2001 Exit 1: 'blinker čide.lnk'
clipper.124dvesic,
-> #123, magbet> BLINKER : 1128 : FIVEWIN.LIB(MONITOR) : unrecognised OBJ record
> type 00H Error RMAKE/R2001 Exit 1: 'blinker čide.lnk'
Koja je verzija Blinkera ? Podržava li Win programe ?
clipper.125rmarjan,
Nabavio sam Clipper 5.3 i odmah naisao na problem:
- Aplikacija pod 5.2e + Blinker 3.10 je normalno radila (koristim CDX)
- Nakon kompajliranja pod 5.3 (proslo normalno) kod linkovanja mi
Blinker prijavi problem sa DBFCDX, kao da nisam dobro podesio koji
drajber ce mi biti default. Nista nisam menjao, samo sam propustio sa
novim kompajlerom. Gde gresim
- Ima li neke razlike u odredjivanju default indeksnog drajvera u 5.3 u
odnosu na 5.2 i ako ima, zna li neko u cemu je stos. Napominjem da sam
i RDDSYS.PRG kompajlirao pod 5.3 verzijom. Ne mogu da koristim Blinker
koji ide uz 5.3 verziju jer ne preposnaje naredbu na primer BLINKER
EXECUTABLE SERIAL ...
Help, hilfe, aiuto...
clipper.126magbet,
-> #124, dvesic*-> Koja je verzija Blinkera ? Podržava li Win programe ?
Toliko tip ipak zna ;). Blinker v3.20. Da malo pojasnim, rade mu
primeri (svojim očima video & probao), međutim IDE neće, pa neće.
žovek je već dobar deo programa odradio u FW-u, ali bi rado pogle-
dao IDE. Probali smo razne opcije Blinker-a, ali ništa :(((. Proba-
no i sa premeštanjem fajla MONITOR.OBJ u OBJ direktorijum, ništa.
Potom se obratih ovde...
P.S. Ima li načina da se obiđe ona nesnosna poruka o registraciji,
frendu je biblioteka vrlo potrebna i zadovoljava sve njegove
potrebe, ali ono ;).
clipper.127nbatocanin,
-> #125, rmarjanŠta si naveo u link skriptu? Probaj da navedeš LIB DBFCDX, _DBFCDX.
Jeste glupo, ali radi. Imaj u vidu da je CDX drajver _veoma_ izmenjen.
clipper.128rmarjan,
-> #127, nbatocaninProblem je sto sam sve naveo kako treba , bar űem u tome imaiskustva ű
ali je smesno sto ako navedem LIB DBFCDX i JOS!!! navedem LIB _DBFCDX koji
takodje (ne znam zasto) postoji u L■˛IB direktoriju, linker ne prijavljuje
gresku ali nista ne radi jer pri prvom o űtvaranju stvar se raspadne!
Kakav je to _dbfcdx.LIB?
Osim toga nigde nije razjasnjena koncepcija ocigledno izmenjenog nazina¸│
izmene RDDSYS.PRG! Ili mozda naredbi REQUEST, ANNOUNCE i SETRDDxxx()
Ima li tu pomoci
Link skript inace ima overlay sekciju (BEGIN ...END) zatim nanfor pa nakon
toga Cl520min.LNK poziva (pre toga LIB DBFCDX)
űInteresantno jeste ali videcu sta pisu momci u PC7...
Pozdrav Boris
clipper.129nbatocanin,
-> #128, rmarjan> Problem je sto sam sve naveo kako treba , bar űem u tome
> imaiskustva ű ali je smesno sto ako navedem LIB DBFCDX
> i JOS!!! navedem LIB _DBFCDX koji takodje (ne znam zasto)
> postoji u L■˛IB direktoriju, linker ne prijavljuje gresku
> ali nista ne radi jer pri prvom o űtvaranju stvar se
> raspadne! Kakav je to _dbfcdx.LIB?
Štos je u sledećem: za memo polja se koristi FlexFile tehnologija. To
nije samostalni drajver, već se koristi samo za pristup memo poljima,
dok se za rad sa DBF slogovima koristi neki drugi drajver. E, DBFCDX
je u stvari, Comix kome memo poljima upravlja FlexFile. Onaj sa "_"
je osnovni Comix drajver (ako se dobro sećam).
> Osim toga nigde nije razjasnjena koncepcija ocigledno
> izmenjenog nazina¸│ izmene RDDSYS.PRG! Ili mozda naredbi
> REQUEST, ANNOUNCE i SETRDDxxx() Ima li tu pomoci
Šta je izmenjeno?
> nanfor pa nakon toga Cl520min.LNK poziva (pre toga LIB
> DBFCDX)
A što ne probaš skript za 5.3?
clipper.130rmarjan,
-> #129, nbatocaninJos uvek mi nije jasno STA i KADA treba u skriptu da navedem da bih radio
sa CDX indeksima kao do sada.
- Da li treba koristiti izmenjeni RDDSYS.OBJ da ga inicijalno linkujem
i da radi u startu sa CDX?
- Posto vec u RDDSYS postoji ANNOUNCE RDDSETDEFAULT() , treba li to isto
na startu glavne aplikacije (ako to ne stavim) prijavljuje unresolved
external
- U skriptu, ako izostavim _DBFCDX a ostavim samo DBFCDX prijavljuje takodje
unresolved external _DBFCDX a ako ga ulinkujem u root, nista ne radi. Ako
ga ulinkujem u BEGIN..END deo skripta za aoverlej, linkovanje prodje ali
pri tome opet ne radi...
- Osim svega navedenog, "loadable" velicina je ubedljivo veca od 5.2e pa
sam morao uvesti cl520mid umesto MIN
Mislo sam da sam te decje stvari linkovanja, skriptova, modula i slicno
prevazisao nakon prelaska sa '87 na 5.x Clipper (odvano, 88-89 g.) ali
eto ponovo mi se desavaju takve stvari.
A bas je zgodan 5.3 onako odokativno gledajuci, ima cak i gfaicke primitive
pa ga ne bi bilo zgoreg osbiljno upotrebiti...no...
Hvala na komentarima u svakom slucaju...
Boris
clipper.131kile,
Koliko je teško pročitati kriptovane tabele u SIX-u?
clipper.132cnenad,
Da li postoji regularan način da se poruke tipa: Ivalid date, Abort i slične
prevedu i kao takve ispisuju umesto u izvornom obliku ?
clipper.133jolicm,
-> #132, cnenad>> prevedu i kao takve ispisuju umesto u izvornom oliku ?
Ima, tvoj errorhandle.
clipper.134rmarjan,
Posto radim softver u grafickom okruzenju za Clipper (graficka biblioteka
je za interfejs zaduzena), kako da sprecim da mi na mrezi neko ne posalje
neku poruku (pocev od poruke za kraj rada sistema), ne mogu je korektno
primiti na moj ekran ako mi je aplikacija u grafickom rezimu?
Ili ako ne mogu da je sprecim, postoji li neka mogucnost da je nekako
zahvatim pre nego sto mi krene na ekran i konvertujem poruku tako da
se moze u grafickom rezimu prikazati.
clipper.135mileusna,
-> #132, cnenad>> Da li postoji regularan način da se poruke tipa: Ivalid date, Abort
>> i slične prevedu i kao takve ispisuju umesto u izvornom obliku ?
Ima. U stanju si da sam, na svoj način obradiš greške.
Pri grešci kreira se objekat Error klase, koji se prosleđuje
odgovarajućoj funkciji. Po default-u, obrada greške u
Clipper-u je realizovana preko modula C:\CLIPPER5\SOURCE\SYS\errorsys.prg
(pogledati). Ako si voljan, obradu greške možeš preusmeriti
na neku svoju funkciju na sledeći način:
ERRORBLOCK( { |oError| MyFunction(oError) } )
Nakon poziva ERRORBLOCK() funkcije, svaka greška dovodi do
izvršavanja navedenog kodnog bloka, odnosno do pozivanja
funkcije MyFunction. oError je već pomenuti objekat klase
Error. Sve o njoj i njenim objektima imaš u NG-u na 'adresi'
Language/Class/Error. Ja lično se nisam previše time zamarao,
tj. nisam ulazio u tanka crevca, samo sam malo preuredio
errorsys.prg, tako da pri pojavi greške prikaže MOJ alert box
sa 'srpskim' obaveštenjem da je došlo do greške, i da će
opis greške biti upisan u izvesnu datoteku. :) Dakle, bez
engleskih reči na ekranu, a sve je opet moguće pročitati i
videti gde je zapelo. :)
P.S. Hm... žemu li služi ovaj fajl 'Errors.Log' što zauzima 10MB... O:)
clipper.136nbatocanin,
-> #130, rmarjanZašto koristiš link skriptove za 5.2? Probaj da koristiš onaj za 5.3.
Nisam upoređivao, ali možda ima neke razlike. Probaj da ulinkuješ i
DBFMEMO.LIB. Možda je uzrok zaglavljivanju drugačija tehnologija memo
polja. Jer, stari CDX drajver je koristio drugu tehniku, bez obzira
na istu ekstenziju (FPT) - sada FlexFile radi sa memo poljima. Probaj
da konvertuješ staru bazu.
clipper.137nbatocanin,
-> #131, kile> Koliko je teško pročitati kriptovane tabele u SIX-u?
Hm, malo sam gledao i ne izgleda mi previše teško. Pogotovu ako imaš
SIx i možeš da ekperimenišeš sa promenom bajta u originalnom tekstu i
sl.
clipper.138nbatocanin,
-> #132, cnenad> Da li postoji regularan način da se poruke tipa: Ivalid
> date, Abort i slične prevedu i kao takve ispisuju umesto u
> izvornom obliku ?
Izmeniš ERRORSYS.PRG ili napišeš svoju proceduru za obradu grešaka. I
jedno i drugo je jednostavno.
clipper.139nbatocanin,
-> #134, rmarjan> Posto radim softver u grafickom okruzenju za Clipper
> (graficka biblioteka je za interfejs zaduzena), kako da
> sprecim da mi na mrezi neko ne posalje neku poruku
CASTOFF za Novell?
clipper.140rmarjan,
-> #136, nbatocaninSve sam probao, jednostavno NE IDE.
Osnovna stvar je sto ne znam na kom mestu da ulinkujem CDXDBF a na kom
mestu da ulinkujem _CDXDBF. Ako oba stavim VAN BEMMMMGIN...END za ovrelay
deo, tada ne radi nista. Ako _CDXDBF stavim u overlej sekciju a CDXDBF
ostavim u root, sve se linkuje ali ne radi.
Osim toga, moram CDXDBF svakako staviti PRE Clipper.lib !?? inace mi uporno
prijavljuje gresku "inresolved external _CDXDBF"!
Memo polja za sada ne koristim pa nema potrebe za nekom preradom. Sve je
inace vise nego standardno, pa sam poceo da sumnjam da li uopste imam
sve ispravne fajlove za 5.3. (slican problem sam imao kada sam FieWin sa
Sezama skinuo neispravnog, a linker je nebuloze prijavljivao kao problem)
Da li bi mozda hteo da dobacis neki tvoj LNK gde koristis 5.3 pa da vidim jer
jednostavno nema razlike LNK za 5.2 ili 5.3 (u sustini naravno, jer imam
u BEGIN..END sekciji, gomilu MOD nardebi za "obKverlejisanje" Flipper
modula.
Veoma me cudi sto natrcavam na takve probleme a sa druge strane, jako lepe
dodatke ima 5.3 i omogucio bi mi laksi rad (da ne govorim o grafickim
primitivama koje mogu lepo ukomponovati po mojim potrebama i napraviti
sopstvene rutine grafike)
Clanak ti je u PC dobar, ali sam ocekivao bas vise o CDX sistemu.
Pozdrav Boris
clipper.141cnenad,
-> #138, nbatocanin=>> Da li postoji regularan način da se poruke tipa: Ivalid
=>> date, Abort i slične prevedu i kao takve ispisuju umesto u
=> Izmeniš ERRORSYS.PRG ili napišeš svoju proceduru za obradu grešaka. I
=> jedno i drugo je jednostavno.
Valjda ste me razumeli šta sam hteo, ali da ponovim zarad sigurnosti još
jednom. Misli se na poruke koje se ispisuju u nultom redu kad je uključen
ScoreBoard, recimo u GET polju se unose pogrešan datum a program gore izbaci
INVALID DATE...
clipper.142mileusna,
-> #141, cnenad>> ScoreBoard, recimo u GET polju se unose pogrešan datum a program
>> gore izbaci INVALID DATE...
Zar i to postoji? :) Ja još o dBase-a kucam SET STATUS OFF,
SET SCOREBOARD OFF na početku svakog programa. :))
clipper.143bulaja,
-> #141, cnenad│Misli se na poruke koje se ispisuju u nultom redu kad je uključen
│ScoreBoard, recimo u GET polju se unose pogrešan datum a program gore
│izbaci INVALID DATE...
└───
To se menja u GetSys-u, dakle .\Clipper5\Source\Sys\GetSys.prg :).
clipper.144d.petrovic,
-> #134, rmarjan> je za interfejs zaduzena), kako da sprecim da mi na mrezi neko
> ne posalje neku poruku (pocev od poruke za kraj rada sistema),
> ne mogu je korektno
Možeš da je preuzmeš preko ISR-a. Nedavno je sele okačio ovde nešto sa
mum-a za tu namenu. Ja probao i radi, samo moraš da paziš da ga posle
SVUDA inače blokira makinu.
clipper.145cnenad,
-> #142, mileusna=> Zar i to postoji? :) Ja još o dBase-a kucam SET STATUS OFF,
=> SET SCOREBOARD OFF na početku svakog programa. :))
Naravno da postoji i manje više kod pogrešno ukucanog datuma i nije
neki problem da program ništa ne ispiše ali kod memo polja i snimanja je
baš nezgodno da piše kod prekida Abort Edit Y/N pa sam zbog toga i pitao,
da se ovo izmeni.
clipper.146nbatocanin,
-> #140, rmarjan> Da li bi mozda hteo da dobacis neki tvoj LNK gde
> koristis 5.3 pa da vidim jer jednostavno nema razlike LNK
> za 5.2 ili 5.3 (u sustini naravno, jer imam u BEGIN..END
> sekciji, gomilu MOD nardebi za "obKverlejisanje" Flipper
> modula.
Na žalost, nemam ni jedan ozbiljan LNK za 5.3 (još radim na 5.2).
Nego, jesi li probao sa EXOSPACE-om? Naravno, probaj i da isključiš
dodatne libove. Gde se tačno zaglavljuje?
> Clanak ti je u PC dobar, ali sam ocekivao bas vise o CDX sistemu.
Pa, nisam hteo da ponavljam, dosta sam već pisao u okviru prikaza
SIx-a i 5.2, pa reko da ne davim, znaju ljudi. Šta te interesuje?
clipper.147nbatocanin,
-> #141, cnenad> Valjda ste me razumeli šta sam hteo, ali da ponovim zarad
> sigurnosti još jednom. Misli se na poruke koje se ispisuju
> u nultom redu kad je uključen ScoreBoard, recimo u GET
> polju se unose pogrešan datum a program gore izbaci
> INVALID DATE...
Naravno. Imaš tamo naredbu DispOut ("Invalid Date"), pa menjaj u šta
hoćeš. Primera radi, meni kad korisnik upiše datum koji nije iz ove
godine program ispiše upozorenje "Verovatno pogrešan datum".
clipper.148cnenad,
-> #143, bulaja=> To se menja u GetSys-u, dakle .\Clipper5\Source\Sys\GetSys.prg :).
Kuku lele, nije valjda da ću za svaku poruku morati da jurim određene
sors fajlove i da ih menjam... :((
clipper.149goranm,
Iz ccega se sastoji paket Clipper-a 5.3 ?
(koliko disketa, priruccnika, ...)
Gde se sve to mozze nabaviti i po kojoj ceni ?
clipper.150bulaja,
-> #148, cnenad│Kuku lele, nije valjda da ću za svaku poruku morati da jurim određene
│sors fajlove i da ih menjam... :((
└───
Pa imaš samo GetSys.prg i ErrorSys.prg - u prvom se menjaju samo poruke
za invalid date i range, a u drugom izveštaji o run-time greškama.
Postoje još i neke sistemske poruke koje se mogu promeniti linkovanjeg
odgovarajućeg modula za nacionalnu podršku (msg*.obj u International
verziji Clipper-a, nema modula na srpskom:) i to je to :).
clipper.151rmarjan,
-> #146, nbatocaninSa EXOSPACE nisam jos probao, zavrsavam neki projekat pa nemam vremena
a i pravi protected mod programe a nisam siguran kako se Flipper ponasa
i ne znam CATOOLS kako radi kao i nanfor. Sve u svemu, neka popriceka.
Inace, veoma me interesuju BLOB fajlovi, malo mi je nejsano ono sa Root
delom BLOB zapisa. To je neki skup pointera na nesto? E to nesto je li
to poseban fajl ili u sklopu FPT, ako je u sklopu FPT, kako znam da to
nine standardni txt zapis. Jako sam bas za to zaintereovan. Imam potrebu
za smestanjem razlicitih informacija a sve to u vezi DBF.
Kad vec gnjavim, da budem dosledan :)
Za dan dva, treba da instalisem mrezu u firmi (8 racunara, 5 lasera i
3 matricna stampaca). Nema sanse da mi oni sa Olimpa dozvole da jednu masinu
proglasim kao dedicated server, pa moram na client-serve sistem. Da li da
se opredelim za Novell Lite ili Personal Netware? Aplikacije cu morati neke
preraditi da rade u mrezi a nreke sam (hvala Bogu) unapred radio za mrezu.
Naravno radi se o Clipper aplikacijama.
Da li se negde moze nabaviti neka literatura za Lite? Osim knjige
Novel Netware koju imam ali tamo je o njemu sturo. I da li Lite uopste
da koristim. Ako ne njega, STA drugo a da to bude kakva takva mreza i
da ipak ne angazujem jaku 486 za server samo? Stvarno sam u dilemi pa
mozda neko ima neki savet.
Dali Personal Netware mogu da instalisem bez traga Win95?
Pozdrav Boris
clipper.152zkrstic,
-> #151, rmarjan>> Za dan dva, treba da instalisem mrezu u firmi (8 racunara, 5 lasera i
>> 3 matricna stampaca). Nema sanse da mi oni sa Olimpa dozvole da jednu masinu
>> proglasim kao dedicated server, pa moram na client-serve sistem. Da li da
>> se opredelim za Novell Lite ili Personal Netware? Aplikacije cu morati neke
A da probaš da ih ubiješ ? ;>
Osam računara i bilo koja peer2peer mreža na ovom svetu pa to jednostavno
nije izvodljivo, praktično, ne teoretski.
Lec' d švorc bi vit ju!
Zkr :)
PS. Personal netware instaliraj ako nemaš baš nikakva pametnija posla. žak je i
navijanje za partizan manje naporno, dosadno i bezizlazno od toga. ;)
PPS. Malko preterah ono za navijanje... O;)
clipper.153dvesic,
-> #151, rmarjan>> proglasim kao dedicated server, pa moram na client-serve
>> sistem. Da li da se opredelim za Novell Lite ili Personal
>> Netware? Aplikacije cu morati neke
Preporuka: Lantastic 6.0
clipper.154rmarjan,
E lepo mi drugari savetujete :>, ZKRSTIC bi da ih pokokam (ko ce mi leba
crnog davati) a DVESIC Lantastic. A milion drugih drugara svaki ima svoju
varijantu... :<<<<<<
Ja nemam druge nego bacih dinar (nije djubre hteo da ostane u vazduhu) i
odlucih se za Personal Netware. Sutra idem u firmu da to instalisem pa
sve ce biti korak napred a dva nazad. Ne znam kako je kod vas, ali sto se
tice znanja mojih iz Olimpijakosa, ono je na nivou Ivice i Marice. Nema
druge nego teraj kako umes. Vec su me danas pitali da li je mreza gotova
i mogu li sutra da dobiju rezultate zbirne obrade sa svih stanica !!! ;>
Neki dan mi dolazi rukovodilac kreditnog i pita (8.30 ujutro) moze li se
za njih uraditi aplikacija za pracenje kredita , obrada, kamate, dinamika...
Naravno, rekoh ne sanjajuci nista opasno, a sledilo je pitanje:
A MOZE LI TO DO 14.30 DA BUDE GOTOVO PA DA MOJI LJUDI POCNU OBRADU!!!!
HSta mislite onda kako razmisljaju o mrezi? Katastrofa. I sa takvim bajnim
rukovodecim menadzmentom MI zelimo u .... valda... pa stcemo u PM pre
svega. Jedan covek na nekom savetovanju rece (za YU scenu):
Mi ne ksakamo za svetom u informatici, mi TRCIMO unazad!
Dosta zalbe i prituzbe, treba raditi koliko su zasluzili, toliko ce i
dobiti (ionako posle podne zurim kod jednog klijenta - nabacio mi je jos
jedan posao)
Hvala obojici na ramenu za plakanje ali dalje ipak moram sam..
Pozdrav Boris
clipper.155zkrstic,
-> #154, rmarjan>> druge nego teraj kako umes. Vec su me danas pitali da li je mreza gotova
>> i mogu li sutra da dobiju rezultate zbirne obrade sa svih stanica !!! ;>
>>
>> Neki dan mi dolazi rukovodilac kreditnog i pita (8.30 ujutro) moze li se
>> za njih uraditi aplikacija za pracenje kredita , obrada, kamate, dinamika...
Wow! Koitus bez penetracije! Abažavam apsolutno &
definitivistički ;)
Probaj da im objasniš da peer 2 peer će teško da
preživi osam stanica. To ti je jedini izlaz.
Zkr
clipper.156peacock,
-> #149, goranm#### Iz ccega se sastoji paket Clipper-a 5.3 ?
8 x 1.44
#### Gde se sve to mozze nabaviti i po kojoj ceni ?
Kod mene :) Nastavljamo u mailu.
clipper.157dr.grba,
-> #154, rmarjan>> Naravno, rekoh ne sanjajuci nista opasno, a sledilo je pitanje:
>> A MOZE LI TO DO 14.30 DA BUDE GOTOVO PA DA MOJI LJUDI POCNU OBRADU!!!!
Za ovo si sam kriv. Svaki razvoj informacionog sistema počinje tako što
pridobijaš direktora na svoju stranu. Drugog puta NEMA.
clipper.158d.petrovic,
-> #154, rmarjanPredložio bih ti ja novel 2.20, ali se bojim da će to raditi pa ćeš i
ostati na njemu. Ovako, neka se malo pate, pa onda jednom "za probu" digni
na jednoj novel ;))
clipper.159rmarjan,
Ne znam momci (hvala vam u svakom slucaju na razumevanju) gde vi svi radite,
izgleda da postizete da barem pristojno zaokruzenje dobijete, ili su ljudi
prijemciviji za razumevanje vaseg posla. Vama je kao luk i voda da TO i TO
tako ne moze (znam i ja, zato i kukam) i kvit. Ali u real life, situacija je
cesto drugacija.
Ono sto rece jedan od vas, pusti nek se malo pate, to i nameravam. Samo,
zao mi je sto tu hordu iz Olimpijakosa, ne mogu odvesti negde da vide STA
je prava mreza gde i moji programi rade, ne bi ionako nista razumeli vec
bi verovatno rekli da TAMO dakle mogu a u firmi brljekam...
Instalisao sam danas Personal Netware, radice im sve to na nivou maltene
sigurnosnog bekapa i zdravo.
BTW zasto mi jedna od kartica (Novel/Eagle NE2000) uporno pokazuje da se
nalazi na INT 3 a na adresi 300, bez memorijske adrese, a kada je tako
dignem onda se ne prepoznaje da je u mrezi. INace ostale su na int 3, adresa
300. Zna li tkogod, pa da puscam moje "clippercice" da se rastrce preko
zicica.
Pozdrav Boris
clipper.160rmarjan,
-> #159, rmarjanMala ispravka, malerozna kartica se odazivlje sa adrese 340, int 3 ali
sa tim setovanjem nezna zase...
clipper.161nbatocanin,
-> #151, rmarjan> siguran kako se Flipper ponasa i ne znam CATOOLS kako radi
> kao i nanfor.
Da nije u ovome štos? Možda ne podržavaju verziju 5.3?
> Inace, veoma me interesuju BLOB fajlovi,
Pročitaj malo NG, imaš dosta primera.
> nejsano ono sa Root delom BLOB zapisa. To je neki skup
> pointera na nesto?
Imaš poseban drajver DBFBLOB koji ti omogućava da radiš sa memo
poljima bez osnovne DBF datoteke. Znači, sve radiš preko "niskih"
funkcija, uključujući i čuvanje pointera na "memo" polja.
> Da li da se opredelim za Novell Lite ili Personal Netware?
Uh, ja o PNW nemam baš mnogo lepih reči, ali nisam mnogo video od NL,
pa ne mogu da poredim. U odnosu na Novell 3.xx, nebo i zemlja.
clipper.162dvesic,
-> #159, rmarjan>> BTW zasto mi jedna od kartica (Novel/Eagle NE2000) uporno
>> pokazuje da se nalazi na INT 3 a na adresi 300, bez memorijske
>> adrese, a kada je tako
Moguće je da se port i/ili interapt određen na katici kolje sa nekim
parčetom hardvera.
clipper.163jpinta,
Nabavio sam CLIPPER 5.3 i poceo da ga testiram. Prvi problem na koji sam
naisao je da nemogu da aktiviram DEBUGGER. U paketu postoju CLDR a na help
daje sintaksu da se poziva sa CLD. Kompilacija je radjena sa parametrom /B
i linkovano sa njegovim BLINKER-om ili sa EXOSPACE-om. Program startuje i
radi ali nemoze da se aktivira debugger.
Instalacija je radjena sa originalnih disketa u punoj WIN verziji.
Masina je 486/8MB. Windows je WFWG 3.11.
Molim za pomoc gde gresim.
clipper.164banex,
Dakle, "REGISTROVAO " sam FiveWin. I sad je stvarno milina raditi. Inace
bilo je nekih nejasnoca i vezi registracije exe programa, pa u vezi sa tim
da kazem da je postupak isti kao i registracija Lib-a.Programi rade bez
problema. Zoran 403-430.
clipper.165rmarjan,
-> #161, nbatocaninDodatne biblioteke su u redu, probao BEZ podrske DBF i sve radi normalno.
Dakle ipak se radi o problemu u radu sa indeksima. Ne upotrebljavati
Blinker koji ide uz CL53!! Sasecen je poprilicno u odnosu na "pravi".
Jedna od vise stvari koje ne radi je na primer SET BLINKER .. SERIAL xxxxxxx
ovu komandu uopste ne poznaje.
Boris
clipper.166rmarjan,
-> #162, dvesicReseno, podesio dzampere za 5 i 340 i sve je OK na svim karticama.
Inace, da li u Windowsu za grupe, mogu vise korisnika startovati ISTI
program koji radi sa bazama i da ih dakle vise korisnika ODJEDNOM obradjuje
a ne samo cita. Ako to moze, sta ce mi PNW ili NL kad vec nemam Novel 3.xx
Boris
clipper.167vcalic,
-> #166, rmarjan>> Inace, da li u Windowsu za grupe, mogu vise korisnika startovati ISTI
>> program koji radi sa bazama i da ih dakle vise korisnika ODJEDNOM
>> obradjuje a ne samo cita.
Može, i radi primetno brže od ostalih, zbog famoznog vcache-a.
Samo treba se pridržavati par stvari:
- Obavezno korišćenje NDIS3 drajvera. Mnogi fantomski problemi su
nestali kad se koriste *ISKLJUžIVO* 32-bitni drajveri. Znači ništa Real
mode/Enhanced mode, već strogo Enhanced mode. (Pored imena drajvera treba da
piše NDIS3, a ne NDIS2/NDIS3). Ovo isključuje mogućnost korišćenja DOS
varijante mreže, ali od nje ionako nema mnogo vajde. Mada opet, 286 mašine
mogu prilično lepo raditi kao klijenti, ali to je za neku drugu priču.
- Najbolje da se pri instalaciji mreže postave svi direktorijumi koji
treba da budu deljeni i da se korisnicima ne dozvoli da mnogo čačkaju. To je
važno zbog sledećeg:
- Dešava se da browsing zakaže kad najmanje treba, mada se
mašine vide međusobno. Zašto se to dešava MS krije k'o blesav i za takve
slučajeve preporučuje startovanje DOS prozora i primenu komande NET u njemu.
Pomalo je tragično da se to dešava i u mešovitim Win95/Win 3.11 mrežama. Ipak,
NET bez greške rešava ovakve probleme, pa je potrebno proučiti sintaksu ove
komande.
- Ukoliko je već jedan računar bitniji od ostalih, kod njega treba
podesiti deljenje resursa na uštrb smanjivanja brzine rada aplikacija.
Naravno, poželjno da mašina bude što jača. Tu strogo zabraniti instaliranje
svega i svačega, a sjajno dodatno rešenje je objavljeno u PC-u #7 u Odabranim
bajtovima. Caka je u PROGMAN.INI u sekciji [Restrictions]. Može se zabraniti
korisniku bukvalno svaka izmena uključujući i pojavu File menija.
- Ukoliko nešto ugrozi sam Windows na centralnoj mašini, pre
uobičajenog srpskog pominjanja majke Bila Gejtsa obavestiti korisnike da što
pre završe sa radom. Win 3.11 server je u ring0 pa ga je mnogo teže
oboriti, čak i ako je Win doživeo BSOD ili onaj grozomorni plavi ekran. Dakle,
upozoriti korisnike da se malo strpe pa onda resetovati mašinu.
Kad se sve sabere i oduzme, WfWg 3.11 je najbolje DOS rešenje za p2p
mrežu, ali zahteva jake mašine, vrlo pažljivo planiranje, prilične restrikcije
u vezi budženja svega i svačega po Win-u, i dobro poznavanje samog Windows-a.
Ako tu uleti i Netware, stvari se malo menjaju, jer osnovnu snagu ove
verzije predstavljaju 32-bitni NDIS3 drajveri i 32-bfa/vcache, a ono prvo je
neupotrebljivo u saradnji sa Netware-om, dok ovo drugo radi polovično. Win95
rešava i prvu varijantu, ali ovde ne pričamo o njemu.
Vlada
clipper.168biki,
-> #164, banexImam drugara koji je odusevljen FiveWin-om i iz zezanja je razvio jednu
aplikaciju u njemu za koju sad ima i kupca. Nadao se da ce uspeti da
registruje FW, cak je zvao i u Madjarsku, ali nesto nije islo.
Takodje mu nije jasno sta se dogadja kad promeni masinu jer, kako mi je
objasnio, za svaku masinu se generise drugaciji broj za registarciju.
Sad ga interesuje da li postoji ikakvo resenje, jer mu je stvar jako hitna
i spreman je da ponesto plati. Da li postoji nekakvo resenje ?
clipper.169banex,
-> #168, bikiHa, resenje se uvek nadje.:) Ovo je sasvim korektno i funckionise besprekorno.
Nek mi se javi na tel. 403-430. Zoran.
clipper.170rmarjan,
Rado bih presao na Clipper 5.3 ali jos uvek ne mogu da resim problem rada
sa CDX drajverom. Da li je neko radio njime i da li mi moze pomoci da resim
kako da ulinkujem CDX darjvere normalno.
nBatocanin mi je objasnio za CDX... i _CDX... library ali kojim se one
redosledom linkuju u skriptu, i dalje ne znam. Postoji nekoliko mogucih
kombinacija ali svaka od njih mi napravi problem.
Da li _CDX ide pre CDX, da li _CDX uopste moze u ovrelej deo, da li _CDX
posle CDX, dali _CDX uopste ulinkovati moram itd..
Neobicno mi je da odjednom imam tol°─ űiko pitanja za nesto sto bi trebalo
da fercera bez problema, pogotovo nakon Clipper 5.2 :<
Nije valda da niko nije potpuno presao na 5.3, a ako nije, sta je razlog?
Boris
clipper.171nbatocanin,
-> #163, jpinta> problem na koji sam naisao je da nemogu da aktiviram
> DEBUGGER.
Za WIn dibager treba staviti SET PIPEHANDLE=0 i u SYSTEM.INI
DEVICE=CAW*.*, gde tačan naziv ovog drajvera vidite u direktorijumu
SYSTEM.
Kod DOS-a postoje dve varijante dibagera: za protected i real mod.
Ako se radi u protected modu, ne postoji eksterni dibager, nego se
ulinkuje CLD.LIB, ALI KAO _FILE_, a ne kao _LIB_. Znači,
exospace fi prog, cld.lib
Kasnije se u programu samo pritisne Alt-D i to je to. Ovo rešenje
radi i u real modu. Ako želite isključivo rad u real modu, ulinkuje
se isto ovako CLDR.LIB, posle čega se može startovati sa:
cldr prog.exe
clipper.172bulaja,
-> #170, rmarjan│Nije valda da niko nije potpuno presao na 5.3, a ako nije, sta je razlog?
└───
Ja nisam zato što ne radi SIx v2.0, a još uvek nemam SIx v3.0 :(.
Imam svuda gomile poziva SIx-ovih sx_ i m6_ funkcija i koristim neke
stvari koje on ima a DBFCDX u 5.3 nema (recimo kriptovanje), tako da
mi je lakše da čekam da stigne SIx 3 nego da sve konvertujem :).
clipper.173cnenad,
Da li neko zna nešto o sledećoj grešci:
dbusearea (0) Urecoverable error 669: Eval stack fault
Pojavljuje se kod otvaranja baze.
Inače, ako pre ulaska u neki deo programa koji otvara neku bazu sa F1 pozovem
HELP, dotični prikaže, onda nema pucanja. Takođe pucanja nema ni kad program
pozivam kroz dibager.
Clipper 5.2e + Six 2.03.01
clipper.174nbatocanin,
-> #170, rmarjan> i _CDX... library ali kojim se one redosledom linkuju u
> skriptu, i dalje ne znam.
U uputstvu kaže da se linkuje sa
exospace fi prog lib dbfcdx, _dbfcdx
e sad: kako sa Blinkerom, ne znam tačno. Sad sam video u uputstvu za
Comix, on zahteva da se navede direktiva STACK 7168 pri linkovanju
kako bi dobro radio. Probaj i ovo!
> Nije valda da niko nije potpuno
> presao na 5.3, a ako nije, sta je razlog?
Uopšte nije čudo. Stvar je dosta nova kod nas, treba videti da li ima
problema, preraditi softver, itd.
clipper.175jpinta,
-> #171, nbatocaninZahvaljujem se na pomoći. Probao sam i stvar radi.
Ali imam i nezadovolavajuće rezultate. Naime ako radim u real modu
nemogu da startujem dibager sa većim programima zbog nedostatka memorije.
A ako radim u protektid modu tada mi neradi parametar /S pa nemam podeljeni
ekran. Sve u svemu nisam baš zadovoljan kako su to rašili. Pod WIN-om
nisam još probao jer me zeza sa prvodjenjem postojece aplikacije a test
od dva tri reda mi nije dovoljan za ocenu.
U svakom slučaju hvala na pomoći.
clipper.176banex,
Izvinjavam se svima koji su mi poslali poruke u Mail, a nisam im odgovorio, jer
sam "lenj na kucanjnu" :).Registrovani Fivewin.lib radi samo na onoj masini na
kojoj se izvrsi registracija. Znaci uzalud je da saljem svoj registrovani
FW.lib. I da ne bi prezvakavali ovu temu unedogled( a mislim da ima razloga i
za malo 'intime' po tom pitanju) zadnji put za ONE KOJI SU STVARNO
ZAINTERESOVANI : tel. je 403-430, slobodno pozovite najbolje 0d 9-11 ili 16-20h
Pozdrav svima. Zoran.
clipper.177rmarjan,
Imam dve dileme pa ako neko moze da savetuje, rad sam da poslusam:
1. Koji je predlog za resavanje problema kada mi radi aplikacija u GRAFICKOM
rezimu, da ipak preko mreze mogu da primim poruku. Naime, ona se na ekranu
sada ne vidi, ali ako je neka vazna (spustanje sistema na primer) ja je
jednostavno MORAM videti. Ima li neki nacin da preko nekog semafora ili
slicno, moj program ustanovi da je aktivna neka poruka meni upucena i
da vidim koja je i da je konvertujem i u grafickom modu ipak prikazem?
2. Kako resavate najelegantnije situaciju prikaza promena na drugom racunaru
ako rade istim programom (simultano unose podatke) da se izmena na racunaru
A odmah ili sa malom zadrskom vidi na racunaru B. Ja to resavam sa
povremenim osvezavanjem ekrana (odredjen broj sekundi) da racunar ne
trepce previse cesto ali nisam vec duze vremena sretan takvim resenjem
koje radi potpuno korektno ali mozda ne bih trebalo da otkrivam rupu
u saksiji ako neko ima bolje resenje.
Boris
clipper.178rmarjan,
-> #173, cnenadPrema NG "Clipper 5.2 internal errors:
System has tried to expand the MEMVAR table, and is unable to do so due to
insufficient memory ...
Pozdrav Boris
clipper.179ndragan,
-> #141, cnenad/ ScoreBoard, recimo u GET polju se unose pogrešan datum a program gore
/ izbaci INVALID DATE...
Za foksovce, "On ReadError Do trt_mrt".
clipper.180ndragan,
-> #154, rmarjan/ za njih uraditi aplikacija za pracenje kredita , obrada, kamate,
/ dinamika...
Turi im običnu analitiku, samo promeni konta i naslove.
Neće primetiti :)
clipper.181d.petrovic,
-> #177, rmarjan> 1. Koji je predlog za resavanje problema kada mi radi
> aplikacija u GRAFICKOM rezimu, da ipak preko mreze mogu da
> primim poruku. Naime, ona se na ekranu
Pogledaj (dokle da povaljam ;) ) ovu temu unazad par meseci. Poruku je
poslao aseovic i uz nju nešto kao nw_cast.arc.
clipper.182kanki,
Ova procedura kad se pozove vrati mi karakter-broj sloga, a treba mi
numerik, i taj karakter ne mogu VAL(" ") da promijenim u numerik...
Đe griješim...
--------------------------------------------------------
#include "inkey.ch"
PROCEDURE n()
LOCAL a, polje := 0
LOCAL b := TBrowseDB(5,50,20,75)
USE dbf NEW
FOR i = 1 TO FCOUNT()
b:ADDColumn (TBColumnNew(Field(i), Fieldblock(Field(i))))
NEXT
b:colorSpec := "N/W,N/BG,B/W,B/BG,B/W,B/BG,R/W,B/R"
b:headSep := CHR(205) + CHR(209) + CHR(205)
b:colSep := CHR(32) + CHR(179) + CHR(32)
WHILE .T.
a := 0
CLEAR TYPEAHEAD
WHILE !b:Stabilize() .AND. (a := INKEY() == 0); END
If b:stable; a := INKEY(0); END
DO CASE
CASE a == K_ESC; exit
CASE a == K_UP; b:up()
CASE a == K_DOWN; b:down()
CASE a == K_LEFT; b:left()
CASE a == K_RIGHT; b:right()
CASE a == K_RETURN; ? fieldget(1) ;RETURN
ENDCASE
END
RETURN
*****************************************
clipper.183cnenad,
-> #178, rmarjan=> System has tried to expand the MEMVAR table, and is unable to do so due to
=> insufficient memory ...
Očigledno nisi dobro pročitao poruku koju program javlja kao grešku i jeste
da je isti broj (što sam i ja video iz IE NG-a) ali izgleda nije ista
greška.
Ovde je u pitanju dbusearrea( 0 ) Unrec. error 669 eval stack fault
BTW, jedino što se u problematičnom programu može podvesti pod MEMVAR su
deklaracije FIELD tipa i to u samo valjda jednoj proceduri, koliko se
sećam.
clipper.184cnenad,
-> #182, kanki=> CASE a == K_RETURN; ? fieldget(1) ;RETURN
=> RETURN
Promeniš prvo PROC u FUNC.
Pa onda recimo:
LOCAL lxV := ''
...
lxV := Obrada()
RETURN( lxV )
Ovako kako si sada napisao 'izjava' RETURN ne vraća nikakavu vrednost
(u stvari vrati ti NIL) u pretohdnu funkciju ili proceduru.
clipper.185d.petrovic,
-> #182, kanki
Nebih ovo nazvao lepo napisanim:
Procedure ne treba da vraća ništa. Funkcija treba da vraća nešto. Zatim
lepo dodaj local nRet := 0 i kod K_RETURN nRet := ... pa na kraju vrati
Return(nRet)
clipper.186rmarjan,
-> #183, cnenadU pravu si, ne slaze se opis greske i ono sto pise u NG.
Inace, slican problem sam nekad imao kada mi se desilo dok sam radio sa
NTX indeksima, da sam u jednom momentu, "updatovao" bazu koja nije imala
SVE potrebne indekse aktivirane a onda odmah zatim pokusao da radim i
referisem se na indeks koji jos nije imao podatke o novim slogovima. To
kao mogucnost problema uzmi u obzir obavzeno i proveri..
Primetio sam da se cesto kod rada sa bazama i greskama koje tada nastanu,
error sistem zbuni ponekad i javlja neku nebuloznu poruku koja stvarno
sa problemom nema veze. I tu treba biti oprezan da se ne zaletis, kao sto
se sigurno svima nama vec desavalo, pa uporno BAS tu gresku zelimo naci
a ustvari je problem potpuno druge prirode.
Meni tvoj problem mirise (iliti obratno) na nesto sa redosledmo indeksa.
Boris
clipper.187rmarjan,
Da li je neko slucajno naisao na FiveWin, vezija 2.0 ?
Boris
clipper.188bulaja,
-> #173, cnenad│dbusearea (0) Urecoverable error 669: Eval stack fault
└───
Koristiš svoj prepravljeni ErrorSys? :)
Ako je tako, izbaci ga (privremeno) i probaj ponovo.
clipper.189mileusna,
-> #177, rmarjan>> povremenim osvezavanjem ekrana (odredjen broj sekundi) da racunar
>> ne trepce previse cesto ali nisam vec duze vremena sretan takvim
>> resenjem koje radi potpuno korektno ali mozda ne bih trebalo da
>> otkrivam rupu u saksiji ako neko ima bolje resenje.
Ako je treptanje to što te nervira, pogledaj funkcije
DISPBEGIN() i DISPEND(). Radi se o 'baferisanju' izlaza na
ekran. Primer:
DISPBEGIN() // ovde počinje punjenje 'bafera'
CLS // ┐
@ 1,1 SAY "..." // ┼ ovde se ništa ne ispisuje,
@ 0,0 TO 4,20 // ┼ niti je ekran obrisan
@ 5,7,15,34 BOX "ŮŮŮŮŮŮŮŮ" // ┘
DISPEND() // prikazuje se gotova slika
clipper.190kcurcic,
Problem: ne znam ko je ovde lud: ja ili Clipper. Obratite pažnju na
naizgled normalno parče programa:
proc Main()
local cTmp:=Space(64)
local i,h
local aArr:={}, aArr2:={}
aArr:=Array(20)
for i:=1 to 20
aArr[i]:=padr("Primer broj "+Str(i),64)
next
h:=fcreate("test.dat")
for i:=1 to 20
? aArr[i]
fwrite (h,aArr[i],64)
next
fclose (h)
h:=fopen("test.dat")
for i:=1 to 20
fread (h,@cTmp,64)
? cTmp
aArr[i] := cTmp
next
fclose (h)
for i:=1 to 20
? aArr[i]
next
return
Savršeno normalno, zar ne ? Inicijalizuje se niz od 20 stringova,
upiše u datoteku, pročita (prilikom čitanja cTmp ima ispravnu vrednost) a
posle svi elementi niza aArr imaju istu vrednost, i to onu koja je
poslednja pročitana iz fajla. Pa, ne baš normalno ako mene pitate. Verzija
je 5.2 a stari Clipper 5.01 je ovo normalno izvršavao, pa ako neko zna koji
mi je patch primenjivati... ;>> Ili možda Clipper 5.3 rešava ovaj
neprijatni feature ? ;>
clipper.191cnenad,
-> #188, bulaja=> Koristiš svoj prepravljeni ErrorSys? :)
=> Ako je tako, izbaci ga (privremeno) i probaj ponovo.
Ne ali mislim da znam u čemu je problem što za razvoj i nije tako bitno.
Ubacio sam onu zamenu za F6 dibagera (za CDX/NSX, SCOPE i slično) koja
ponekad zna da puca, i to verziju koja stiže uz Successware RDD 2.0.
Starija verzija ne može da se ulinkuje jer koristi pozive funkcija koje su
u Six-u 2.0 izbačene.
clipper.192dvesic,
-> #190, kcurcic> Pa, ne baš normalno ako mene pitate. Verzija je 5.2 a stari Clipper 5.01
> je ovo normalno izvršavao, pa ako neko zna koji mi je patch primenjivati...
> ;>> Ili možda Clipper 5.3 rešava ovaj neprijatni feature ? ;>
Ovaj program sasvim korektno radi. Clipper 5.2e i Blinker 3.10
clipper.193kanki,
Snašao sam se sa PROCEDURE - FUNCTION ulogama (hvala!), ali imam
problem koji se nadovezuje na njih. Kad pozovem tbrowse i na enter
izaberem neki slog, e sad hoću da mi je u jednoj bazi samo numericka a u
drugoj karakter, jer sa istim tbrowsom pozivam nekoliko različitih DBFova
a u svakom slučaju on mi vrati sve kako treba ali TYPE("tbrowse") daje
' U ' i to me zajebava...
primer:
a:tbrowsedb(1,1,5,5)
.....
? a, type("a") izbaci 5 U
ili artikal U
Druga stvar koju bih htio da uradim jeste da u nekoliko GETova,
koliko mi treba, i na GET 3 pozovem tbrowse i određenu bazu i normalno
sa enter izaberem što mi treba.Problem je što maska ekrana je sastavljena
iz slogova jedne baze(polje1-5) a elementi polja 3 su iz druge baze....
primjer...
SAY polje1 GET 1
SAY polje2 GET 2
SAY polje3 GET 3
SAY polje4 GET 4
SAY polje5 GET 5
READ
ps. Sorry ako davim, ali početnik sam, pa malo jače zagrizao i lomim
sekutiće...
clipper.194cnenad,
-> #193, kanki=> a u svakom slučaju on mi vrati sve kako treba ali TYPE("tbrowse") daje
=> ' U ' i to me zajebava...
Ne ispituj šta je loB:Tbrowse nego ispituj ono što ti on vraća kao PODATAK tj.
da li je taj podatak numerik, karakter ili...
npr.
CASE lnT == K_RETURN
RETURN( ARTIKLI -> SIFRA )
...
if( valtype( Tabelarni_pregled ) == 'N', ... , ... )
=> Druga stvar koju bih htio da uradim jeste da u nekoliko GETova,
=> koliko mi treba, i na GET 3 pozovem tbrowse i određenu bazu i normalno
STATIC sx2 := '', ;
sx3 := '', ;
...
=> SAY polje2 GET sx2 VALID Izaberi_podatak( @sx2, 0 )
=> SAY polje3 GET sx3 VALID Izaberi_podatak( @sx3, 1 )
FUNC Izaberi_podatak( nA )
LOCAL llV := .F.
IF nA == 0
USE PRVA_DATOTEKA ...
ELSEIF nA == 1
USE DRUGA_DATOTEKA ...
ENDIF
//Tbrowse() ...
CASE lnT == K_RETURN
if( nA == 0, sx2 := ARTIKLI -> POLJE_1, sx2 := SIFRE -> 1 )
llV := .T.
...
ENDCASE
RETURN( llV )
Preporučujem ti da u Norton Guide-u od Clipper-a pročitaš deo koji se
bavi 'IZJAVAMA' PROCEDURE, i FUNCTIONS.
clipper.195bulaja,
-> #190, kcurcic│ Problem: ne znam ko je ovde lud: ja ili Clipper.
└───
Vrlo moguće Clipper :). Neka od prvih 5.2 verzija (mislim da je
oktplnjeno već u 5.2a) je imala bug u FRead koji je dovodio otprilike
do ovakvih problema. Ako imaš osnovnu (nekrpljenu) verziju 5.2 probaj
prvo da uradiš update (r:\clipper\52eusx.* ili 52eix, zavisno da li
imaš US ili Int'l verziju).
clipper.196cnenad,
-> #194, cnenad=>=> SAY polje3 GET sx3 VALID Izaberi_podatak( @sx3, 1 )
=> !!!!!!!
=> FUNC Izaberi_podatak( nA )
!!!
Ovde ima jedna mala greška, ispustih kao 'prijemni' argument funkciji i
vrednost unesenu u GET tako da bi u toj varijanti nA bio ono što je ubačeno u
GET polje. Moje izvinjenje, ispravno bi bilo:
FUNC Izaberi_podatak( xA, nA )
clipper.197mbiresev,
-> #190, kcurcic>> Problem: ne znam ko je ovde lud: ja ili Clipper. Obratite pažnju na
Ako u međuvremenu nije rešeno, postavljam i ja isto pitanje.
Inače, radiće korektno ako se stavi npr. aArrŠiĆ := cTmp + ""
clipper.198nbatocanin,
-> #190, kcurcic> for i:=1 to 20
> fread (h,@cTmp,64)
> ? cTmp
> aArr[i] := cTmp
> next
> fclose (h)
Bilo je reči ranije. FRead je f-ja niskog nivoa koja samo upisuje
pročitane vrednosti u zadati bafer. Naredba := dodeljuje elementu
niza _pokazivač_ na taj bafer. Znači, na kraju ciklusa svi elementi
niza "pokazuju" na jednu memorijsku lokaciju, koja ima poslednju
pročitanu vrednost. Problem možeš rešiti na više načina. Na primer,
inicijalizuješ bafer pre svakog čitanja.
clipper.199rmarjan,
-> #189, mileusnaNisam mislio na smetnje u gledanju treptanja, to je naravno moguce resiti
na vise nacina pa i na ovaj koji predlazes.
Mislio sam na situaciju da kada racunar A izmeni podatak, a racunar B treba
da VIDI izmenu. (Racunar A treba da uradi DBCOMMIT() ili/i SKIP(0)) E sad
na racunaru B ( a i na racunaru A u obratnom gledanju ako oba rade sa istom
bazom istovremeno), treba da se ugleda da je neko tu istu bazu nesto izmenio.
Za sada povremeno radim na racunaru B (ili A ako gldeam sa druge strane)
oBrowse:RefreshAll() i to je taj interval o kome pricam. Ima li neko
elegantnije resenje ili da jednostavno podesavam interval kada ce se na
racunarima u petlji cekanja na taster, izvrsavati osvezavanje ekrana da se
vidi promena koju je neki drugi korisnik uradio. Ako naime osvezim ekran tek
nakon aktiviranja neke tipke, to mi nije resenje, jer ako korisnik B duze
vremena stoji neaktivan, zelim ipak da se povremeno vidi da neko drugi ipak
radi i menja, dodaje ili brise podatke.
Boris
clipper.200kcurcic,
-> #192, dvesic
> Ovaj program sasvim korektno radi. Clipper 5.2e i Blinker 3.10
E, da bi korektno proradio na 5.20 + bilo koji linker mora da se doda
još jedna linija:
for i:=1 to 20
fread (h,@cTmp,64)
? cTmp
aArr[i] := cTmp
cTmp:=Space(64) <<<<<<<<<<<<<<
next
Di' su pečevi ? :)
clipper.201kanki,
-> #194, cnenad>> Preporučujem ti da u Norton Guide-u od Clipper-a pročitaš deo
>> koji se bavi 'IZJAVAMA' PROCEDURE, i FUNCTIONS.
Hvala, sad ću malo da oladim dok ne skopčam foru :). A što se tiče
NG :( nisam u stanju da ga 'čitam' jer engleski mi je jedan od dva
isita koji su mi ostali :( a i njega polažem na šverc...
clipper.202kanki,
-> #195, bulaja>> Vrlo moguće Clipper :). Neka od prvih 5.2 verzija (mislim da
>> je oktplnjeno već u 5.2a) je imala bug u FRead koji je dovodio
Sredio sam ovo...
clipper.203d.petrovic,
-> #199, rmarjan> vidi promena koju je neki drugi korisnik uradio. Ako naime
> osvezim ekran tek nakon aktiviranja neke tipke, to mi nije
> resenje, jer ako korisnik B duze vremena stoji neaktivan, zelim
> ipak da se povremeno vidi da neko drugi ipak radi i menja,
> dodaje ili brise podatke.
Upravo to bez čekanja na tipku. Može da bidu i semafori, ali mislim da je
nepotrebno.
clipper.204nbatocanin,
-> #199, rmarjan> vidi promena koju je neki drugi korisnik uradio. Ako naime
> osvezim ekran tek nakon aktiviranja neke tipke, to mi nije
> resenje, jer ako korisnik B duze vremena stoji neaktivan,
> zelim ipak da se povremeno vidi da neko drugi ipak radi i
> menja, dodaje ili brise podatke.
Ja imam skaniranje tastature rešeno u jednoj proceduri za sve TBrowse
preglede. Evo kako izgleda deo koji povremeno ispisuje ekran:
...
IF _MultiUser
REPEAT
IF (Ch := xKey(_ScrRate)) == 0
DispBegin()
TB:refreshAll():forceStable()
DispEnd()
END IF
UNTIL Ch <> 0
ELSE
Ch := xKey(0)
END IF
Znaci, kada je mrezna varijanta, na svakih _ScrRate se ispisuje ekran.
clipper.205bulaja,
-> #198, nbatocanin│Bilo je reči ranije. FRead je f-ja niskog nivoa koja samo upisuje
│pročitane vrednosti u zadati bafer. Naredba := dodeljuje elementu
│niza _pokazivač_ na taj bafer.
└───
Jok :), tako radi za nizove ali ne i za stringove, čak i kad se oni prenose
po imenu (dakle preko pointera). Ono što se sa FRead() pročita ostane tipa
string (odnosno Char), a problem u ranoj 5.2 verziji je baš i bio u tome
što je FRead() menjao taj tip u pointer i pravio zbrku :).