PCPROG.5

05 Jan 1995 - 02 Oct 1995

Topics

algoritmi (106)
comment (2)
ms.dos (27)
windows (332)
asembler (203)
basic (228)
jezici (126)
pascal (1085)
cccc (546)
cpp (117)
clipper (1048)
baze.podataka (194)
fox (231)
cavo (192)
razno (593)

Messages - pascal

pascal.1021 postmast, 16 Sep 95

From: Vladimir.Cheperkowitch@f127.n103.z38.setnet.setnet.co.yu (Vladimir Cheperkowitch) Subject: Zapisi I Tako Dalje Date: Sun, 10 Sep 1995 00:57:07 AB>Dalje, ima li neko opis PCX, GIF, MOD, FLI zapisa? Potrebni su mi. PCX, GIF, FLI. Imam ja. Kazi mi samo kako da ti ih dostavim (ja neznam). Ako te interesuje, imam i druge formate slika ( JPEG, IFF (LBM), TIFF ...) Cheppy. ■ SLMR 2.1a ■ --T-A+G-L-I+N-E--+M-E-A+S-U-R+I-N-G+--G-A+U-G-E-- --- FMail/386 0.98 * Origin: SETNet ComTech BBS +381-11-474-373, Beograd (38:103/127)

pascal.1022 postmast, 16 Sep 95

From: Ognen.Spiroski@f132.n108.z38.setnet.setnet.co.yu (Ognen Spiroski) Subject: Re: PASCAL Date: Sun, 03 Sep 1995 14:12:00 NE> A moze i ako imate WIN NE> Udjes u neki od onih programa sto dolaze uz NE> SB 16 PRO (ORIGINAL) i u jednom od njih NE> PUSTIS MOD(ili MIDI koji si prethodno Mod>2>Midi) NE> A u drugom pustis RECORDING :) PRĆ Nece moci... SB snima sa ulaza, a ne sa izlaza. Jedino da spojis ulaz PRĆ sa izlazom, a tada znas sta se dobija ;) Sta se dobija ? :) NE> Nista od ovoga nije isprobano :)) PRĆ A uz to i ne radi ;) ;) cu 0GZy * 0Gi'S eDiT0R * Horseman: "I've fallen and can't giddyup" * Origin: SETNet: ĆMemory Master BBS +389/91-164-877ž SKOPJE (38:108/132)

pascal.1023 postmast, 16 Sep 95

From: Ognen.Spiroski@f132.n108.z38.setnet.setnet.co.yu (Ognen Spiroski) Subject: Pascal Programing Date: Tue, 05 Sep 1995 01:47:00 Zdravo, Radim neki program u Pascalu i treba mi da startujem DOS komandu TYPE i da izlez datoteke redirektiram drugom fajlu ( type bla > bla1 ) E sada, ako example od GETEnv koji bi trebalo da startuje ove stvari stavim u poseban program onda sve je OK i na redba se izvrsuje. Ali u zavisnost od sledece stvari, slucuje se: Ako kao prvu linija stavim onu iz example-a t.e. {$M 8192,0,0} (tako mislim bese) onda mi jedna od rutine programa trazi vise memorije. (u moj program ne u program sa example-om) A ako ne stavim nista za memoriju (znaci, sve je by default) onda posle izvrsavanje TYPE komande DOSERROR ima vrednost 8 ili nema dovoljno memorije. (ovo je opet u mojem programu) Ovo je veoma cudno meni, pa molim da mi neko objasni i da resenje. 0GZy * 0Gi'S eDiT0R * I saw the light! It hurt my eyes * Origin: SETNet: ĆMemory Master BBS +389/91-164-877ž SKOPJE (38:108/132)

pascal.1024 postmast, 16 Sep 95

From: Ognen.Spiroski@f132.n108.z38.setnet.setnet.co.yu (Ognen Spiroski) Subject: pascal Date: Wed, 06 Sep 1995 10:26:00 "MĆ From: "Miroslav Minovic" <mminovic@sezam.UUCP> Newsgroups: "MĆ yu.prog.pascal Organization: SEZAM Beograd, 011 648-422 "MĆ gledajte: "MĆ Type "MĆ str11 = array [1..250] of string[11]; "MĆ fir = record "MĆ ime : String[50]; "MĆ datumi : str11; "MĆ brdat : ShortInt; "MĆ end; "MĆ firm = array [1..20] of fir; "MĆ ..................................... "MĆ neki kod............... "MĆ ..................................... "MĆ INC(firma[i].brdat);firma[i].datumi(firma[i].brdat):=cdatum;end; "MĆ ^error 91 : ":=" expected. [ ] Obicne zagrade smeni sa ovima, mislim da bi to trebalo da ti resi problem. 0gzY * 0Gi'S eDiT0R * Reincarnation is making a comeback! * Origin: SETNet: ĆMemory Master BBS +389/91-164-877ž SKOPJE (38:108/132)

pascal.1025 postmast, 16 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: pascal Date: Wed, 06 Sep 1995 00:28:00 "J> From: "Dorde Janjusevic" <djanjusevic@sezam.UUCP> > Newsgroups: yu.prog.pascal > Organization: SEZAM Beograd, 011 648-422 "J> Moze li mi neko nabrzaka pokazati neki jednostavniji nacin zastite programa od > startovanja na drugim racunarima(znaci,hocu da moze da se startuje samo na > jednom). Mozzess da ccitass neke podatke iz particione tabele. Problem je samo da ako preformatirass disk, onda gubiss ovu tzv. zasstitu. Chombe ___ ■ SPEED 1.30 [NR] ■ Speed Read or die! * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1026 postmast, 16 Sep 95

