PCPROG.5

05 Jan 1995 - 02 Oct 1995

Topics

  1. algoritmi (106)
  2. comment (2)
  3. ms.dos (27)
  4. windows (332)
  5. asembler (203)
  6. basic (228)
  7. jezici (126)
  8. pascal (1085)
  9. cccc (546)
  10. cpp (117)
  11. clipper (1048)
  12. baze.podataka (194)
  13. fox (231)
  14. cavo (192)
  15. razno (593)

Messages - clipper

clipper.1 dvesic,
>> Probao sam i ja pa se ništa nije promijenilo. Jesi li siguran >> da si memo polja trpao u *.SMT ili *.FPT fajl a ne *.DBT od >> SIX 2.0 ? Sto posto siguran, jer je ulinkovan SIXCDX.OBJ koji postavlja SIXCDX kao jedini drjaver u sistemu, a i vizuelna kontrola je dala istovetne rezultate :) >> SIX2.LIB 2.01.00 pre-release, datum: 08-01-94 , vrijeme: 05:30 >> ? >> >> Šta ti imaš od SIX-a? six2.lib 311249 94-09-08 5:20 Verzija je 2.01.02 ( nije pre-release )
clipper.2 velicko,
Program radi bez ikakvih anomalija. Nešto drugo je u pitanju. Mi koristimo clipper 5.2d i blinker 3.10. Primer smo linkovali sa SIXNSX ver 2.01.02 (možda je u tome problem). U istoriji verzija SIX-a, u update-u za 2.01.02 se pominju nekakve anomalije sa memo poljima. linkovanje sa : blinker fi memo, sixUK, sixNsx lib six2 Šta ti znači NOMEMO u lnk fajlu, nismo našli ništa u NG-u? Milan & Velicko
clipper.4 velicko,
Povodom članka Jedrenje na Novell-u Dejana Vesića : Kakva su vam iskustva sa Novell-ovim TTS-om. Da li dolazi do usporenja kod upisa na disk? velicko
clipper.5 velicko,
žekajući VO :( Napokon sam nabavio ispravnu verziju Clip4Win-a. :) NG je siromašan i loše organizovan. Ali je program veoma interesantan i može da posluži za utehu dok ne nabavim VO. Početnik sam što se tiče Windows programiranja pa imam neka pitanja. Evo isečka iz DEMOMULT.PRG koji ima veze sa mojim pitanjem : ... // najpre uzmemo handler za DLL hLib := LoadLibrary("MMSYSTEM.DLL") ... // onda uzmemo adresu f-je SndPlaySound iz tog DLL-a cSound := GetProcAddress(hLib, "SndPlaySound", "Pascal", "Int", "str, int") // i napokon pozovemo f-ju sa parametrima n := CallDLL(cSound, WAVE_DIRECTORY + waves_[n] + ".WAV", 1) ... pitanja: Šta je MMSYSTEM.DLL? Gde da nađem spisak f-ja (sa sintaksom) iz Windows DLL-ova? Koliko je korektno pozivati funkcija na ovaj način. Kako se "slaže" Microsoft SDK sa Clip4Win-om? U jednom rmk fajlu se pominje program RC. žemu služi i gde se može naći ( iz kog je paketa )? Toliko za sada. Nesmem više da gušim. Unapred hvala velicko
clipper.6 dvesic,
> Kakva su vam iskustva sa Novell-ovim TTS-om. > Da li dolazi do usporenja kod upisa na disk? TTS dovodi do usporenja upisa, ali ne naročito drastičnih. Koristio sam ga u jednog eksperimentalnoj aplikaciji na mreži od 6 stanica. Generalni savet : ne koristi transakcije koje preterano dugo traju. Najbolji rezulat daje sistem : pripremi podatke za upis/izmenu, počni transakciju - upiši podatke - završi transakciju.
clipper.7 djelovic, -> #5, velicko
> Šta je MMSYSTEM.DLL? > Gde da nađem spisak f-ja (sa sintaksom) iz Windows DLL-ova? > ... > U jednom rmk fajlu se pominje program RC. žemu služi i gde se > može naći ( iz kog je paketa )? 1. MMSYSTEM.DLL je DLL za rad sa multimedijima. Osim u slucaju da tvoji korisnici imaju multimedija masinu, jedina funkcija koja ce te u njemu zanimati jeste ona za pustanje WAV datoteka. 2. Spisak Windows funkcija mozes naci u nekom od API Helpova koji dolaze uz Windows kompajlere (Borland C++, Visual C++, ...). 3. Pod Windowsima se program ne pravi samo u nekom programskom jeziku, vec postoji i posebna datoteka u kojoj se definisu ikone za taj program, dijalozi, meniji i sl. Ta datoteka se zove "resource" datoteka, a nju prevodi "Resource compiler (RC)". Rezultat prevodjenja sa RC-om se jednostavno ulinkuje u EXE sa ostalim OBJ fajlovima.
clipper.8 pstevo, -> #2, velicko
> Šta ti znači NOMEMO u lnk fajlu, nismo našli ništa u NG-u? NOMEMO.OBJ treba ulinkovati u program ako ne namjeravas koristiti memo polja. Time uštediš komadić memorije. Opis ti je u NG, u meniju OBJs/UTILS !
clipper.9 mdrazic, -> #4, velicko
> Kakva su vam iskustva sa Novell-ovim TTS-om. > Da li dolazi do usporenja kod upisa na disk? Lično nisam merio, ali u jednom časopisu od pre godinu, godinu i po sam pročitao da je usporenje oko tri puta. Dva puta usporenje je minimalno pošto se upisuje još na jedno mesto, resto je valjda za neku vrstu administracije gde je šta i u kom stanju. Pominjali su i neke problene u vezi indeksnih fajlova kad se koristi TTS. Milan
clipper.10 vision,
...Evo Vam jedan novogodisnji poklon... HA. Da vidim sta imate da kazete za ovo. MORATE pogledati... ^^^^^^ P.S. Message box: push buttons, move the message box, >>mouse<<, colors, (bolje resenje nisam video)... vbox.zip
clipper.11 snowwhite,
Molio bih vas da mi u sto skorije vreme odgovorite na ova 2 pitanja: 1.) Aplikacija radjena i prevedena sa Clp 5.2 + Blinker 3.0 radi na 386/4/250 bez problema, ali prilikom instaliranja na 286/1/40 prijavljuje otprilike ovu gresku: DbSeek(0) Unrecoverable error 5311 Cannot create VM swap file. Aplikacija je deljena na OVL-e. (exe + 5 ovl-a) Inace na 286-ici radi jedno vreme dobro, pa posle prijavi gresku. 2.) Da li postoji neki lib ili neka proc uz pomoc koje se moze menjati paleta boja i opis fontova bez nekih rezidentnih com-ova. Unapred hvala.
clipper.12 dvesic, -> #11, snowwhite
>> DbSeek(0) Unrecoverable error 5311 >> Cannot create VM swap file. Da li imaš dovoljno mesta na disku za swap fajl ? (preporučljivo je da imaš 1 - 2 Mb slobodno). >> 2.) Da li postoji neki lib ili neka proc uz pomoc koje se moze >> menjati paleta boja i opis fontova bez nekih rezidentnih >> com-ova. Nisam siguran da sam baš razumeo : da li se ovo odnosi na Clipper ?
clipper.13 bulaja, -> #11, snowwhite
│2.) Da li postoji neki lib ili neka proc uz pomoc koje se moze │menjati paleta boja i opis fontova bez nekih rezidentnih com-ova. └─── Za igranje sa paletom uzmi ovo: MSDOS - R:\CLIPPER ---------------------- fxcolor arj 55257 Specijalni efekti sa bojama na VGA za Clipper 5.x Za učitavanje VGA fontova postoje funkcije u dosta biblioteka (a to nije problem ni sam da uradiš uz malo znanja asemblera), pogledaj npr. u CA-Clipper Tools ili FUNCky bibliotekama.
clipper.14 mrajacic,
Gde grešim, imam nameru da u dbx ugradim neke svje funkcije, no stalno mi prijavljuje ovakvu grešku. Bez obzira dali sam nešto dodao u MYFUNC ili samo linkovao izvorne stvari. U pitanju je DBX132 CA 5.2d i BLINKER 3.01 Đ║ PP │00001 │SREMPROM │001 ║ĐĐ Đ║ PP │00001 │SREMPROM │010 ║ĐĐ Đ║ PP │00100 │UŠĆE PROMET │000 ║ĐĐ Đ║ DD ┌─────────────────────────────────────────────────┐│000 ║ĐĐ Đ║ SZR │ Error DBCMD/1025 Argument error: ORDNUMBER ││000 ║ĐĐ Đ║ PP │ ││000 ║ĐĐ Đ║ PP │ Quit ││001 ║ĐĐ Đ║ DD └─────────────────────────────────────────────────┘│000 ║ĐĐ Đ║ DD │00104 │GRAFOSREM │001 ║ĐĐ Đ║ DD │00105 │SAVREMENA ADMINISTRACIJA │000 ║ĐĐ Pozdrav Milan
clipper.15 bpekic,
Moze li mi neko objasniti sledece: Obicna FOR-NEXT petlja. Ako napisem : FOR i := 1 TO 500 neki kod NEXT i kod se izvrsi veoma brzo... Ako napisem : FOR i := 1 TO (1000-500) // Znaci isti broj ciklusa neki kod NEXT i kod se izvrsi UBEDLJIVO sporije. Mislim da ne bi trebalo da takva VELIKA razlika nast+ ne zbog stalnog izyracunavanja (100-500). Ipak to nije problem za racunar.Tazlika u brzini je ■˛najmanje 1 prema 100 ! Jedni sto mi pada na pamet je usporavanje zbog izracunavanja uslova za kraj petlje ali da li je moguřÚce da je takva razlika u brzini?
clipper.16 dvesic, -> #15, bpekic
>> Mislim da ne bi trebalo da takva VELIKA razlika nast+ ne zbog >> stalnog izyracunavanja (100-500). Ipak to nije problem za >> racunar.Tazlika u brzini je ■˛najmanje 1 prema 100 ! Ja tu razliku čak ne mogu ni da detektujem ;) Evo ti ceo program i rezultati, pa probaj kod tebe : PROGRAM : Proc Main Local a, i, b,j a := seconds() ; b :=0 For i:=1 to 5000 For j:=1 to 50 b+=j Next j Next i ? Seconds() - a, b a := seconds() ; b :=0 For i:=1 to (10000-5000) For j:=1 to 50 b+=j Next j Next i ? Seconds() -a, b Return REZULTATI : 11.48 6375000 11.32 6375000 ( Bolji rezultat u drugom slučaju ! :)
clipper.17 dvesic, -> #14, mrajacic
>> dodao u MYFUNC ili samo linkovao izvorne stvari. U pitanju je >> DBX132 CA 5.2d i BLINKER 3.01 Nije do tebe, nego do dbMAX-a. (i meni se to redovno dešavalo). Uzmi dbMax 1.33 (mislim da je negde okačen), on nema problema sa 5.2d verzijom Clipper-a.
clipper.18 vlador,
Već sam jednom pitao, ali kako je neko rekao "sramota je da ostane bez odgovora", pa makar odgovor bio i "ne može". :) Dakle, da li je moguće Blinkerom v3.0 napraviti exe koji će koristiti PLL fajlove? --- ■ VLADOR ■ Vazda postoje dva misljenja: MOJE i ono pogresno.
clipper.19 lucas,
Da li postoji način da se uz naredbu ACCEPT unapred odredi koliko maksimalno karaktera treba da bude promenjiva. Npr. ACCEPT "Ime i Prezime " TO ime Korisnik kuca ime i prezime ali kada recimo otkuca 20 znakova da ne može više (recimo kao u SAY ... GET) p.s.Nažalost radim u clipper-u summer 87 pa ako neko zna da mi pomogne ....
clipper.20 nbatocanin, -> #15, bpekic
> Ako napisem : > FOR i := 1 TO (1000-500) // Znaci isti broj ciklusa > neki kod > NEXT i > kod se izvrsi UBEDLJIVO sporije. > > problem za racunar.Tazlika u brzini je ■˛najmanje 1 prema > 100 ! Hm, ja ne dobijam tako drastićne razlike. Pošalji test program.
clipper.21 dvesic, -> #18, vlador
>> Dakle, da li je moguće Blinkerom v3.0 napraviti exe koji će >> koristiti PLL fajlove? Nije moguće.
clipper.22 dr.grba, -> #18, vlador
>> Dakle, da li je moguće Blinkerom v3.0 napraviti exe koji će koristiti PLL >> fajlove? Ne.
clipper.23 vgenije,
pozdrav e posto sam resio da se posle pascala presaltujem na Clipper pomkozite mi oko literATURE. Napominjem da sam totalni pocetnik sto se clippera tice pozdrav vlada biskupljanin
clipper.24 dejanr, -> #15, bpekic
>> Mislim da ne bi trebalo da takva VELIKA razlika nastane zbog stalnog >> izyracunavanja (100-500). Ipak to nije problem za racunar.Tazlika u >> brzini je najmanje 1 prema 100 ! Izgleda da to nastaje zbog pozivanja nekog internog kalkulatora, koji se sporo startuje, rezerviše i posle oslobađa svoje radne prostore itd. Inače, i ja sam primetio da su brojačke petlje na Clipper-u prava katastrofa od sporosti, ali me ipak odnos 1:100 malo čudi (ako to nije figurativno rečeno).
clipper.25 nbatocanin, -> #18, vlador
> Dakle, da li je moguće Blinkerom v3.0 napraviti exe koji > će koristiti PLL fajlove? Ne. Bar ne nekim regularnim metodom i šteta što je tako.
clipper.26 nbatocanin, -> #19, lucas
> ACCEPT "Ime i Prezime " TO ime > Korisnik kuca ime i prezime ali kada recimo otkuca 20 > znakova da ne može više (recimo kao u SAY ... GET) Ne, nećeš moći. Zašto ne koristiš SAY..GET umesto ACCEPT?
clipper.27 nbatocanin,
Ima li neko (ili zna gde mogu da nabavim) nešto od softvera za generisanje sorsova na osnovu EXE/OBJ datoteka? Stvar je dosta hitna.
clipper.28 spantic, -> #27, nbatocanin
> Ima li neko (ili zna gde mogu da nabavim) nešto od softvera za > generisanje sorsova na osnovu EXE/OBJ datoteka? Stvar je dosta hitna. Postoji to za Clipper Summer 87, a i za FOX PRO 2.0. Za kasnije verzije nisam čuo.
clipper.29 jolicm,
Jedno verovatno staro i već razjašnjeno pitanje .... Kako BLinkerom 3.0 i Clipperom 5.2d napraviti programe koji će raditi u 286-386 i 8086 modu. Probao sam sa linkovanjem samo dodatne datoteke iz blinkera, ali mi javlja neke greške. ???
clipper.30 vision,
Sta?? Zar niko nije pogledao poruku 10.10 ????
clipper.31 jkpbvk,
Imam neku demo verziju programa Lasso koji konvertuje ascii u dbf ali je ogranicen na 100 polja.Jel' postoji novija verzija koja nije ogranicena ili ista ta razbijena ili ima neki drugi program koji radi taj posao ?
clipper.32 bpekic, -> #24, dejanr
Evo dela koda koji me cudi. Linker je BLINKER 3.0, vezana je i biblioteka CA-TOOLS i FLIPPER 5.02 Sve zajedno radi u grafici (mada ne znam kakve to veze ima sa obicnom FOR-NEXT petljom za probno usporavanje rada) *--------------------------------------------------------------------------* LOCAL t,i,x,y,radius,disty,distx x := 200 y := 150 radius := 5 distx := -1 disty := -1 DO WHILE t <> 27 t = INKEY() ********** // AKO ovde kao reper za kraj, stavim 100, izvrsava se barem 30x brze !!! FOR i=1 TO (100000-99900) // Druga varijanta je: FOR i=1 TO 100 NEXT i ********** FCIRCLE(x,y,radius,11) IF (FPOINT(x,y) == 14) SOUND(131,1) // C3 za 10 stotih delova sekunde IF ((x==150) .AND. (y==10)) .OR. ((x==500) .AND. (y==10)) .OR. ; ((x==150) .AND. (y==300)) .OR. ((x==500) .AND. (y==300)) disty = disty * -1 distx = distx * -1 ELSEIF (x == 150) .OR. (x == 500) distx = distx * -1 ELSEIF (y == 10) .OR. (y == 300) disty = disty * -1 ENDIF ENDIF x = x + distx y = y + disty FOR i=1 TO 500 NEXT i FCIRCLE(x,y,radius,11) ENDDO Nije mi nesto vazno za program, ionako sam samo testirao neke ideje, ali moze biti interesantno za neke ozbiljne aplikacije koje bi trebale da rade u grafickom rezimu. Ne mogu da smislim, gde bi bilo sudaranje u radu. Pozdrav!
clipper.33 bpekic, -> #27, nbatocanin
Ako zelis da dobijes ASSEMBLER cod, postoji SOURCER program, ali je neupotrebljiv za Clipper aplikacije. Za Clipper je zgodan program koji iz EXE napravi PRG ali ima jednu manu, radi samo sa Summer '87 verzijom, pa cak i za tu verziju samo ako nisi linkovao neku posebnu biblioteku uz kod. Pozdrav!
clipper.34 bpekic,
Ima li neko odgovor na sledece pitanje: Jedna od aplikacija koje radim (i koja se vrti na 30-tak mesta u gradu, znaci nista novo) mi zadaje probleme. Linkovana je BLINKEROM 3.0, i na sva tri kucna racunara indeksiranje baza podataka jednog od korisnika obavi za oko 3 minuta (386/40). Na drugim racunarima u gradu (priblizne velicine baza), radi sa otprilike slicnim vrednostima vremena indeksiranja (ukupna velicina svih baza je priblizno 15 MB). Kod jednog od korisnika nakon nekih dorada modula i standardnog linkovanja, sada indeksiranje traje 35 MINUTA !!!. Pokupio sam njegove baze i ponovio na sva tri kucna racunara, rezultati su (zavisno od memorije 8MB i 2x 4MB) 3 minuta 20 sec, 3 minuta 40 sec. Jedino sto mi pada na pamet je nesto u vezi hard diska. Naime korisnik je dokupio jos jedan hard disk i sada se moja aplikacija vrti na C kao i ranije. Medjutim, pricao mi je da su mu momci koji su mu prodali i instalisali hard-disk, iz nekog razloga FORMATIZOVALI disk. Disk je inace 450/420? MB (mislim Quantum ili Coner). Na njemu sam zatekao DOS 5.0 verziju pa sam nakon ovako drasticnog usporenja indeksiranja, instalisao DOS 6.2 ali se nista nije promenilo.Memorije ima 4MB BIOS je od 1990.g. tako da u SET-UP nema neke selekcije CLOCK-a, DRAM memorija je sa 0 W/S (promene tih vrednosti nista ne menjaju). Neke od Adresa sam stavio na "Enabled/Disabled", probao sve sto sam do sada procitao ili radio - NISTA. Sporo i kvit! Sumnjam i na kontroler (ali je isti radio i ranije) ili formatizovanje sa pogresnim parametrima. SADA SLEDI POSLASTICA: Kada sam prelinkovao aplikaciju sa RTLINK-om (i eksterni overleji), aplikacija radi kako treba!! To je tako jedina masina kojoj je potrebno da bude aplikacija linkovana sa RTLINKOM umesto BLINKEROM. Na kucnim racunarima, potpuno je svejedno kako je aplikacija linkovana, radi istom brzinom (BLINKER-RTLINK) Ima li neko savet?
clipper.35 arazumenic,
Evo šta sam juče otkrio (naravno, sasvim slučajno). Da li ste znali za ovakvu konstrukciju u GET-u: č a,b say "Nesto" get Nesto SEND reader:=šđxđ ml_reader(x)ć U NG to ne postoji, a pronadjeno je u STD.CH. Da ne listate, evo ga: #command č <row>, <col> GET <var> ; ŠPICTURE <pic>Ć ; ŠVALID <valid>Ć ; ŠWHEN <when>Ć ; ŠSEND <msg>Ć ; ; => SetPos( <row>, <col> ) ; ; AAdd( ; GetList, ; _GET_( <var>, <"var">, <pic>, <švalidć>, <šwhenć> ):display(); ) ; Š; ATail(GetList):<msg>Ć Naravno, umesto READER u gornjem primeru, može se poslati bilo koja instans varijabla ili bilo koji metod. Što je najlepeše, može se zadati više SEND-ova u okviru jednog GET-a. Evo, ovo lepo radi: č a,b say "Nesto" get Nesto send reader:=šđxđ ml_reader(x)ć ; send colordisp("w+*/g") Pitanje je samo da li se ovo isplati korisiti, jer može da im padne napamet da u sledećoj verziji ovo ukinu (u NG se ovo ne pominje). Saša
clipper.36 cnenad,
/reply na PROG.4:clipper 1228, bulaja/ ŁŁŁ davno smo je dovukli ovde, ali sam zaboravio da je stavim u širu ŁŁŁ javnost. Takođe skupiću najsvežije patch-eve za SIx pa će i oni biti ŁŁŁ u CLIPPER direktorijumu ovih dana. Ovde je samo spisak izmena za Još ih nema ?
clipper.37 cnenad,
/reply PROG.4 1266, nbatocanin/ ŁŁŁ Izmena konfiguracione datoteke prelazi mogućnosti 99% korisnika mojih :(( ŁŁŁ programa. Podešavanje svih parametara radi program, preko pogodnih ŁŁŁ maski i menija. Da li je baš uvek zgodno 'bezuslovno' ugrađivati takav kod za neka podešavanja koja se vrlo retko rade ? Inače, podešavanja mogu biti zaista proste prirode, tako da i nije problem rešiti to nekim ASCII editor-om. Ako to neko nije u stanju da uradi :(((
clipper.38 dpredovic, -> #18, vlador
> Dakle, da li je moguće Blinkerom v3.0 napraviti exe koji će > koristiti PLL fajlove? > Već sam jednom pitao, ali kako je neko rekao "sramota je da > ostane bez odgovora", pa makar odgovor bio i "ne može". :) Ne može :))
clipper.39 dpredovic, -> #11, snowwhite
> Aplikacija je deljena na OVL-e. (exe + 5 ovl-a) ? Zašto? > 2.) Da li postoji neki lib ili neka proc uz pomoc koje se moze > menjati paleta boja i opis fontova bez nekih rezidentnih > com-ova. Imaš fxcolor, koji može direktno da gađa RGB komponente svake boje u paleti, ali za mene je to malo previše. Sasvim dovoljno je odabrati 16 boja iz dosove palete od 64 boje. To radi npr. funcky. Funcky isto ima i podršku za fontove, ali mi se ne dopada, pa još uvek koristim moje funkcije iz pre-funcky perioda. Evo ih, pa probajte. logo.zip
clipper.40 dejanr, -> #34, bpekic
>> Ima li neko savet? Meni to "miriše" na neki problem sa memorijom. Ne znam da li može da bude tako jednostavno, ali da li je na oba mesta instaliran isti memory mgr i isti disk keš program?
clipper.41 dvesic, -> #29, jolicm
Subject: Re: DUAL Mod > Kako BLinkerom 3.0 i Clipperom 5.2d napraviti programe koji će raditi u > 286-386 i 8086 modu. Iz nekoliko koraka : - Dodaj sledeće stvari u LNK datoteku : Blinker Exe Dual Section Into Dual.Ovl # Ovo je eksterna datoteka sa overlejima # za sada je neophodna # Search BlxRatex # Za slučaj da koristiš neku biblioteku # koja očekuje ExoSpace kao linker-a. # Inače izbaci. Search BlxClp52 - To bi bilo sve. Drugi korak je da budeš 100% siguran da je sav kod pisan za protected mode. Praktično, to znači da je ili čist Clipper, bez dodatnih biblioteka ili da su te biblioteke pisane za prot.mod (npr. NanForX za NanFor bibloteku).
clipper.42 dvesic, -> #32, bpekic
> Linker je BLINKER 3.0, vezana je i biblioteka CA-TOOLS i FLIPPER 5.02 > Sve zajedno radi u grafici (mada ne znam kakve to veze ima sa obicnom > FOR-NEXT petljom za probno usporavanje rada) Nemam te biblioteke, pa ako ti nije teško, pokušaj da izvedeš isto u čistom Clipper-u. Inače se može lako desiti da su ove spoljne biblioteke umešale prste.
clipper.43 spantic, -> #37, cnenad
> Inače, podešavanja mogu biti zaista proste prirode, tako da i nije > problem rešiti to nekim ASCII editor-om. Ako to neko nije u stanju da > uradi :((( To je veoma čest slučaj. A uostalom i zašto da razmišlja korisnik o tome?
clipper.44 aquarius, -> #41, dvesic
<> - Dodaj sledece stvari u LNK datoteku : <> <> Blinker Exe Dual <> Section Into Dual.Ovl # Ovo je eksterna datoteka sa <> overlejima za sada je neophodna Dual.Ovl vise nije neophodna, Blinker 3.10 Aquarius
clipper.45 bpekic, -> #40, dejanr
°─řÚMasina je sa POTPUNO istim DOS-om, memory-mgr kao i kes programom sa jednakim parametrima. Cak stavise, masina korisnika je po konfiguraciji maltene istovetna sa jednom od mojih masina! ű▀˝ů °─
clipper.46 bpekic, -> #42, dvesic
Ne mogu to da napravim jer je program pisan u grafickom rezimu i ako nesto od grafisckih funkcija izbacim, nije vise ista stvar. Naime, probao sam petlju BEZ ikakvih dodataka, pa nisam primetio razliku u brojacu (eventualno neke SAY-ove stavim da zakomplikujem ali nema razlike) Da li je moguce da neki interni pozivi grafickim ili nekim drugim funkcijama mogu da uspore brojac. Neverovatno mi je da FOR i=1 TO 100 nije skoro jednako kao FOR i=1 TO (10000-9900)!
clipper.47 stosic, -> #27, nbatocanin
> Ima li neko (ili zna gde mogu da nabavim) nesto od softvera za > generisanje sorsova na osnovu EXE/OBJ datoteka? Stvar je dosta hitna. " As sure as the sun rises, the time is going to come when you need Valkyire. Dont wait - get it today. It's an inexpensive insurance policy that will save your life one day. " Valkyrie * full source code recovery for Clipper Summer '87 through 5.x Zac Low Price: $289 :(
clipper.48 stosic,
Welcome to multimedia sound revolution for Clipper! Are you ready for playing the best quality sounds from your Clipper programs ? Now, with the power of Clipper's Object Oriented technology and SoundBlaster's state of the art sounding board you can easily start enjoying multimedia sounds. VOC files are used by Sound Blaster to store high quality sounds, voices, music, etc... You can also use WAV2VOC.EXE, an utility provided in the software of Sound Blaster -SB- to convert Windows WAV files into VOC files, so you should use any of the thousands of files available for Windows. Or you can use a microphone to record your own new sounds, mixing music and voice, recording real world sounds... the limit is just your imagination! Registracijom (35US$) dobija se sors TVocFile klase, kao i CA-Clipper OOPS API. Probajte, ako radi javite :) ovoc.zip
clipper.49 pstevo,
> Ali zašto onda kod tebe radi a kod mene ne? > Hm, možda zato što ja imam > > SIX2.LIB 2.01.00 pre-release, datum: 08-01-94 , vrijeme: 05:30 > ? Narode, u vezi famoznog i opasnog bagera u SIX2 memo poljima (opisao sam ga u 10.1265 i nesto ranije) - provjerio sam sa drugarima i ustanovio da postoji :((( "samo" na gore spomenutoj verziji SIX-a ( pre-release ) a na konačnoj verziji SIX-a je iskorijenjen ! SREĆNA VAM SRPSKA NOVA GODINA
clipper.50 dr.grba, -> #46, bpekic
>> mogu da uspore brojac. Neverovatno mi je da FOR i=1 TO 100 nije >> skoro jednako kao FOR i=1 TO (10000-9900)! Izvini, ali nešto mi je palo na pamet: zašto toliko insistiraš na (10000-9900)? Da ti nije možda negde u kodu napisano for i = 1 to (a - b) gde su a i b promenljive dobijene kako rezultat neke funkcije? Ovo pitam zato što stvarno nema razloga da pišeš onaj kod kao razliku konstanti, a možda si zaboravio da stvarno pomeneš. Ili je možda zbilja u pitanju samo akademska rasprava...
clipper.51 bpekic, -> #50, dr.grba
Ne, uopste nije samo akademska rasprava. Radi se o tome da mi je u varijanti FOR i=1 TO 100 cela stvar bila prebrza. Zeleo sam da usporim i normalno povecao limit FOR petlje. Medjutim pri velikim ciframa bilo mi je i dalje prebrzo. Iz neznam kog razloga palo mi je na pamet da napravim varijantu sa 10000 - 9900 kao limitom. Tada se DRASTICNO usporilo. Za sam program to naravno nije bitno, postoje razni nacini usporavanja i odredjivanja brzine rada petlje, ali je sama cinjenica RAZLIKE po meni veoma intersantna jer nema nekog brzog i ociglednog objasnjenja. Inace, nisam imao a-b varijantu. RAdilo se o cistom FOR slucaju sa granicnikom od 100 na samom startu petlje. SLucajno sam dakle primetio da kao granicnik 100 u slucaju moje petlje NIJE isto kao 10000-9900. Ponovo sam celu stvar probao na razne nacine, ako treba kod da se izvrsi unutar petlje, kakav je kod mene (neka jednostavna grafika), stvar je znatno sporija sa 10000-9900.
clipper.52 nbatocanin,
> Evo dela koda koji me cudi. > Linker je BLINKER 3.0, vezana je i biblioteka CA-TOOLS i > FLIPPER 5.02 Sve zajedno radi u grafici (mada ne znam > kakve to veze ima sa obicnom FOR-NEXT petljom za probno >* usporavanje rada) Prilično je teško ovako odrediti koji je razlog usporenja. Pretpostavljam da je reč o specifičnom rasporedu overleja. Grafička biblioteka koristi aktivni deo overleja za svoje procedure. Pri tom overlej za računanje izraza ispada iz aktivne zone zbog nedostatka prostora, ali se ponovo poziva pri svakom novom ciklusu za računanje 10000-500. Kada se stavi konstanta, onda ne treba pozivati ovaj overlej i petlja radi brže. Ako se izbaci grafička biblioteka, ima više mesta u overlej zoni, pa je "kalkulator" stalno u memoriji => ne pojavljuje se velika razlika.
clipper.53 nbatocanin, -> #31, jkpbvk
> Imam neku demo verziju programa Lasso koji konvertuje > ascii u dbf ali je ogranicen na 100 polja.Jel' postoji > novija verzija koja nije ogranicena ili ista ta razbijena > ili ima neki drugi program koji radi taj posao ? Hm, to mora da radi još nešto, jer je ASCII->DBF mnogo lak zadatak.
clipper.54 nbatocanin, -> #47, stosic
> Valkyrie * full source code recovery for Clipper Summer > '87 through 5.x Zac Low Price: $289 :( Ma, znam ja da to postoji i kako se zove i koliko košta, al' mi treba o'ma i ovde ;)
clipper.55 nbatocanin, -> #37, cnenad
> ŁŁŁ programa. Podešavanje svih parametara radi program, > preko pogodnih ŁŁŁ maski i menija. > > Da li je baš uvek zgodno 'bezuslovno' ugrađivati takav kod > za neka podešavanja koja se vrlo retko rade ? Pa, to mi i nije neki posao: za svako podešavanje dodam još po par linija koda i to je to. > Inače, podešavanja mogu biti zaista proste prirode, tako > da i nije problem rešiti to nekim ASCII editor-om. Ako to > neko nije u stanju da uradi :((( Eeeee, ne znaš ti kakvih sve ljudi ima ;)
clipper.56 jkpbvk, -> #53, nbatocanin
>< Hm, to mora da radi jos nesto, jer je ASCII->DBF mnogo lak zadatak. Neradi nista vise,evo ga uz poruku pa proveri,nego objasni mi malo taj lak zadatak. lasso.arj
clipper.57 majtoski,
imam problem. clipper 5.2 i gforce 2.22 nece lepo da rade, barem meni, nemogu da nikako uspem da redim sa tbrowse objektima(nece ni njihovi primeri) i nemogu da koristim vbrowse. pored toga kada prevodim i linkujem rtlink uvek javlja undefined symbol CLIPPER501 first reference quick5.lib neznam u cemu je problem sumnjam na verziju clipper-a
clipper.58 aseovic, -> #31, jkpbvk
> Imam neku demo verziju programa Lasso koji konvertuje ascii u dbf ali je > ogranicen na 100 polja.Jel' postoji novija verzija koja nije ogranicena ili > ista ta razbijena ili ima neki drugi program koji radi taj posao ? Objasni kakva te konverzija zanima. Ako hoces podatke iz ASCII fajla da upises u neki DBF tako sto ce jedan red iz prvog biti zapis u drugom mislim da nije problem da se napise programce. BTW, da li je pomenuto ogranicenje na 100 POLJA ili na 100 ZAPISA? Pretpostavljam da su u pitanju ipak zapisi a ne polja, u suprotnom ne vidim da postoji neko prakticno ogranicenje (DBF sa 100 polja je TESKO naci. A tek ASCII tekst kojem ce prilikom konverzije trebati 100 polja u DBF-u!!! Pozdrav, A.Seovic
clipper.59 aseovic, -> #35, arazumenic
Taj SEND moze za jos ponesto lepo da posluzi. Svojevremeno sam pravio HELP sistem za aplikacije, nista posebno, u HELP.DBF se cuva HelpKod i HelpText, iz programa se trazi HelpKod i prikazuje HelpText. Iz menija je odredjivanje HelpKod-a bilo jednostavno, ali problem je bio napisati dobar help za GET-ove. Onda sam slucajno naleteo na SEND i jedno ... SEND cargo := <cHelpCode> a zatim u GETSYS-u case ch == K_F1 Help(get:cargo) je resilo problem. Jeste mozda malo duze kad se pise kod, ali je ispao lep Help. (Jedini problem je sto za najveci broj programa nikad nisam stigao da napisem Help do kraja :((() Pozdrav, A.Seovic
clipper.60 bceklic, -> #54, nbatocanin
>> Valkyrie * full source code recovery for Clipper Summer >> '87 through 5.x Zac Low Price: $289 :( > > Ma, znam ja da to postoji i kako se zove i koliko kosta, al' mi > treba o'ma i ovde ;) Koji je konkretan problem u pitanju? Reverzni inzinjering clipper programa (bez odgovarajuceg alata) je veoma nezahvalan posao... POzdrav!
clipper.61 mileusna, -> #57, majtoski
>> kada prevodim i linkujem rtlink uvek javlja undefined symbol CLIPPER501 >> first reference quick5.lib Programi u quick5.lib su prevedeni Cliperom 5.01 pa se zato javlja greška, ali mi se čini da taj nedostatak u radu programa ne izaziva nikakve probleme. Uostalom, ako probaš da istu aplikaciju linkuješ sa Blinkerom, videćeš da on čak i ne prijavljuje ništa slično.M
clipper.62 cnenad, -> #59, aseovic
ŁŁŁ Svojevremeno sam pravio HELP sistem za aplikacije, nista posebno, ŁŁŁ u HELP.DBF se cuva HelpKod i HelpText, iz programa se trazi HelpKod ŁŁŁ i prikazuje HelpText. ŁŁŁ Iz menija je odredjivanje HelpKod-a bilo jednostavno, ali problem ŁŁŁ je bio napisati dobar help za GET-ove. Onda sam slucajno naleteo Negde u starijim konf. možeš pronaći HELP sistem koji je preko MEMOEDIT-a razradio dpaun, a prema Strelly & Co. Ukratko, princip je vezan za 3 parametra koji se prosleđuju proceduri za HELP a to su ime procedure iz koje je help pozvan, ime promenljive kod koje se "čeka" odnosno trenutak kad je pritisnut F1 i broj linije. Dakle prevođenje programa ne može da ide sa prekidačem /l Jedina mana je što za TBROWSE moraš ubaciti CASE Ch==K_F1 ; Help1() itd. zbog petlje u koju upada programa očekujući pritisak na taster na osnovu kojeg će se neka akcija izvršiti.
clipper.63 jolicm, -> #56, jkpbvk
nbatocanin je u pravu, apsolutno. Ako ti treba dbf datoteka, a imaš asci potreban ti je samo neki od interpretera DBASE, FOX, FOXPRO ili kompajler clipper. U dbase, fox .. formiraš *.dbf datoteku sa opisima polja (naziv, tip, duzina) i kucaš append from datot.txt type SDF i gotovo. Ono datot.txt zameniš sa nazivom tvoje asci datoteke. Ja sam imao mnogo posla sa takvim stvarima, morao sam kobolske datoteke da prepravljam na *.dbf zbog clippera. Zdravo. :)
clipper.64 jkpbvk, -> #58, aseovic
>< Objasni kakva te konverzija zanima. Ako hoces podatke iz ASCII fajla da >< upises u neki DBF tako sto ce jedan red iz prvog biti zapis u drugom >< mislim da nije problem da se napise programce. Pa evo , recimo: Petar Peric Beogradska 33 Beograd (011) - 999-999 Mika Mikic Uzicka 33 Novi sad (021) - 999-999 itd... E sad ovaj program koji sam poslao je radio sjajnu stvar,oznacis iznad prvog reda odakle dokle je prvo polje u dbf-u (recimo ime),pa onda isto tako za prezime,ulicu,grad i telefon,naravno pre toga treba napraviti dbf sa takvim poljima i on to perfektno uradi za sekund ali je problem sto ja imam veliki ASCII fajl pa mi on uradi samo prvih 100 zapisa. >< BTW, da li je pomenuto ogranicenje na 100 POLJA ili na 100 ZAPISA? >< Pretpostavljam da su u pitanju ipak zapisi a ne polja, u suprotnom >< ne vidim da postoji neko prakticno ogranicenje (DBF sa 100 polja je >< TESKO naci. A tek ASCII tekst kojem ce prilikom konverzije trebati 100 >< polja u DBF-u!!! Ogranicenje je u zapisima.
clipper.65 stosic, -> #54, nbatocanin
>> Valkyrie * full source code recovery for Clipper Summer >> '87 through 5.x Zac Low Price: $289 :( > > Ma, znam ja da to postoji i kako se zove i koliko kosta, al' mi treba > o'ma i ovde ;) Znam da znas, ali ovu konferenciju prati jos ljudi. Lakse je doci do neceg ako mu se zna ime :) "Don't lose any more sleep over it!" Rescue5 will decompile all your CA-Clipper 5.x EXE, OBJ and LIB files and recover all the original source code. * Automaticaly determines the linker used. * Generates RMK and LNK files allowing the application to br rebuilt. * Supports all major linkers including Blinker 3.0, RTLink, MS_Link and ExoSpace. Only $349 :(( E sad, ako je verovati reklamama. (Uz Rescue5 dobija se i Secure5 koji onemogucuje dekompilaciju.)
clipper.66 nbatocanin, -> #60, bceklic
>> Ma, znam ja da to postoji i kako se zove i koliko kosta, >> al' mi treba o'ma i ovde ;) > > Koji je konkretan problem u pitanju? Reverzni inzinjering > clipper programa (bez odgovarajuceg alata) je veoma > nezahvalan posao... POzdrav! Uh, radi se o banalnoj stvari: greškom sam uništio neke sorsove, pa sad pokušavam da što lakše dođem do njih.
clipper.67 nbatocanin, -> #56, jkpbvk
> Neradi nista vise,evo ga uz poruku pa proveri,nego objasni > mi malo taj lak zadatak. Koristiš APPEND FROM ako su polja fiksne dužine ili razdvojena nekim delimiterom. Ako nisu, koristiš FRead, pa analiziraš format.
clipper.68 nbatocanin, -> #57, majtoski
> javlja undefined symbol CLIPPER501 first reference > quick5.lib neznam u cemu je problem sumnjam na verziju > clipper-a To je. Imaš biblioteku za Clipper 5.01.
clipper.69 bpekic, -> #57, majtoski
Ja jednostavno dako me to iznervira, napravim funkciju sa tim nazivom koji linkeru smeta i od tada vise ne prijavljuje nedostatak te funkcije (simbola) Inace iako to prijavi, nema nikakvih problema, sve radi normalno a to mi se prvi puta pojavilo pre neku godinu. Samo napred, na tu poruku ne obracaj paznju! Pozdrav Boris
clipper.70 mdrazic, -> #62, cnenad
> Ukratko, princip je vezan za 3 parametra koji se prosleđuju proceduri za > HELP a to su ime procedure iz koje je help pozvan, ime promenljive kod > koje se "čeka" odnosno trenutak kad je pritisnut F1 i broj linije. > > Dakle prevođenje programa ne može da ide sa prekidačem /l E, ovo mora da se prokomentariše! Ko iole pametan u svom helpu koristi BROJ LINIJE? Ako ima takvih mučenika, bolje da se ne javljaju. žesto i rutina iz koje je pozvan help nije dobro rešenje, jer to može biti neka druga, a ne ona koja tada stvarno radi (recimo ti si u nekom meniju, gore prozor sa podacima, help daje instrukcije kako da biraš iz menija a ne šta je u prozoru). Za mene je zado- voljavajuće rešenje kombinacija public (ili private) promenljive cHelpVar i cInputVar. Prvu sam definišeš na nivou gde želiš help, tipično na ulazu u proceduru koja barata podacima i važi sve dok ne izađeš iz nje ili startuješ neku drugu funkciju/proceduru sa novim private cHelpVar. Druga varijabla je standardna sa argument liste za help. U tabeli koja čuva help poruke prvo tražiš ključ cHelpVar+cInputVar i ako nađeš prikažeš. Ako ga nema, tražiš samo cHelpVar i prikažeš, a ako nema ni to, ljubazno mu kažeš da nema helpa. Naravno, pošto lenji ljudi prave progres :)) , napraviš na hot-key i editor za help ekrane (sa izborom: za celu masku ili za get polje), ispišeš bitnije help ekrane a ostalo prepustiš korisniku da sam piše jezikom koji on razume (objasniš mu još kako je to bitna prednost tvog help sistema i aplikacije:) a kasnije kad on to ispiše uzmeš, pogledaš i daš drugima za početak :) Ako radiš u timu gde nisu svi angažovani i na programiranju, neko ko piše dokumentaciju je kao naručen i da sastavlja helpove i to često ispadne bolje nego da ih sam pišeš pošto se tome više posveti od tebe. Milan
clipper.71 nbatocanin, -> #62, cnenad
> Ukratko, princip je vezan za 3 parametra koji se > prosleđuju proceduri za HELP a to su ime procedure iz koje > je help pozvan, ime promenljive kod koje se "čeka" odnosno > trenutak kad je pritisnut F1 i broj linije. Princip je prilično zastareo za savremen help sistem. Na primer, meni bi u 99% slučajeva vraćao da se nalazi u proceduri xKey na liniji za skaniranje tastature.
clipper.72 jpptticb,
Potreban je Norton Guide za DGE graficku biblioteku za Clipper! Ako znate gde to ima, ili imate Vi vicite. Pozdrav
clipper.73 bpekic, -> #72, jpptticb
Koja ti verzija .NG fajla za DGE treba? Poslednja koju imam je 4.0 Boris
clipper.75 bceklic, -> #66, nbatocanin
>> Koji je konkretan problem u pitanju? Reverzni inzinjering >> clipper programa (bez odgovarajuceg alata) je veoma >> nezahvalan posao... POzdrav! > > Uh, radi se o banalnoj stvari: greskom sam unistio neke > sorsove, pa sad pokusavam da sto lakse dodem do njih. Sad mi je stvar mnogo jasnija. Tebi moze da pomogne samo neka vrsta Clipper dekompajlera (jer ti je potreban izlaz u vidu clipperovog sorsa). Nikakvi drugi alati koji daju asm sors ti dakle ne mogu pomoci (Kao sto je sourcer). Bila je neka SW verzija clipper dekompajlera (cini mi se hrvatske proizvodnje) koja nije radila bas najbolje. Cini mi se da se podrazumevalo da je program linkovan sa rtlinkom (moguce da je bio samo za summer 87). Meni se ucinilo da zelis da izvuces samo neki deo koda a za tako stvari mogu da posluze i 'brute force' metode... Uopste efikasnost ovih programa je uvek pod znakom pitanja... POzdrav!
clipper.76 bceklic, -> #65, stosic
> E sad, ako je verovati reklamama. > (Uz Rescue5 dobija se i Secure5 koji onemogucuje > dekompilaciju.) Dovoljno je kompresovati exe program (ili ga omotati nekim programom za zastitu) i ove vrste programa su nemocne.... POzdrav!
clipper.77 dzoric,
Jel se nekom desavao VMIF sa Blinker-om 3.10. Dakle ovaj Blinker je cudo. Nit boljeg linkera nit vecih problema. Kombinacija je NTX+FUNCky+BLINKER 3.10 i to na funkcijama RestScreen() i kod stanja cekanja kao nekada SIX. __Dejan__
clipper.78 cnenad,
Malo sam se igrao sa primerom TBDEMO i u njemu se nalazi funkcija koja formira TBROWSE objekat. U njoj se nalazi petlja koja ispituje koliko ima polja u otvorenoj datoteci i na osnovu njih formira kolone za TBROWSE. Pošto želim da utičem na dužinu kolone i njeno ime u zaglavlju, stavio sam sledeće: loKol := tbcolumnnew( 'Ime' ), { || IME }) lKol:width := 40 loB:addcolumn( lKol ) Međutim, kad želim nešto da izmenim (pritisnut bilo koji taster ili ENTER) poziva se DOGET procedura. Šta god nakon toga upisao u polje i kao potvrdu ponovo pritisnuo ENTER ili strelice na dole / gore / PgUp, PgDn, izmena se na ažurira odnosno nova vrednost uopšte nije prihvaćena. Ova pojava se događa samo kad ubacim drugi način za formiranje objekta ; ako vratim originalni, preko petlje, sve se lepo promeni i podatak dođe na svoje mesto pošto je SET TAG TO IME (SixCDX) Kako rešiti problem ?
clipper.79 mickeyl,
Hi everybody! Upravo sam pročitao FAQ o FlagShipu, Clipper kompajleru za Unix/Dos i oduševio sam se ;)). Zanima me da li neko zna je li se FlagShip pojavio negde kod nas? Zna li neko cene i ostalo ili ću morati da šaljem e-mail na Internet? Ukoliko znate neke odgovore molim da mi ih hitno dostavite u mail. Pozdrav, MIckey.
clipper.80 bulaja, -> #78, cnenad
│Šta god nakon toga upisao u polje i kao potvrdu ponovo pritisnuo ENTER │ili strelice na dole / gore / PgUp, PgDn, izmena se na ažurira odnosno │nova vrednost uopšte nije prihvaćena. └─── Verovatno ti nedostaje pozivanje TBrowse metoda refreshAll() ili refreshCurrent() (koristiš ih zavisno od toga šta je promenjeno u bazi) posle učinjene izmene :).
clipper.81 dejanr, -> #76, bceklic
>> Dovoljno je kompresovati exe program (ili ga omotati nekim programom za >> zastitu) i ove vrste programa su nemocne.... ... bar dok ga neko ne "odkomprimuje" ili "odomota". Takvom kompresijom je, naravno, otežan posao napadaču, a mislim da i to dosta znači. Ali nema sigurne zaštite. Zanimljivo je šta ti Clipper "dekompajleri" rade kada naiđu na poziv nekog asemblerskog programa, da li i njega pokušavaju da bar izdvoje u neki poseban fajl radi moguće analize u SOURCER-u?
clipper.82 dr.grba, -> #79, mickeyl
>> pojavio negde kod nas? Zna li neko cene i ostalo ili ću morati da >> šaljem e-mail na Internet? Ukoliko znate neke odgovore molim da mi ih Ako već možeš da pošalješ e-mail na Internet, učini to, sa pitanjem: "Is It True?"...
clipper.83 dpredovic, -> #52, nbatocanin
Subject: Re: for-next > > kakve to veze ima sa obicnom FOR-NEXT petljom za probno > >* usporavanje rada) > Prilično je teško ovako odrediti koji je razlog usporenja. > Pretpostavljam da je reč o specifičnom rasporedu overleja. Grafička Da, probaj da povećaš Overlay Opsize, u link skriptu, ili još bolje kaži set blinker=/OOXXX, gde ti je XXX veličina slobodne gornje memorije, ako je imaš dovoljno. Drugo, probaj da povećaš overlay keš.
clipper.84 cnenad, -> #80, bulaja
ŁŁŁ Verovatno ti nedostaje pozivanje TBrowse metoda refreshAll() ili ŁŁŁ refreshCurrent() (koristiš ih zavisno od toga šta je promenjeno ŁŁŁ u bazi) posle učinjene izmene :). To sve već postoji, jer kao što rekoh, u TBDEMO-u (originalni) jedine izmene su bile u delu gde formira TBROWSE. Ako vratim njegove originalne sve radi ok, sa mojim izmenama ne. :(( I ranije sam imao ovakav slučaj ali sam odustao od daljeg rešavanja problema i napisao posebnu funkciju za izmenu tekućeg sloga. Sad baš hoću da koristim TB jer je za to i napravljen ali ne vredi. Zeza :((
clipper.85 bceklic, -> #81, dejanr
>>> Dovoljno je kompresovati exe program (ili ga omotati nekim >>> programom za zastitu) i ove vrste programa su nemocne.... > > ... bar dok ga neko ne "odkomprimuje" ili "odomota". Takvom > kompresijom je, naravno, otezan posao napadacu, a mislim da i > to dosta znaci. Ali nema sigurne zastite. Kako vecina tih dekompajlera stize iz inostranstva veliko je pitanje kada ce napraviti novu verziju koja ce prepoznati (mozda cak i samo to?) novu vrstu kompresije ili zastite koja je nastala na ovim terenima. Tacno je da 100% sigurne zastite nema. Ali je isto tako tacno da postoje i zastite koje su sasvim dovoljne da zaustave vecinu provalnika. Npr. POsle nekoliko meseci testiranja jos niko nije uspeo da skine zastitu sa programa zasticenih sa pcguard-om. Razlog sto sam program jos uvek nije u prometu je taj sto zasticeni programi ne rade na 486dx masinama a kako ja ne posedujem istu masinu ne mogu da ustanovim razlog.... > Zanimljivo je sta ti Clipper "dekompajleri" rade kada naidu na > poziv nekog asemblerskog programa, da li i njega pokusavaju da > bar izdvoje u neki poseban fajl radi moguce analize u > SOURCER-u? U najboljem slucaju bi mogli dati izdvojeni asm source u zasebnom fajlu koji je kasnije moguce ulinkovati. Dakle taj dekompajler bi bio neka vrsta kombinacije Sourcer-a i Clipper dekompajlera. Citav proces nije ni malo jednostavan i pretpostavljam da bi takav program bio dosta skup. O tome kako ovaj problem resava Clipper dekompajler koji je bio spomenut u raspravi moze nam odgovoriti samo onaj ko taj program poseduje. POzdrav!
clipper.86 nbatocanin, -> #79, mickeyl
> je li se FlagShip pojavio negde kod nas? Zna li neko cene > i ostalo ili ću morati da šaljem e-mail na Internet? Flagship SCO Evaluation košta oko 200 funti.
clipper.87 majtoski,
Da li zna neko gde moze da se nabavi Silver Clip biblioteka bilo na divlje bilo legalno
clipper.88 mbiresev, -> #78, cnenad
>> Pošto želim da utičem na dužinu kolone i njeno ime u zaglavlju, stavio sam >> sledeće: >> loKol := tbcolumnnew( 'Ime' ), š đđ IME ć) >> lKol:width := 40 >> loB:addcolumn( lKol ) Umesto: š đđ IME ć stavi: FieldBlock(FieldName(n)) gde je n redni broj polja u datoteci, npr. lKol := tbcolumnnew( 'Ime' , FieldBlock(FieldName(1))) lKol:width := 40 oB:addcolumn( lKol ) Ovde postoji jedno ograničenje. Polja koja koristiš moraju respektivno odgovarati onima u datoteci. Biće ti jasno kad probaš.
clipper.89 jpiri,
Pitanje: Hard disk ima DOS i UNIX particiju: Na DOS particiji radi Clipper program, a na UNIX Fox. Ima li šanse (pomoću trikova) iz Clipper programa pročitati neku bazu sa UNIX particije? Ako ne, da li postoji ekvivalent doscp naredbe SCO UNIX-a (koja kopira fajl sa DOS particije na UNIX particiju) samo da radi obratno (tj. dok sam pod DOS-om da kopira fajl sa UNIX particije?)
clipper.90 peacock,
Kako štampati izveštaj iz Clippera u landscape modu?
clipper.91 djelovic, -> #90, peacock
> Kako štampati izveštaj iz Clippera u landscape modu? Bilo je reči o tome u ovoj temi pre jedno mesec dana. Ukratko, postoje programi koji rade taj posao - biće najbolje da pogledaš u R:\PRINTER direktorijumu.
clipper.92 bulaja, -> #90, peacock
│ Kako štampati izveštaj iz Clippera u landscape modu? └─── Ako se radi o matričnim štampačima, onda je o tome već bilo priče. Odgovor je - teško :), ali ima utility programa koji standardnu text datoteku pišu u landscape formatu na matričnim printerima. Ukoliko je u pitanju laser, onda mu jednostavno pošalješ sekvencu za prebacivanje u landscape mod (ESC &l1O) i samo vodiš računa da imaš manje redova (48 kod standarnih uslova - A4 papir i 6 LPI).
clipper.93 ppekovic, -> #89, jpiri
>> Ima li šanse (pomoću trikova) iz Clipper programa pročitati >> neku bazu sa UNIX particije? Ne, nema načina da dok si u DOS-u čitaš Unix particiju. Međutim, možeš da pokreneš DOS emulaciju, pod njom pokreneš Clipper program, pa ćeš onda videti Unix fajle. Paya
clipper.94 peacock,
Šta znači TERM/0 error?
clipper.95 nicetin,
Cao ! Posto sam skoro poceo da radim u clipper-u,a naravno ne znam bas sve komande...zamolio bih vas da mi posaljete neki primer screen save-ra koji radi sa HOT-KEY. P.S naravno ako vam ne predstavlja neki problem. Pozdrav od Mladena.
clipper.96 jolicm, -> #95, nicetin
>>> hot-kry - screen saver Na samom početku programa staviš: Include "inkey.ch" pa u programu: SetKey(K_F10) to CuvajEkran() na kraju programa staviš Function CuvajEkran() Local Ekran:=SaveScreen() cls * ovde tvoje ispisivanje na ekranu po potrebi šta hoćeš While Inkey()#0 End RestScreen(Ekran) Return .t. To ti je to. Proveri ono SaveScreen i RestScreen, nisam baš siguran jer već 4-5 godina koristim moje funkcije, pa za original sintaksu nisam siguran. :)
clipper.97 dpredovic,
Subject: CA-VO Malo gledam VO, pa mi sve nekako izmiče - kako dođavola povezati escape taster sa cancel ili close PushButtonom?
clipper.98 bulaja, -> #96, jolicm
││ hot-key - screen saver │└─── │Na samom početku programa staviš: │ Include "inkey.ch" │pa u programu: │ SetKey(K_F10) to CuvajEkran() └─── Uh, pa ja ovo ne bi zvao Screen Saver-om :). žuvar ekrana je po definiciji nešto što se aktivira posle odredjenog perioda neaktivnosti (nekucanja po tastaturi) a ne isključivo hot key-om. Za ubacivanje screen savera u Clipper programe potrebno je napraviti custom inkey handler (postoji i rešenje preko preusmeravanja timer interapta, ali ovo je čistije:) i ubaciti ga svuda umesto standardnog Inkey() - znači u GetSys, TBrowse petlju, menije (potreban je meni sistem koji omogućava promenu standarndog inkey handlera, npr. BuMenu:). U ovakav novi Inkey handler (bilo je već ranije reči o tome u konferenciji) možete strpati razne lepe stvari - screen saver, prikaz sata, HotKey funkcije, rad sa mišem (naravno uz dodatne parametre koje prosleđuješ Inkey funkciji),... U poruci sledi primer jednostavnog CA-Clipper Inkey handlera koji ima ugrađen screen saver, prikaz sata i ostavljen prostor za dodavanje opcija po želji. Napisao sam ga sad na brzinu (ali i pored brzine je sve po propisu - imate komentare, lepo formatiran kod i slično, tako da ne bi trebalo da bude problema sa razumevanjem:), a handler koji koristim u svojim programima ima dodate još neke zezalice (npr. mouse support:). Ako je potrebno detaljnije objašnjenje kako se ovaj inkey handler ubacuje u podsisteme CA-Clipper-a (npr. u GetSys.prg se samo zameni jedan poziv Inkey() i GetReader()-u, mada ja više volim da stavim to u static code block i omogućim eksterno konfigurisanje) kažite, pa ću objasniti. Inače danas se izležavam i ništa ne radim (što mogu i vama od srca preporučiti, mnogo je dobro:) pa imam malo vremena da ovo napišem. :) /**** ­=- Početak primera -=­ ****/ /* * File......: BuInkey.prg * Author....: Jovan Bulajić * Date......: 29.01.95 * * This is an original work by Jovan Bulajić * and is placed in the public domain. */ STATIC nClockY, nClockX, lClockDisp, cClockTime // Koordinate na kojima se prikazuje sat, kao i informacije da li // uopšte treba prikazivati sat (stavljeno u static zbog mogućnosti // konfiguracije) i koje vreme je poslednje prikazano (pogledati // source u nastavki zbog daljeg objašnjenja za cClockTime) STATIC nSaverTimeout := 300 // Vreme neaktivnosti posle koga se aktivira screen saver (u sekundama, // 300 sec = 5 min). Stavljeno u module-wide static da bi se se moglo // menjati konfiguracionom funkcijom bu_SetScrSaver() STATIC bScrSaver := {|| bu_ScrSaver()} // Code block u koji se stavlja poziv za screen saver. // Možemo staviti i ceo jednostavan saver u code block, npr. // bScrSaver := ; // { ; // | cSaveScr, ; // fiktivni argumenti, pošto nam // nKey | ; // trebaju lokalne cb promenljve :) // ; // cSaveScr := SaveScreen (0, 0, MaxRow(), MaxCol()) , ; // Cls() , ; // nKey := Inkey(0) , ; // RestScreen (0, 0, MaxRow(), MaxCol(), cSaveScr) , ; // nKey ; // cb vraća pritisnuti taster // } // ali pošto bi ovo bilo suviše perverzno O:) u primeru sam stavio // konzervativno :) rešenje gde code block samo poziva našu funkciju **** ---------------------------------------- **** FUNC bu_Inkey (nWait) // Ovo je glavna funkcija Inkey handler-a. // nWait je tu zbog kompatibilnosti sa standardnim Inkey() pozivom // (ja lično ga nikada ne koristim :). Dodati druge argumente po // potrebi i zavisno od toga kako ste prepravili pozive standardne // Inkey() funkcije LOCAL nKey, nTimer LOCAL nElapsed IF nWait == NIL // ukoliko iz nekih izopačenih :) razloga zovete ovu funkciju // samo da očita tastaturu umesto Inkey(), zbog potreba // kompatibilnosti to vam ovde i vraćamo. RETURN Inkey() // Ja inače ni ovo ne koristim :) već bu_Inkey() (bez // argumenata) tretiram kao Inkey(0) ondosno umesto // ovog IF-a imam jedno // nWait := IF (nWait == NIL, 0, nWait) ENDIF // podešavamo vrednost statičkim promenljivim, // za slučaj da se prvi put startuje inkey handler nClockY := IF (nClockY == NIL, 0, nClockY) nClockX := IF (nClockY == NIL, MaxCol()-8, nClockX) lClockDisp := IF (lClockDisp == NIL, .T., lClockDisp) cClockTime := IF (lClockTime == NIL, Time(), lClockTime) // pamtimo vreme kad je funkcija startovana, za potrebe // vremena čekanja na pritisak tastera i screen saver-a nTimer := Seconds() DO WHILE .T. nKey := Inkey() IF lClockDisp // Ako je konfigurisano da se prikazuje sat, onda ga ovde // prikazujemo. Obratite pažnju da osvežavamo prikaz sata // samo ukoliko je vreme promenjeno u odnosu na poslednji // ispis sata na ekran - zato nam je i potrebno cClockTime. // Statička promenljiva (koja je mogla biti ubačena unutar // ove funkcije a ne u okviru modula, ali sam je stavio na // početak sa ostalim:) je tu zbog slučajeva kada se inkey // handler aktivira i vraća taster više puta u sekundi - // npr. ovo je čest slučaj kad legnete na kurzorske tastere // u TBrowse-u ili menijima. Tada je, koliko god ne bilo // kritično nekoliko trenutaka vremena da se ispiše sat, // bolje da se on osvežava samo ukoliko je vreme zaista // promenjeno u odnosu na prethodni poziv. IF cClockTime != Time() FT_VidStr (nClockY, nClockX, Time()) cClockTime := Time() // Ah, ovde je poziv funkcije FT_VidStr(). Ona je deo // NanForum Toolkit-a i služi da munjevito (daleko brže // od QOut()) ispišete neki string na deo ekrana bez // promene atributa (boje) koji su ranije tamo bili. // Ukoliko želite rešenje u čistom Clipper-u, onda ovde // možete staviti jedno // @ nClockY, nClockX SAY Time() COLOR cClockColor // pri čemo morate konfigurisati i cClockColor i čuvati // i posle ispisa vratiti status Row() i Col(). Takođe // se može napraviti i neka budževina sa SaveScreen() // i RestScreen() koja radi isti posao kao i FT_VidStr() // ali je to glupo :). Može se napisati i cela funkcija // u asembleru, možda to i uradim ovih dana :). ENDIF ENDIF nElapsed := Seconds() - nTimer IF nElapsed < 0 nElapsed += 24*3600 // ponoćni problem :) - dodajemo jedan // dan, odnosno 24 časa * 3600 sec/h ENDIF DO CASE CASE nKey != 0 // pritisnut je neki taster, so naš // inkey handler završava svoj posao // obrade stanja čekanja EXIT CASE nElapsed >= nWait .AND. nWait != 0 // isteklo je vreme za čekanje na taster // takođe završavamo posao EXIT CASE nElapsed >= nSaverTimeout // Naš dragi korisnik je uzeo cofee break, // so vreme je za screen saver nKey := Eval (bScrSaver) ENDCASE // Ovde dodajete ostale stvari koje vam padaju na pamet - // npr. obradu HotKey-ova nezavisnih od Clipper-ovog SetKey(), // dodatni kod za podršku miša (uz dodatno prenete argumente), // trčeće reklame preko ekrana, provera događaja na mreži, // interni multitasking (npr. printer manager),... :) ENDDO RETURN (nKey) **** ---------------------------------------- **** FUNC bu_SetScrSaver (nSetTime, bSetSaver) // promena parametara screen savera nSaverTimeout := IF (ValType(nSetTime) == "N", nSetTime, nSaverTimeout) bScrSaver := IF (ValType(bSetSaver) == "B", bSetSaver, bScrSaver) RETURN **** ---------------------------------------- **** PROC bu_SetClock (lSetClock, nSetY, nSetX) // promena parametara sata na ekranu lClockDisp := IF (ValType(lSetClock) == "L", lSetClock, lClockDisp) nClockY := IF (ValType(nSetY) == "N", nSetY, nClockY) nClockX := IF (ValType(nSetX) == "N", nSetX, nClockX) RETURN **** ---------------------------------------- **** FUNC bu_ScrSaver () // Default screen saver funkcija. S obzirom na prirodu primera // (pokazivanje kako uopšte ugraditi čuvar ekrana i napraviti // inkey handler) ne radi ništa spektakularno (kao što su npr. // leteći tosteri, nevaljali psi, rupa na ekranu i slične // besmislice:) već samo zamračuje ekran LOCAL nKey, cSaveScr, nSaveY, nSaveX, nSaveCurs cSaveScr := SaveScreen (0, 0, MaxRow(), MaxCol()) nSaveY := Row() nSaveX := Col() nSaveCurs:= SetCursor(0) Cls() // kakav sejver :) nKey := Inkey(0) // e da :) - kad budete pravili pristojan sejver, umesto // ovog Inkey(0) bi trebala da stoji glavna petlja slične // strukture kao i glavna petlja u bu_Inkey() s tim što // bi bilo lepo kontrolisati i da li je promenljen status // prisiska na sive tastere (Shift, Ctrl, Alt, * Lock,..) RestScreen (0, 0, MaxRow(), MaxCol(), cSaveScr) SetPos (nSaveY, nSaveX) SetCursor (nSaveCurs) RETURN (nKey) /**** ­=- Kraj primera -=­ ****/ That's it. To što ima bar deset linija komentara na jednu liniju koda je zbog edukativne namene celog ovog primera (koji se može odmah i praktično primeniti bez izmena:). Nadam se da sam nekom pomogao :). (Bu)
clipper.99 bulaja,
**** new file **** MSDOS - R:\CLIPPER ---------------------- nflib301 zip 150123 NanForum Toolkit v3.01: Clipper biblioteka (lib/ng) 1 file(s) 147 kb Konačno :). U dokumentaciji (.NG) se slabo spominje šta je sve izmenjeno u odnosu na verziju 2.1. Onako na prvi pogled to su kompletna Protected Mode kompatibilnost (bez dodatnih zakrpa), novi PM interface za Clipper (CPMI), nešto dodatnih funkcija (nisam još pregledao sve). Od problema sa kompatibilnošću, primetio sam (odnosno dojavio mi je linker:) jedino da nedostaje funkcija FT_HandCount() (dakle ništa strašno).
clipper.100 dr.grba, -> #99, bulaja
>> nflib301 zip 150123 ... >> >> Konačno :). U dokumentaciji (.NG) se slabo spominje šta je sve izmenjeno >> u odnosu na verziju 2.1. Onako na prvi pogled to su kompletna Protected Hoće li stići i source kod?
clipper.101 bulaja, -> #97, dpredovic
│Malo gledam VO, pa mi sve nekako izmiče - kako dođavola povezati │escape taster sa cancel ili close PushButtonom? └─── Trebalo bi preko akceleratora (hot-key-ova) :). Međutim problem je što izgleda da jedino u DataWindow možeš definisati akceleratore van menija, a pretpostavljam da ti ovo treba za DialogWindow :). Koliko sam video u DialogWindow klasi, postoji Override() metod koji ti omogućava (bar sam tako shvatio, nisam probao:) da se poziva tvoj metod (definisan u okviru dialog prozora) Dispatch() koji radi obradu događaja. Nisam našao primer kako taj <oDialogWindow>:Dispatch() treba da izgleda, ali trebalo bi da je negde opisano (možda u onom SouthSeas:).
clipper.102 bulaja, -> #100, dr.grba
│Hoće li stići i source kod? └─── Nadam se :).