From: broker@setnet.co.yu (Predrag Supurovic) Subject: Pascal Programing Date: Sat, 09 Sep 1995 16:42:15 ==== Ognen Spiroski rece: ====================================== OS> Radim neki program u Pascalu i treba mi da startujem DOS komandu TYPE OS> i da izlez datoteke redirektiram drugom fajlu ( type bla > bla1 ) E OS> sada, ako example od GETEnv koji bi trebalo da startuje ove stvari A sto jednostavno ne napravis proceduru koja ce da prekopira sadrzaj datoteke bla u datoteku bla1 i tako izbegnes izlazak u DOS? ... BR> There is no more industrial pollution! UN thank you! -+- OLMS 2.5 UNREG * Origin: Oreska BBS, Uzice = SF BIBLIOTEKA = SETNet: (38:101/101)

pascal.1027 postmast, 16 Sep 95

From: shadow@setnet.co.yu (Ivan Jocic) Subject: pascal Date: Sat, 09 Sep 1995 11:32:24 VMZ> Evo, cim malo sredim code. Btw, to je Paskal code sa procedurama u VMZ> ASM-u. Pa sta fali, samo ga ti baci ovdi. Shadow ... Trazeci sebe sretoh nju. Sad sam sa njom al' jos nisam nasao sebe... * Origin: * SETNet * Sirius BBS * 018/711-667 * Nis * (38:101/101.5)

pascal.1028 postmast, 16 Sep 95

From: shadow@setnet.co.yu (Ivan Jocic) Subject: zapisi i tako dalje Date: Sat, 09 Sep 1995 11:32:24 VMZ> Sors stize u sledecoj poruci, a sto se tice ostalih stvari, to su VMZ> uglavnom arhive sa raznih BBS-ova. Ima nesto za 3D-grafiku, 32-bitno VMZ> programiranje, TSR, ... Ti reci sta te zanima pa cu ja da potrazim. Pa interesuje me grafika, low level programiranje, sistemsko programiranje... Sve ono sto je interesantno. Shadow ... If it works, you must have done something wrong. * Origin: * SETNet * Sirius BBS * 018/711-667 * Nis * (38:101/101.5)

pascal.1029 postmast, 16 Sep 95

From: Vladimir.M.Zivkovic@f119.n111.z38.setnet.setnet.co.yu (Vladimir M Zivkovic) Subject: Re: wait for key Date: Sun, 10 Sep 1995 13:32:01 PS> Hmm. Meni se ovo bas i ne svidja. PS> Sta mislis o: PS> repeat until keypressed Ako stavis gomilu 'repeat until keypressed' jedan iza drugog, i pritisnes neki taster probices sve provere odjednom, jer se ne prazni bafer tastature. Zato je potreban 'readkey'. __ Pozdrav from Vladimir __ ... "Koliko je trajao 100-godisnji rat?" * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1030 postmast, 16 Sep 95

From: broker@setnet.co.yu (Predrag Supurovic) Subject: wait for key Date: Sun, 10 Sep 1995 19:40:12 ==== Vladimir M Zivkovic rece: ====================================== PS> Hmm. Meni se ovo bas i ne svidja. PS> Sta mislis o: PS> repeat until keypressed VMZ> Ako stavis gomilu 'repeat until keypressed' jedan iza drugog, i VMZ> pritisnes neki taster probices sve provere odjednom, jer se ne prazni VMZ> bafer tastature. Zato je potreban 'readkey'. To stoji. Zbog toga uvek koristim jedno key := readkey() iza repeat until... ... BR> U zeni je svo dobro i zlo ovoga sveta. -+- OLMS 2.5 UNREG * Origin: Oreska BBS, Uzice = SF BIBLIOTEKA = SETNet: (38:101/101)

pascal.1031 postmast, 16 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: pascal Date: Sat, 09 Sep 1995 19:12:00 "GA> Izvinjavam se na neodgovaranju zainteresovanima za grupu Delphi :) > Grupa je puna, nema vise mesta. Ne prica se nista misteriozno sto nije za > javnost, jednostavno se (bar za sada) malo produktivnije radi. Ako bas bude > interesovanja (i sloze se ostali iz grupe), mogu da zipujem poruke i da ih > prebacim ovde. OK? Bilo bi veoma lepo kad bi UUENCODE-ovao te poruke. 10x Chombe ___ ■ SPEED 2.00 [NR] ■ Na hipodrom ima horse & grass & shit & speed! * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1032 postmast, 16 Sep 95

From: shadow@setnet.co.yu (Ivan Jocic) Subject: Zapisi I Tako Dalje Date: Sun, 10 Sep 1995 08:54:07 VC> PCX, GIF, FLI. Imam ja. Kazi mi samo kako da ti ih dostavim (ja VC> neznam). Ako te interesuje, imam i druge formate slika ( JPEG, IFF VC> (LBM), TIFF ...) Pa sto ne kazes?! Ako ne moze ovde da se okaci, reci kako da dodjem do tih stvari. Shadow ... Kladim se da ce i sutra izaci sunce, a kakve sam srece bice pomracenje * Origin: * SETNet * Sirius BBS * 018/711-667 * Nis * (38:101/101.5)

pascal.1033 postmast, 16 Sep 95

From: Vladimir.M.Zivkovic@f119.n111.z38.setnet.setnet.co.yu (Vladimir M Zivkovic) Subject: Re: pascal Date: Thu, 14 Sep 1995 17:14:03 On 11 Sep 95 12:57pm, "Vladislav Erdelji" wrote to All: "E> From: "Vladislav Erdelji" <evlad@sezam.UUCP> "E> Newsgroups: yu.prog.pascal "E> Organization: SEZAM Beograd, 011 648-422 <>> SVGA256.bgi imam ali drajver je vrlo lose uradjen. Mislio sam na <>> original ne drajvere od Borlanda. <>> Inace da li je neko uspeo da startuje misa u svga rezolucijama. "E> Ako su drajveri V5.5 tada uz njih ide i mis, jedino na VLB CL5428 ima "E> malo problema oko hardvreskog i softverskog kursora, ali moze da radi. Gde se mogu naci V5.5 ? __ Pozdrav from Vladimir __ ... CAUTION! Silver Xpress roaring through here! * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1034 postmast, 16 Sep 95

From: Dragan.Levic@f119.n111.z38.setnet.setnet.co.yu (Dragan Levic) Subject: Re: pascal Date: Sat, 09 Sep 1995 20:24:02 -=> Quoting "Nikola Radenkovic" to All <=- "R> Tek sam poceo sam Paskalom (o idile) pa me zanima da li "R> neko poseduje (ili moze da me uputi) na spisak onih varijabli "R> (?) (boolean,...) itd. nema sanse da provalim sva znacenja ;( To nisu varijable vec su tipovi. Boolean - proverava da li promenljiva ima vrednost TRUE ili FALSE i u zavisnosti od toga dalje radi. Opreracije poredjenja su: <> - razlicito < - manje > - vece <= - manje ili jednako => - vece ili jednako not - negacija and - konjukcija or - disjunkcija NOT je vaznije od AND, a AND vaznije od OR! VAZI: false<true Operacije poredjenja imaju nizi prioritet od matematickih operacija Char - Znakovni tip. Vrednost znakovne promenljive ili konstante je znak iz osnovnog skupa znakova, pri cemu se znakovna konstanta mora navesti izmedju apostrofa Real - realni brojevi (ogranicena vrednost) Byte - celi brojevi od 0 do 255 (broj bajtova 1) ShortInt - celi brojevi od -128 do 127 (broj bajtova 1) Integer - celi brojevi od -32786 do 32767 (broj bajtova 2) word - celi brojevi od 0 do 65535 (broj bajtova 2) LongInt - celi brojevi od -2 147 483 648 do 2 147 483 647 (broj bajtova 4) To bi otprilike bili osnovni tipovi. Inace ti i sam mozes da napravis bilo kakav tip komandom TYPE. ============================================================================== Npr. PROGRAM ... TYPE samoglasnik=(A,E,I,O,U) dani=(ponedeljak,utorak,sreda,cetvrtak,petak,subota,nedelja) VAR slovo:samoglasnik; dan:dani; ------------------------------------------------------------------------------ Isto ovo mozes i drugacije napraviti: PROGRAM ... VAR slovo:(A,E,I,O,U); dan:(ponedeljak,utorak,sreda,cetvrtak,petak,subota,nedelja); ============================================================================== ... Ever stop to think and forget to start again? * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1035 postmast, 16 Sep 95

From: Vladimir.M.Zivkovic@f119.n111.z38.setnet.setnet.co.yu (Vladimir M Zivkovic) Subject: Re: pascal Date: Tue, 12 Sep 1995 16:16:02 >> Potrebno je da 'zajasis' interapt 8. Keep sasvim solidno >> obavlja svoj posao, mozda nisi dobro definisao stack i heap. >> Ako hoces code za pustanje semplova na COVOX-u, reci pa da ti >> saljem. "M> Ajd posalji meni,zanima me posto sam skoro napravio COVOX,pa..:) "M> da se malo igram :)) Evo, vec je poslat ovde :) __ Pozdrav from Vladimir __ ... "Sto se tice izolatora, oni nisu provodnici." * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1036 postmast, 16 Sep 95

From: rile@setnet.co.yu (Petar Ristic) Subject: Re: PASCAL Date: Tue, 12 Sep 1995 16:46:01 >> Ognen Spiroski nekad rece, a ja ga sada citiram << OS> PRĆ Nece moci... SB snima sa ulaza, a ne sa izlaza. Jedino da spojis OS> ulaz PRĆ sa izlazom, a tada znas sta se dobija ;) OS> Sta se dobija ? :) Sta? jel to onako ;) Rile:) ... Ognen, Do you love TECHNO? * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1037 postmast, 16 Sep 95

From: Ognen.Spiroski@f132.n108.z38.setnet.setnet.co.yu (Ognen Spiroski) Subject: Pascal Programing Date: Mon, 11 Sep 1995 09:15:00 Ć 135/135 Ć ==== Ognen Spiroski rece: Ć ====================================== Ć OS> Radim neki program u Pascalu i treba mi da startujem DOS komandu TYPE Ć OS> i da izlez datoteke redirektiram drugom fajlu ( type bla > bla1 ) E Ć OS> sada, ako example od GETEnv koji bi trebalo da startuje ove stvari Ć A sto jednostavno ne napravis proceduru koja ce da prekopira Ć sadrzaj Ć datoteke bla u datoteku bla1 i tako izbegnes izlazak u DOS? Zaboravio sam da napomenem da treba da koristim piping za da sortiram izlez u drugu datoteku :) 0GZy ... Read messages, not taglines. * Origin: SETNet: ĆMemory Master BBS +389/91-164-877ž SKOPJE (38:108/132)

pascal.1038 pedjak, 16 Sep 95 -> #1011, dares

> Kako procitati datoteku (radi kopiranja) koja je Read Only ? > reset(uldat,1); > i ovde javlja Runtime error 5 (sto znaci pokusaj Turbo Pascal netipizirane datoteke otvara sa atributom koji se nalazi u promenljivoj FileMode. S obzirom da je vrednost promenljive FileMode po difoltu 2 (čitanje/pisanje), potrebno je da pre otvaranje datoteke promeniš njenu vrednost na 0 (čitanje). Ovako: FileMode:=0; Reset(uldat,1); Ne zaboravi da vrednost promenljive FileMode posle vratiš na difolt vrednost, zbog otvaranje nekih drugih datoteka, koje želiš da menjaš. pedja

pascal.1039 evlad, 17 Sep 95 -> #1033, postmast

TO: Vladimir.M.Zivkovic@f119.n111.z38.setnet.setnet.co.yu (Vladimir M. Zivkovic) <> Gde se mogu naci V5.5 ? Na SEZAM PRO-ba ...

pascal.1040 superhik, 17 Sep 95 -> #1007, paki

=:> Funkcija se zove Length :) =:)))))))))))) Txanks man! (E pola sata sam se smejao :)))) ) a ja vidim nešto smrdi... O:))))

pascal.1041 mminovic, 17 Sep 95

Moze neki hint na neko programce koje je rezidentno,i sakuplja u fajl sve sto se unese preko tastature? Negde sam to video,ali ne mogu da se setim gde pa ako neko zna... Pozdrav, Mindza.

pascal.1042 kriss, 17 Sep 95

Opet jedno pitanje: Da li neko sasvim slučajno (nostalgije radi ;) čuva prastari TP 3.01? Ako da, neka mi se javi na mail, imam par želja. :)

pascal.1043 superhik, 17 Sep 95 -> #1034, postmast

=:> From: Dragan.Levic@f119.n111.z38.setnet.setnet.co.yu (Dragan =:> Levic) =:> To bi otprilike bili osnovni tipovi. Txanks!

pascal.1044 postmast, 18 Sep 95

From: Knezovic.Bojan@f133.n103.z38.setnet.setnet.co.yu (Knezovic Bojan) Subject: pascal Date: Mon, 11 Sep 1995 02:05:02 KA> Mozzess da ccitass neke podatke iz particione tabele. KA> Problem je samo da ako preformatirass disk, onda gubiss KA> ovu tzv. zasstitu. Ali ako preformatiras disk, moraces opet da instaliras program nanovo. Eto prilike da se pokupe novi podaci. Ako mozes ostavi neku proceduru za citanje iz particione tabele, OK? pOZDRAV, bOJAN. ... You have the right to remain silent.... USE IT! * Origin: SETNet * BBS Politika, Bgd * +381 11 3229148 * 0-24 (38:103/133)

pascal.1045 postmast, 18 Sep 95

From: Vladimir.M.Zivkovic@f119.n111.z38.setnet.setnet.co.yu (Vladimir M Zivkovic) Subject: Re: Zapisi I Tako Dalje Date: Mon, 11 Sep 1995 18:37:00 VC> Iskreno govoreci, jako me zanimaju. Ipak, jako slabo poznajem VC> BBS vode, tako da bih te zamolio da mi objasnis kako da dodjem do njih. Nazoves Oswaldov BBS (022-425-879) od 23-07h i skines fajl FLIC.ZIP. Ako imas problema, zoves Oswalda u chat i on ce ti srediti sve. __ Pozdrav from Vladimir __ ... Silver Xpress!...... Pioneering Off-line Mail Technology! <tm> * Origin: ECSTASY BBS * Indjija * 022 53-884 * SETNet: (38:111/119)

pascal.1046 evlad, 18 Sep 95 -> #1042, kriss

<> Opet jedno pitanje: Ima V3.00 + Turtle Graphics O:)

pascal.1047 bcvetkovic, 18 Sep 95

Interesuje me moze li ovo PASCAL, a ako moze na koji nacin! (ne pitajte zasto mi ovo treba, ali mi stvarno treba!) PASCAL mi je svario e^88 (exp(88)), a meni je potrebno da svari e^430 (exp(430)). Unapred zahvalan Bosko.

pascal.1048 .sima, 19 Sep 95 -> #1047, bcvetkovic

║║ PASCAL mi je svario e^88 (exp(88)), a meni je potrebno da svari ║║ e^430 (exp(430)). Ako imaš Borland Pascal probaj ovaj program. Ako imaš kooprocesor definiši variablu FPU sa {$define FPU}, ili u meniju options, compiler, conditional... {$ifdef FPU} {$E-,N+} {$else} {$E+,N+} {$endif} var broj: extended; begin broj:=exp(430); writeln(broj); broj:=exp(10000); writeln(broj); end.

pascal.1049 dekik, 20 Sep 95

Jel ima neko source za citanje seriskog broja diska. 7D6e9j2a5n 3!

pascal.1050 .sima, 20 Sep 95 -> #1049, dekik

║║ Jel ima neko source za citanje seriskog broja diska. ║║ Dejan ! Pa ja poslao opis interapta pre nedelju dana. Evo sada u pascalu. ser.zip

pascal.1051 vgenije, 21 Sep 95

Dali postoji mogucnost prikazivanja gifslie u Pascalu i zumaranja iste?

pascal.1052 mpromet, 22 Sep 95

Zna li neko knigu u kojoj imskoro sve o Turbo Pascal-u (6.0) i ceni od prilike ű

pascal.1053 .sima, 22 Sep 95 -> #1052, mpromet

║║ Zna li neko knigu u kojoj imskoro sve o ║║ Turbo Pascal-u (6.0) Pa originalno uputstvo nije loše :), onda postoji knjiga koja je ustvari prevod jedne strane i zove se ja mislim "Turbo Pascal 6.0...". Knjiga je vrlo dobra (za razliku od one što je napisao Duško Savić :) i nije samo prevod originalnog uputstva već ima i korisnih primera. Što se cene tiče, kada sam je kupio bila je oko 20-40DM. Mada originalna knjiga, koju sam takođe imao u rukama, ima oko 1000 strana i pokriva baš sve, naš prevod ima duplo manje, ako ne i više. Ako te baš interesuje poslaću ti opširnije podatke. Onda postoje i knjižice od Duška Savića (ne preporučujem mada ima ponešto zanimljivo), a da ti reče da ima skoro sve, a ne skoro ništa ;)) zaboravi onda Duška.

pascal.1054 ikapoz, 22 Sep 95 -> #1021, postmast

> > AB>Dalje, ima li neko opis PCX, GIF, MOD, FLI zapisa? Potrebni su mi. > > PCX, GIF, FLI. Imam ja. Kazi mi samo kako da ti ih dostavim (ja neznam). > Ako te interesuje, imam i druge formate slika ( JPEG, IFF (LBM), TIFF ...) > > Cheppy. Interesuju i mene ti formati zapisa, pa ako moze posalji ih na SEZAM. Konkretno me interesuje PCX, GIF, FLI, JPEG, TIFF ...

pascal.1055 dbosanac, 22 Sep 95

Kako u Delphi-u izvesti da se pritiskom na Enter u Edit boxu uradi SetFocus na sledeći Edit box?

pascal.1056 dbosanac, 22 Sep 95

Kako u Delphiu izvesti unos zapisa u bazu ovo ne radi: Glavna forma procedure TForm3.BitBtn1Click(Sender: TObject); begin form4.showmodal; if form4.showmodal = mrok then begin query1.close; query1.open; end; end; Forma za unos: procedure TForm4.FormCreate(Sender: TObject); begin unesi.prepare; end; procedure TForm4.BitBtn1Click(Sender: TObject); begin unesi.close ; unesi.params[0].asstring:=edit1.text; unesi.execsql; bitbtn1.modalresult:=mrok; end; SQL unesi insert into baza(podatak) values (:podatak)

pascal.1057 kriss, 22 Sep 95 -> #1052, mpromet

˙˙ Zna li neko knigu u kojoj imskoro sve o ˙˙ Turbo Pascal-u (6.0) SEZAM, dir pascal, fajl TPR-BOOK.ZIP. Cena: dž.

pascal.1058 schef, 22 Sep 95 -> #1052, mpromet

#### Zna li neko knigu u kojoj imskoro sve o #### Turbo Pascal-u (6.0) Mikro knjiga je izdala knjigu "Turbo Paskal 6 -kompletan vodič"na 440 strana od Stephena O'Briena. Uz knjigu se dobija disketa sa primerima i cena je oko 50.00 din.

pascal.1059 kriss, 23 Sep 95 -> #1058, schef

˙˙ od Stephena O'Briena. Uz knjigu se dobija disketa sa primerima Da li neko ima tu disketu?

pascal.1060 superhik, 23 Sep 95 -> #1059, kriss

=:> Da li neko ima tu disketu? Ja bi' trebao da je imam... ako ti stvarno treba javi mi na mail pa ćemo nešto da iskombinujemo

pascal.1061 postmast, 29 Sep 95

From: Srdjan.Stanisic@f104.n103.z38.setnet.setnet.co.yu (Srdjan Stanisic) Subject: Re: :)) Date: Thu, 21 Sep 1995 21:30:07 ZS> NEMESIS (nemesis@styx.herkules.co.yu) wrote: ZS> : EJEdno pitanje ... kako napraviti program koji koristi ZS> : onoliko memorije koliko je ima na mashini slobodno ... ZS> : Jer ako napishem ... ZS> : array [1..1000] of Pera; {pera= record duzine 100Byte} ZS> ZS> : I sta ako se desi da na systemu ima manje memorije s ZS> : lobodno ... RUN TIME ERROR :(( ZS> ZS> : Kako napraviti tako da koris ti samo raspolozivu ?????? ZS> ZS> : Pisalo se pre o tome .... Dinamickim alociranjem memorije preko pointera i vezanih lista. Sa GETMEM i GETAVAIL se dobija slobodna memorija na heap-u i to je to. Strider ... Ako kanis pobijediti, ne smijes izgubiti. * Origin: *SETNet: Taurunum BBS +381 11 2354-253, Zemun* (38:103/104)

pascal.1062 postmast, 29 Sep 95

From: Srdjan.Stanisic@f104.n103.z38.setnet.setnet.co.yu (Srdjan Stanisic) Subject: Re: keep Date: Thu, 21 Sep 1995 21:33:08 AB> Hi! AB> Kao sto svi znate u TP6.0 ima procedura KEEP koja omogucava AB> stvaranje TSR programa. Ali ... ima mana a to je da ne znam kako da AB> uklonim taj program iz memorije? Kada postavljam interapte pri AB> ukljucuvanju progra ma snimim stare i kada mi vise nije potreban AB> vracam stare, ali program ostaje u memoriji. Kako to da rijesim? Sredinom juna sam poslao listin kompletnog TSR-a za dump text ekrana. Tamo ti je sve dato. Ali dobro, poslacu ti ga u drugoj poruci. Tamo imas ceo mehanizam koji te zanima. Strider ... Ako kanis pobijediti, ne smijes izgubiti. * Origin: *SETNet: Taurunum BBS +381 11 2354-253, Zemun* (38:103/104)

pascal.1063 postmast, 29 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: pascal Date: Sat, 16 Sep 1995 18:51:00 "SS> Zao mi je sto moram da ti kazem, ali nije :( "SS> U slucaju da je pritisnuti specijalni taster nece lepo raditi. > jer ako imas > . . . > readkey; > . . . > readkey; <-- ova linija ce biti preskocena, mislim nece stati Mislim da sam vecc jednom napisao. Najbolje je da se ccekanje tastera uradi sa sledeccom sekvencom. begining:=ending; /** brisse baffer tastature ***/ repeat until keypressed; a begininig i end su: var begining: word absolute $40:$1a; ending : word absolute $40:$1c; A ko voli C mozze 'vako: char far *beg=(char far *)0x0000041AL; char far *end=(char far *)0x0000041CL; *beg=*end; Chombe ___ ■ SPEED 2.00 [NR] ■ ***** RAVE-O-LUTION ***** * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1064 postmast, 29 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: delphi Date: Sun, 24 Sep 1995 14:02:00 Radim povremeno sa Delphi-jem (Client/Server verzija), ali dosad nisam naissao na moguccnost da Delphi pravi instalacioni program. Possto znam da Visual Basic 3.0 mozze, smatram ovo nedostatkom Delphi-ja. Ili mozzda se varam? Daj Bozze da se varam. ;) I joss jedno pitanje! Dali mozze Client/Server verzija Delphija da radi na 386 dx40 sa 8MB RAM-a? Znacci ne samo da se pokrene vecc i da se komotno radi. A dali mozze komotno da se radi na 486 sa 4MB RAM? 10x Chombe ___ ■ SPEED 2.00 [NR] ■ Jive ass stipid ugly motherfu*ker... * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1065 postmast, 29 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: pascal Date: Sat, 16 Sep 1995 19:19:00 KB> Ali ako preformatiras disk, moraces opet da instaliras program > nanovo. Eto prilike da se pokupe novi podaci. Ako mozes ostavi > neku proceduru za citanje iz particione tabele, OK? Da. Ali mozzda korisnik zameni hard disk, lepo iskopira program i qrac. Ne radi. U svakom sluccaju evo ti program koji ccita particionu tabelu. Nadam se da radiss sa TP6.0 or greater. ;) var Buffer: array[1..512] of byte; regs: registers; .... regs.ah:=0; /** Pozivamo f-unkciju 0 **/ regs.al:=$80;/** koja resetuje disk. U al je broj diska.**/ /**Za floppy A je 0, za B 1, a za prvi HDD $80. /**za drugi HDD $81 itd.. intr($13,regs); /** BIOS poziv **/ regs.ah:=2; /*read disk sector*/ /*ovde pogledaj DOBRO da bude /* bass dvojka a ne trojka, jer ode /* particiona tabela */ regs.ah:=1; /* broj sektora */ regs.ch:=0; /* track/cyl number */ regs.cl:=1; /* broj sektora */ regs.dh:=0; /*head number */ regs.dl:=$80; /*drive number, znacci C: ***/ regs.es:=seg(buffer); /* ES:BX pokazuje na baffer gde se smesstaju */ regs.bx:=ofs(buffer); /* podaci iz particione tabele, ukupno 512 bajta */ intr($13,regs); Opis ovih BIOS funkcija mozzess da pogledass u HELPPC. Nisu svih 512 "bajata" vazzni za zasstitu. Kako ja pri ruci nemam organizaciju particone tabele, najbolje nadji i vidi koji bajtovi ti trebaju. Mislim da su negde od 450 bajta pa nadalje. Ukoliko nadjem nessto visse ovih dana, poslaccu poruku. Chombe ___ ■ SPEED 2.00 [NR] ■ * BLANK * * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1066 postmast, 29 Sep 95

From: zoran.rilak@rstones.durlan.co.yu (Zoran Rilak) Subject: Pascal Date: Tue, 26 Sep 1995 00:59:00 CET QWK To: Zeljko Jovanovic (Tekst poruke: Zeljko Jovanovic, na temu Pascal) > Na dnu TV ima dosta masinca, dakle prilicno brzo cak i na 386 > makinama. ZJ> Cak? :) ZJ> Recenica je verovatno trebala da glasi: 'zahteva 386 da bi bilo ZJ> dovoljno ZJ> brzo'. :)) Ama ljudi, gde vam je granica? Zar bas svaka masina zasnovana na procesoru starijem od dve godine mora da bude otpisana? Kad vec govorite o TurboViziji, dok sam se ja sa njom zamlacivao na XT-u sa MFM HD-om, sve je islo neverovatno brzo. Cak jako, jako brze od mnogih drugih programa pisanih "od nule". Pa zasto bi onda 386 masina bila "spora"? Ne treba dizati donju granicu brzine uporedo sa gornjom, vec samo kada i ako je to zaista potrebno. Da li je neko video igru "StarGlider" na XT-u? Koliko ljudi smatra da bi mogli da naprave istu stvar na svojim 486 masinama? Programeri su se ulenjili, i sve su vise lenji sto su masine brze. 3OPAH ... Gospodo draga, kod je nestao bez traga ~~~ Blue Wave/Max v2.12 [NR] #! rnews 1118

pascal.1067 postmast, 29 Sep 95

From: milan.stojanovic@rstones.durlan.co.yu (Milan Stojanovic) Subject: Pascal Date: Sun, 24 Sep 1995 00:53:00 CET QWK To: Ilija Poznic > AB>Dalje, ima li neko opis PCX, GIF, MOD, FLI zapisa? Potrebni su mi. > PCX, GIF, FLI. Imam ja. Kazi mi samo kako da ti ih dostavim (ja neznam > Ako te interesuje, imam i druge formate slika ( JPEG, IFF (LBM), TIFF IP> Interesuju i mene ti formati zapisa, pa ako moze posalji ih na SEZAM. IP> Konkretno me interesuje PCX, GIF, FLI, JPEG, TIFF ... Koliko sam ja upucen, na Sezamu vec postoje opisi TIFF i GIF formata. Za PCX nisam siguran, ali mislim da i njega ima. Pogledaj u r:\info dir-u. +------------------------------------------------------------------+ | Milan Stojanovic | piksi@rstones.durlan.co.yu | | Rolling Stones BBS 018-325-314 | FidoNet: 2:382/105.5 | +------------------------------------------------------------------+ I said mac is that what you really need (B.Dz.Stulic) ~~~ Blue Wave/Max v2.20 [NR]

pascal.1068 postmast, 29 Sep 95

From: damir@osmeh.fon.bg.ac.yu (Damir Barjaktarevic) Subject: Delphi Date: Sun, 24 Sep 1995 18:17:26 GMT Kako se u Delphi-ju pravi forma bez Captiona ili sa Tiny caption( kao u BC)? Vozdra, Damir -- damir@unitop.elfak.ni.ac.yu

pascal.1069 postmast, 29 Sep 95

pascal.1070 postmast, 29 Sep 95

pascal.1071 postmast, 29 Sep 95

pascal.1072 postmast, 29 Sep 95

pascal.1073 postmast, 29 Sep 95

pascal.1074 postmast, 29 Sep 95

pascal.1075 postmast, 29 Sep 95

pascal.1076 postmast, 29 Sep 95

pascal.1077 postmast, 29 Sep 95

From: broker@setnet.co.yu (Predrag Supurovic) Subject: pascal Date: Wed, 20 Sep 1995 12:17:43 "M> From: "Pavle Milosevic" <paki@sezam.UUCP> > Proba sam da sa i:=Lenght(s) "M> Funkcija se zove Length :) E da, ovo je bila prilicna zackoljica u nekoj od starijih verzija TP-a, jer je u samom help-u ime funkcije bilo pogresno otkucano. :) ... Be carefull. Death is PERMANENT! -+- OLMS 2.5 UNREG * Origin: Oreska BBS, Uzice = SF BIBLIOTEKA = SETNet: (38:101/101)

pascal.1078 postmast, 29 Sep 95

From: Mladen.Adamovic@f135.n135.z38.setnet.setnet.co.yu (Mladen Adamovic) Subject: Re: pascal Date: Tue, 12 Sep 1995 18:16:19 -+=+- "Ferenc Sili" rece : -+=+- "S> From: "Ferenc Sili" <kile@sezam.UUCP> "S> Newsgroups: yu.prog.pascal "S> Organization: SEZAM Beograd, 011 648-422 "S> Ali serijski broj harda moze i da se promeni :(. "S> Gresim li? Ne gresis. Int21h, AX=6901, ako me pamcenje dobro sluzi. Ako nekome trebaju, preciznije informacije, nek me mail-ne i dobice ih :). Pozdrav, Mladen Adamovic (adamm@elf.bl.ac.yu). ... Tata, tata, kupi mi TAG! * Origin: Sveti Sava BBS Prijedor 079 11 629 SETNet: (38:135/135)

pascal.1079 postmast, 29 Sep 95

From: Mihajlo.Savic@f135.n135.z38.setnet.setnet.co.yu (Mihajlo Savic) Subject: Re: keep Date: Wed, 20 Sep 1995 23:24:48 *** QUOTE : Asmir Badnjevic *** AB> ne znam kako da uklonim taj program iz memorije? Poruka sa sourcem je prosla kroz ovu konf. jedno 200 puta, ali ako iz nekog razloga nisi video/procitao bacicu je opet .... AB> ! Origin: Sveti Sava BBS Prijedor 079 11 629 SETNet: (38:135/135) Posto to verovatno ne zanima sve korisnike bacicu ti u mail na ssavi,ok? Pozdrav BadaBoom ... Mislim a budale mlate lovu * Origin: Sveti Sava BBS Prijedor 079 11 629 SETNet: (38:135/135)

pascal.1080 postmast, 29 Sep 95

From: Mihajlo.Savic@f135.n135.z38.setnet.setnet.co.yu (Mihajlo Savic) Subject: Re: zapisi i tako dalje Date: Wed, 20 Sep 1995 23:24:48 *** QUOTE : Mladen Adamovic *** MA> -+=+- Asmir Badnjevic rece : -+=+- AB> Dalje, ima li neko opis PCX, GIF, MOD, FLI zapisa? Potrebni su mi. MA> MA> PCX imas na sezamu, u cini mi se s:\infoprog\ PCX cini mi se imam i ja pa ako ti treba mogu da ga okacim na bbs ... MA> Opis GIF formata, imas u cini mi se, programu za rad s fraktalima Imam opis GIF89a (prosireni standard) sa sourcem (cini mi se) ... MA> MOD zapis imas u Racunarima brojevi veci od 100, MOD zapis je jednostavan, jedino semplovi prave probleme :( MA> Ja bih u "listu" da dodam AVI i MPEG. ^^^^ I tata bi sine :)))))) MPEG? Pa covjece niko od nas nema sanse da napravi player za MPEG koji bi radio iole pristojnom brzinom O;>>> ... Slicnost izmedju slona i paradajza je sto su oba crvena sem slona. * Origin: Sveti Sava BBS Prijedor 079 11 629 SETNet: (38:135/135)

pascal.1081 postmast, 29 Sep 95

From: Mladen.Adamovic@f135.n135.z38.setnet.setnet.co.yu (Mladen Adamovic) Subject: Re: zapisi i tako dalje Date: Fri, 22 Sep 1995 23:06:56 -+=+- Mihajlo Savic rece : -+=+- MA> Ja bih u "listu" da dodam AVI i MPEG. MS> ^^^^ I tata bi sine :)))))) MS> MPEG? Pa covjece niko od nas nema sanse da napravi player za MPEG MS> koji bi radio iole pristojnom brzinom O;>>> Ko je rekao da ja zelim da pravim player za MPEG? Mene samo "informativno" interesuje zapis. Posebno me interesuje AVI, posto je sigurno, pred njim buducnost. Ako neko slucajno ima Windows 95 Develompers Kit (to je onaj drugi cd), mogao bi da nesto izvadi iz stavke "ANI". Pozdrav, Mladen Adamovic (adamm@elf.bl.ac.yu). ... ARRRRRGGGHHH!!!! ... Tension breaker, had to be done. * Origin: Sveti Sava BBS Prijedor 079 11 629 SETNet: (38:135/135)

pascal.1082 postmast, 29 Sep 95

From: KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu (KLIMENT ANDREEV) Subject: Delphi Date: Wed, 27 Sep 1995 06:07:00 Kako se u Delphi-ju pravi forma bez Captiona ili sa Tiny caption( kao u BC)? DB> Vozdra, Damir Mozzda nisam dobro razumeo pitanje, ali formu bez kepss'na mozzess da uradiss direktno iz Object Inspectora. U properties za Form Border Style stavi bsNone. Mozzess i bsDialog itd... Chombe P.S Mislim da je bio BorderStyle, ako ne onda stavka ispod. ___ ■ SPEED 2.00 [NR] ■ Na hipodrom ima horse & grass & shit & speed! * Origin: SETNet: Struga BBS +389 96 74074 * Macedonia * (38:108/108)

pascal.1083 postmast, 29 Sep 95

From: damir@osmeh.fon.bg.ac.yu (Damir Barjaktarevic) Subject: Re: Delphi Date: Fri, 29 Sep 1995 14:53:17 GMT KLIMENT ANDREEV (KLIMENT.ANDREEV@f108.n108.z38.setnet.setnet.co.yu) wrote: > Mozzda nisam dobro razumeo pitanje, ali formu bez kepss'na mozzess > da uradiss direktno iz Object Inspectora. U properties za Form > Border Style stavi bsNone. Mozzess i bsDialog itd... > Chombe > P.S Mislim da je bio BorderStyle, ako ne onda stavka ispod. Ok, to sam prokuzio kasnije. Problem je bio u tome sto Delphi ne skloni odmah Caption u toku dizajniranja vec tek kad startujes program pa nisam odmah primjetio. Sto se tice Tiny captiona to je onaj mali caption sto se obicno koristi za Floating toolbar ili kod Corela za Roll-Up. Kolko mi se cini to ce morati da se uradi "rucno", tj. napraviti novu komponentu. Vozdra, Damir -- damir@unitop.elfak.ni.ac.yu

pascal.1084 postmast, 02 Oct 95

From: SETN@f101.n101.z38.setnet.setnet.co.yu (SETN) Subject: Statistics Date: Thu, 28 Sep 1995 07:58:00 Maintaned by CONFERENCE STATISTICS SHELL - (c)1995 by Predrag Supurovic ======================================================================= Conference NET.PASCAL maintained on 31.08.95. for 28 days backward. QRATIO Mail Statistics V1.9 by Act Of Impulse. ---------------------------------------------- Total messages found in this area : 425 Number of messages covered in report: 174 Processed period from: 31-8-1995 to 27-9-1995 ------------------------------------------------------------------------------ Blacklist-Top 5 of the Quoters. Nr Total Quoted Quote Name Address Msg Lines Lines: Ratio: ---- ------- --- ----- ------ ------ 1. Srdjan Stanisic.......... 38:103/104 2 27 18 66.67% 2. "Dejan Vesic"............ 38:103/120 1 10 6 60.00% 3. "Ilija Poznic"........... 38:103/120 1 12 7 58.33% 4. "Vojislav Stojkovic"..... 38:103/120 1 12 7 58.33% 5. Petar Ristic............. 38:111/119 3 33 18 54.55% ------------------------------------------------------------------------------ Top 5 of the writers. Total Average Quote Name Msgs: Pct. Byte/Msg Ratio: ---- ----- ----- -------- ------ 1. "Srdan Simic" 23 13.2% 546 11.40% 2. Vladimir M Zivkovic 13 7.5% 603 28.33% 3. "Milos Visnjic" 10 5.7% 684 16.76% 4. "Miroslav Minovic" 9 5.2% 576 17.29% 5. "Nikola Radenkovic" 7 4.0% 307 14.75% ------------------------------------------------------------------------------ Top 5 of the receivers. Total Name Msgs: Pct. ---- ----- ----- 1. All 123 70.7% 2. Vladimir M Zivkovic 7 4.0% 3. Mladen Adamovic 5 2.9% 4. "Miroslav Minovic" 4 2.3% 5. Asmir Badnjevic 4 2.3% ------------------------------------------------------------------------------ Top 5 of the subjects. Subject Nr. ------- --- 1. PASCAL...................................................... 133 2. zapisi i tako dalje......................................... 20 3. keep........................................................ 3 4. wait for key................................................ 3 5. Pascal Programing........................................... 3 ------------------------------------------------------------------------------ Average posting frequency per week: Day Msgs Pct. Graph Sunday 27 15.5% ******************************************* Monday 21 12.1% ********************************* Tuesday 14 8.0% ********************** Wednesday 22 12.6% *********************************** Thursday 33 19.0% **************************************************** Friday 26 14.9% ***************************************** Saturday 31 17.8% ************************************************* ------------------------------------------------------------------------------ Average posting frequency per day: Interval Msgs Pct. Graph -------- ---- ----- ----- 0:00- 1:59 10 5.7% ******************** 2:00- 3:59 7 4.0% ************** 4:00- 5:59 6 3.4% ************ 6:00- 7:59 6 3.4% ************ 8:00- 9:59 8 4.6% **************** 10:00-11:59 21 12.1% ******************************************* 12:00-13:59 16 9.2% ******************************** 14:00-15:59 23 13.2% *********************************************** 16:00-17:59 16 9.2% ******************************** 18:00-19:59 13 7.5% ************************** 20:00-21:59 25 14.4% *************************************************** 22:00-23:59 23 13.2% *********************************************** ------------------------------------------------------------------------------ * Origin: Oreska BBS, Uzice = SF BIBLIOTEKA = SETNet: (38:101/101)

pascal.1085 postmast, 02 Oct 95

From: dragisha@hobbiton.CO.YU (Dragisa N. Duric) Subject: FormsVBT versus Delphi Date: Fri, 29 Sep 1995 21:08:56 GMT [ Article crossposted from comp.lang.modula3 ] [ Author was Michel Dagenais (dagenais@gutrune.vlsi.polymtl.ca) ] [ Posted on 28 Sep 95 08:55:59 ] Here are some thoughts after comparing Delphi and FormsVBT for a project. Hope it may be of interest to some. FormsVBT offers a large number of components and care is required to have all the components shapes interact properly. This may turn off potential users accustomed to direct manipulation graphical user interface builders such as the Borland Delphi environment. I have seen sophisticated user interfaces realized with Delphi which seemed difficult to reproduce using FormsVBT. It is surprising what can be achieved with well designed nested horizontal and vertical boxes. Although most of the programs provided with the DEC SRC distribution use relatively simple interfaces, very sophisticated interfaces have been implemented with FormsVBT in a few days. When converting one of these interfaces from Delphi to FormsVBT, most items were straightforward while a few required more care. Whenever FormsVBT does not provide the required component or appearance, three techniques may be used. - The underlying VBT may be accessed with FormsVBT.GetVBT and may allow changing some of its attributes, for example the color of scrollbars. - The component initialization may be overridden by providing a new realize method for FormsVBT.T, as illustrated in the FormsVBT reference manual. For example, HTile and VTile may be initialized with different colors for separating bars. - New components may be added to Trestle and/or VBTkit and incorporated into FormsVBT. For example, in approximately 2 days i added Help Bubbles to FormsVBT. Apparently this is something to which personnal computer users are accustomed. When the mouse stays for some time over a region with help available, a small help window pops up. Not only can FormsVBT achieve the same result as Delphi, it also provides a number of interesting features. It is portable across Windows NT/95 and most Unix platforms, it adapts to available colors over a wide range of hardware capabilities, scales to different resolutions and allows a lot of flexibility for the user to reshape the window containing the user interface. Furthermore, it is the program instantiating the user interface and not the interface taking control of the program as in Delphi. -- Prof. Michel Dagenais http://www.vlsi.polymtl.ca/dagenais/home/home.html Dept of EE and Computer Eng. dagenais@vlsi.polymtl.ca Ecole Polytechnique de Montreal tel: (514) 340-4029