mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.pascal
Titolo: Scusatemi

Vorrei una volta per tutte chiudere il discorso iniziato da me per la
richiesta di un programma poco tempo fa.
MI SCUSO CON TUTTI QUELLI CHE HO OFFESO (meno che con certa gente come
Nicola Torreggiani che non conosce l'educazione), NON VOLEVO ASSOLUTAMENTE
CREARE QUESTO CASINO.
Sperando che accettiate le mie scuse, Giuseppe

...

Certo che le accettiamo... ma devi fare una penitenza :-)))
Prota un po' di gente, che magari è il momento giusto per dare vita a questo
NG (5-10 msg al giorno mi sembrano un po' pochi... visto che si parla del
grande Pascal!!!)
Ciao
Emanuele Cesena
d.a.m...@iol.it
ICQ n° #10570672
"Un generatore di numeri casuali non puo' essere scelto a caso", Knuth

Ahhh, Ahhh, Aaaaaaaahhhh.
Ci sto godendo perchč me lo stai succhiando.
Ciao sfigati!!

 Ciao sfigati!!

 Ciao sfigati!!

Ciao sfigati!!
Non c'č che dire ! La classe non č acqua !
Gusto pulito, sapore chiaro ! scommetto che hai studiato a Oxford !
Andrea Laforgia
----------------------------------------------------------------------
Sto facendo il militare.....vi rispondo tra una o due settimane !!! :)

Newsgroup: it.comp.lang.pascal
Titolo: Aiuto per stampa-output!!


Prova a fare cosi':
supponiamo che il programma si chiami PIPPO.EXE e vuoi che l'output
vada  in un file di tipo testo chiamato  OUT.TXT
tu da Dos digiti cosi':
PIPPO  > OUT.TXT      e pigi invio.
A questo punto tutto l'output che dovrebbe andare sul video va nel
file e quindi dovrai immettere i tuoi dati alla cieca.
Alla fine apri il file  OUT.TXT con un tuo editor, se c'e' bisogno ci
dai una sistemata e poi lo stampi.
Ciao,   Fabio
--
fabioma...@rocketmail.com

Il file LST è quello predefinito dal pascal per la stampante.
Se vuoi stampare sulla stampante anzichè a video basta che fai precedere
nelle write o writeln il nome del file nel quale stampare in questo caso
LST, quindi
Write ( LST, 'Ciao' );
stamperà sul foglio della stampante CIAO
se inoltre vuoi mandare a capo la riga usa
WriteLn ( LST, 'Quello che ti pare' );
Se devi stampare il contenuto di una matrice, non cambia assolutamente nulla
dal doverla stampare a schermo, l'unica differenza è LST, che predece il
valore.
Write ( LST, Matrice [1,1 ] );
Write ( LST, ' ' + Matrice [1,2 ] );
....
A fine programma ti consiglio di aggiungere la seguente riga
Write ( LST, #12 );
serve per far uscire completamente il foglio, in modo che se fosse rimasto
qualcosa nel buffer della stampante, venga stampato ed infine espulso il
foglio.
Spero di essere stato chiaro.
Bye

Newsgroup: it.comp.lang.pascal
Titolo: directory

salve ng
avete idea di come si fa a mettere in un file txt la dir di tutti i file di
una cartella e delle eventuali sottocartelle?
grazie...
--
--------------------------------------------------
Carlo Camarda
chiamac...@tiscalinet.it
]@#[ Anna I Love You ]#@[

dir [/s] > nomefile
poi ti devi parsare il file... con i vari parametri del dir puoi
ottenere diverse visualizzazioni...
--
Dreadnaut
(Life would be easier if I had the source code)


Ehm, credo si riferisse al pascal :P non via dos :P
Cooper :-)

> Ehm, credo si riferisse al pascal :P non via dos :P
c'ho provato :-)

Newsgroup: it.comp.lang.pascal
Titolo: come richiamo la risoluzione 320X200X256

Che interrupt devo usare e con ke parametri per utilizzare tale risoluzione?
--
ICQ#17330720
IRCNet:KiNg[G]hZ »»» #mp3.ita
s...@gem.it

 
l'interrupt è il 10h, e devi MOVare in AX il valore 13h:))))))
ciao!
-- 
Carotino
Member #2 and PR of POTA (founded by Zarkan)
ICQ 19905752
Amiga's Paradise:
www.geocities.com/timessquare/labyrinth/5925/index.htm
Newsgroup: it.comp.lang.pascal
Titolo: com1 to com1

Ciao a tutti. Eccomi qui per l'ennesima volta a scassare le palle ( si puo
dire palle ? =: ) in questo NG.
Ho fatto i seguenti semplici programmini per trasmettere una stringa tra due
pc e visualizzarla sul pc ricevente.
Unico risultato : device write fault. Ho controllato le impostazioni delle
com ed erano entrambe 9600, none, 8, 1.
Qualcuno riesce a spiegarmi dove sbaglio??? O se e possibile fare una roba
del genere, cioe trattare le due com come dispositivi di testo???
RiCiao e grazie per l'eventuale aiuto.
Program Ricevitore;
var
   Ricevi : text;
   stringaRicevuta : string;
Begin
  assign ( Ricevi, 'COM1' );
  reset ( Ricevi );
  repeat
   readLn ( Ricevi, stringaRicevuta );
  until stringaRicevuta <> '';
  close ( Ricevi );
  writeLn ( stringaRicevuta );
End.
Program Trasmettitore;
var
   Invia : text;
   stringaTrasmessa : string;
Begin
  stringaTrasmessa := 'Prova';
  assign ( invia, 'COM1' );
  rewrite ( invia );
  writeLn ( invia, stringaTrasmessa );
  close ( invia );
End.
--
el rasune'
-----
Ca custa chiel ca custa...
    Viva la val d'Austa!

scusa, mi sai dire dove studi queste cose?
vai a lezione all' università o hai un libro in particolare?
in tal caso quale?
ciao

 ha scritto nel messaggio
news:FRYD6.60694$s93.6...@news.infostrada.it...


"miSunRasune'"  ha usato tutta la sua fantasia scrivendo

Ma COM1 da dove lo prendi ?!?!? ho controllato help ma oltre a nomefile e
input e output assign non prende altro...
Ciao ReDiCuori
------------------------------------------
pascal su IRC : #turbopascal
pascal sul web : 
www.pascallike.cjb.net
------------------------------------------

Sono i dispositivi standard del dos ( almeno fino al 6.2 ) COM1 o AUX, CON,
PRN o LPT1 ecc... Una delle potenzialita del TP 6.0 ( e spero ereditata dal
TP7 ) era quella di rivolgersi a questi dispositivi come a file di testo...
Mi ricordo ke a skuola ( un qualke annetto fa!! ) avevamo fatto un gioketto
del genere, ke attraverso la COM1 andava a scrivere sul disco del pc remoto
un input da tastiera.
Volevo riprovarci e speravo ke qualcuno conoscesse il trucketto, poike io
non ricordo piu bene come funzionava e purtroppo ho perso il disketto col
codice...
Qualcuno ha qualke informazione in piu???
CIAO!
--
el rasune'
-----
Ca custa chiel ca custa...
    Viva la val d'Austa!
"ReDiCuori" <redicu...@NOSPAMlibero.it> ha scritto nel messaggio
news:VhaE6.64609$s93.6...@news.infostrada.it...

Newsgroup: it.comp.lang.pascal
Titolo: FAQ

Scusate,  esistono le FAQ di questo gruppo? Chi le mantiene?
Se non ci fossero perché non le scriviamo?
Io sarei disponibile... fatemi sapere.
Ciao a tutti

 wrote in message
8ri1fq$e34$1...@pegasus.tiscalinet.it...


>Allora non interessa a nessuno scrivere le FAQ?
come dice un mio compagno di facoltą "il Pascal č stato reso obsoleto dalle 
calcolatrici scientifiche" :)
maniscą, non gliene frega niente a nessuno :)

 maniscà, non gliene frega niente a nessuno :)

secondo me è una buona idea... io ho iniziato la programmazione in pascal da
poco cmq posso dire che anche se ormai è un linguaggio obsoleto per imparare
e per fare i giochini di dos ;-)) è sempre valido. Una faq secondo me è una
buona idea così almeno dove scaricare tp7 non lo chiederanno più :-))
se vuoi una mano io ci sono.
ciao a tutti


 wrote in message
8s2efn$rqn$1...@sun250.unimi.it...


inglese
prima di tutto, quello che tutti si chiedono è: a che serve oggigiorno 
Pascal? io lo so, ma altri no :)

 wrote in message
8FCBDD4DFky...@127.0.0.1...

Newsgroup: it.comp.lang.pascal
Titolo: if then else

Ciao a tutti, sto imparando ha conoscere il linguaggio pascal. Qualcuno mi
potrebbe dire il significato di IF, THEN, ELSE? Gentilmente potreste farmi
anche qualche esempio?
Grazie a tutti ciao


La sintassi del blocco di controllo IF THEN ELSE è :
IF (condizione) then
    begin
        (blocco di codice)
    end
else
    begin
        (blocco di codice)
    end;
Il signficato di questa blocco è il seguente
se (if) (CONDIZIONE VERA) allora (then) fai una cosa
altrimenti (else) fanne un' altra
Es.:
   Supponiamo di voler controllare il massimo tra 2 numeri e voler stampare
la differenza maxval-minval
    x1:=10;
    x2:=3,5;
    if (x1>x2) then
        begin
            writeln(' il massimo è x1');
            writeln('x1-x2=',x1-x2);
        end
    else
        begin
            writeln('il massimo è x2');
            writeln('x2-x1=',x2-x1);
        end;
Ciao ReDiCuori
-- 
L'informatica è un arte
---------------------------------------------------------
 
www.pascallike.too.it
 
http://utenti.lycos.it/pascallike
 il sito sulla programmazione pascal
 sorgenti, tutorial ed utility
------------------------------------------------------------
www.treves-srl.com
Libreria Internazionale Treves
Via Toledo 249/250 Napoli
------------------------------------------------------------
www.alphalibri.com
Vendita ingrosso di libri
Via S.Anna dei Lombardi 10 , Napoli
---------------------------------------------------------

 ha dgtato nel post:

Ricorda che il Begin e End della condizione viene omesso se non č un
blocco di codice con piů righe ovvero:
if a=b then writeln('Ciao Ciccio')
          else writeln('Errore');
--------------------
if a=b then
              begin
              c=b;
              writeln(c);
              end
          else
              writeln('Ciao Ciccio');
-------------------
Ciao
--
=Omega============
Hands On
==================

Ciao ReDiCuori
PS: Eh ma da quanto tempo non ci si vede?
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596
-----------------------------------------------
Founder of MediaPlayer Project
http://mpp.iwebland.com

else writeln('Errore');
Si il begin ed end possono essere omessi quando c'è una sola istruzione da
eseguire, ma per un problema di ambiguità quando si legge il codice,
consiglio sempre di metterli.
considera il caso di
if (P <> NULL) then
    if (P^.Info='RdC') then
         writeln('Ciao',P^.info);
    else
        writeln('Ciao');
else
    insert_nodo();
Ciao ReDiCuori
Ps.: Sto sclerando con Probabilità e Statistica ~~:////


 Ps.: Sto sclerando con Probabilità e Statistica ~~:////
Stai all'uni? Bhè allora credo che sia davvero tosta...io
sto facendo la variabile di Gauss...non mi sembra difficile ma per
arrivarci è stata dura! :P

Newsgroup: it.comp.lang.pascal
Titolo: la punto o non la punto?

Anche se una variabile e' piccola,
conviene sempre usare il puntatore,
che comporta aggiunta di codice?
extrabug @ 
iname.com

 ha scritto nel messaggio
news:96aakg$k56ui$2...@ID-47808.news.dfncis.de...


un puntatore e' 4 bytes, vedi tu :-)
Poi a volte puoi avere variabili di 64kb e non avere necessita' di puntarle.
Di solito si punta (si dovrebbe dire "referenzia" :-) ) solo quando serve
e/o e' necessario: variabili dinamiche, passaggio di grosse strutture
da/a procedure. Devi pensare a quanto la tua variabile sara' pesante da
gestire: passare per valore un'array di 1000 elementi richiede molto piu'
lavoro che passare un indirizzo ad essa.
Puntare ogni variabile e' negativo, sia dal punto di vista della
"leggibilita'"
del programma, sia dal punto di vista della velocita': la dereferenziazione
(brutta parola per indicare il "^") e' cmq un'operazione :-)
ciao
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it

Newsgroup: it.comp.lang.pascal
Titolo: With..Do in un record

Salve, potreste spiegarmi il funzionamento del WIth...do all'interno di un
record?? grazie
edi...@iol.it

 wrote in message
9oi3he$q1m$1...@nreada.inwind.it...


OKKKK, grazie mille, ora mi č chiaro!!! Ciao

Ciao trova una lezione intera su quello che cerchi all'indirizzo
http://digilander.iol.it/carmageddon1
 alla sezione tutorial lezione sui 
record.
Newsgroup: it.comp.lang.pascal
Titolo: Manuali per pascal

Buongiorno a tutti, io sono un povero studente che studia a scuola ormai da
4 anni il linguaggio di programmazione Pascal. Il problema è che 'sto pascal
comincia a piacermi e vorrei approfondire un pochino le mie conoscenze in
merito.
Non è che qualcuno potrebbe indicarmi dove posso trovare un qualcosa che mi
spieghi come si usa il pascal un pò più a fondo che rispetto alle semplici
strutture, procedure o funzioni?
Faccio qualche esempio: vorrei capire bene cosa sono i record e come si
usano, oppure come si usano i file di testo, o la grafica...
Sono nuovo di questo ng, quindi magari avete gia risposto altre volte a
questa domanda e non me ne sono accorto, in tal caso mi scuso!
ringrazio anticipatamente chi mi vorrà aiutare.
Ossequi
MrBison

 wrote in message
iAPf8.50850$fa5.1...@twister2.libero.it...


Newsgroup: it.comp.lang.pascal
Titolo: Please Help - Error 202: Stack overflow error.

Please help.  I have been working on this program for years.
I have a problem with Turbo Pascal 7.0.  I keep getting the 202 Stack
Overflow error.  I tried changing everything with the memory stack size to
maximun in the Option.  I was just wondering whether there is any way
around this problem.  I tried setting the stack check off {$S-} but the
progam became erratic.
As an aside, if I convert it to Turbo C++, would this still be a problem?
Thank you.



progam became erratic.
Gee, maybe you could tell something more about the program. Like do you
use recursion. What kind of local variables you declare. etc. etc. etc.
etc. etc.
Setting stack checking off is the last thing to do when you get stack
overflow. I bet when you burn a fuse, you just insert a bigger one.
BTW is it really necessary to crosspost in so many groups. If I had
sen that before writing I would not have written this. Followups set.
Osmo

 


 > 

Newsgroup: it.comp.lang.pascal
Titolo: Punti separatori

    Carissimi del NG,
sono un novello del Pascal, vorrei sapere da voi esperti :-) se esiste (ne
sono sicuro) un modo per stampare un numero con il raggruppamento ternario
delle cifre, ad esempio 1.000.000 al posto di 1000000, e se esiste qual'č.
    Ciao a tutti!
--
Davide Petilli
dpet...@libero.NOSPAM.it
Per rispondermi leva NOSPAM dal mio indirizzo!

delle cifre, ad esempio 1.000.000 al posto di 1000000, e se esiste qual'č.
Non esiste in modo predefinito, ma devi costruire una funzione a parte
:
function valuta( s : string ) : string ;
var r : string ;
    i, j : integer ;
begin
  r := '' ;
  i := 1 ;
  j := length( s ) ;
  while j > 0 do
  begin
    if ( i = 4 ) then
    begin
      r := '.' + r ;
      i := 1 ;
    end ;
    r := s[j] + r ;
    i := i + 1 ;
    j := j - 1 ;
  end ;
  valuta := r ;
end;
--
Andrea Laforgia        (
andrea_...@bigfoot.com
)

delle cifre, ad esempio 1.000.000 al posto di 1000000, e se esiste qual'è.
Prova un po' la seguente funzione e dimmi come va':
function  inserisci_punti(s : string) : string;
          var i : integer;
          begin
          i := length(s) - 2;
          while (i > 1) do
                begin
                insert('.', s, i);
                i := i - 3;
                end;
          inserisce_punti := s;
          end;
-- 
Joseph Parrello - OWL/C++ Programmer
SourceNet Italia (
http://SourceNet.freeweb.org
)
Le patch di OE (
http://www.freeweb.org/computer/SourceNet/Outlook.htm
)

Newsgroup: it.comp.lang.pascal
Titolo: Canale IRC di questo newsgroup

Ciao a tutti!
Esiste ancora il canale IRC di questo newsgroup?
Spero di sě. Sarebbe molto utile affiancarlo a quest'ultimo, soprattutto 
per gli utenti un po' alle prime armi (come me).
Ciao.
Grazie per l'attenzione.

  dice che :

si esiste ancora, ma č piů morto di questo NG.....
magari se ti dice bene qualcuno lo trovi!
comunque il canale č #turbopascal
ciao ciao (^__^)
---------------------
Saluti da Ulysse
Considerate la vostra semenza:
fatti non foste per viver come bruti 
ma per seguir virtute e conoscenza.

ma per seguir virtute e conoscenza.
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

> veramernte č proprio morto (non esistono + i bot a tenerlo vivo)
ok, non sono un bot, ma ogni volta che sono connesso io tengo
aperta una finestrella sul triste e vuoto canale... di solito o sui
server o di tin o di inwind, che cmq sono collegati... chi va su
azzurra e simili invece non riesce a vedermi.
Se vi capita lasciate mIrc aperto... non toglie troppa banda e puo'
capitare di beccarsi
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it
(Life would be easier if I had the source code)
Newsgroup: it.comp.lang.pascal
Titolo: per Cereal Killer (era: alternativa a Wherex e wherey)

Grazie per le info... ora mi metto subitoa codare per vedere se ho
capito!

non ho ben capito come faccio a salvare su una mia variabile il
contenuto di uno di quei registri
e viceversa.....
mov pippo,CX
salva in CX pippo?
NM



si...
in pratica e come se fosse
mov [pippo], cx
considerando pippo un puntatore ad un area di mem
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 salva in CX pippo?
eh no..
salva in pippo, Cx
se per azzerare ax fai
mov AX,0h
è come mettere in ax, zero..
quindi
mov pippo,cx
metti in pippo il contenuto di cx

 si...
eh no.. fa il contrario..
in pippo va il contenuto di cx...
ciauz, Cereal

OK OK ho capito....gotoyx funziona!
NM
On Mon, 29 Apr 2002 22:24:27 GMT, 
nom...@nowhere.no
 (NoMan) wrote:


 NM
beh.. giusto.. non complichiamoci la vita..
Cereal
--------------------------------------------------------------
It took the computing power of three C-64s to fly to the Moon.
It takes a 486 to run Windows 95. Something is wrong here.
--------------------------------------------------------------

Ineffetti!
NM

Newsgroup: it.comp.lang.pascal
Titolo: Re: Lahjatilanne

*(Ydinklingonimme on parhaillaan niin kiivaskiukkusen käärmessmörkkisiä,
ettei juuri vastattavaa löydy)). Toki syynä se, että on tullut autonkuormina
ydinvastalunta tupasiinsa oikeen ÄIJÄKAADOLLA! Ja hyvä niin, jahka saamme
myös SDP:lle viimen ikävöidyn ydinvastaisemman johdon niin ..! Noo toki
katellaan miten homma pelittää, mutta Lipposen ote puolueestaan lentää kuin
sirrilintu Katmanduun.. .)
*Vaan hei iloa irti tästä?
*Yleisön pyynnöstä alan julkaisemaan Suomen ydinaavikoitumisen
nykytilastamme kertovaa faktaa.
M.T.28.05-08. Ilmatieteen laitos.
PAIKKA  SADE mm.
_________________
Helsinki
Kiikkala
Turku          3,5mm
Jormala
Pori
Niinisalo
Tampere
Jokioinen     0,2
Lahti
Utti
L.ranta         0,7
Mikkeli
Ilomantsi      1,9
Joensuu        1,3
Kuopio        1,1
Viitasaari      2,7
Jyväskylä      0,3
Ähtäri           2,0
Kauhava       0,3
Vaasa           0,5
Ylivieska       1,0
Kajaani         0,2
Ruukki          0,5
Pudasjärvi
Suomussalmi  0,4
Kuusamo       1,5
Rovaniemi      4,4
Pello              1,3
Salla
Sodankylä     1,5
Muonio
Kilpisjärvi      1,1
Ivalo
Utsjoki
*KESKIARVO= 34kpl/ 0,78mm
Keskisadantavrk. 2mm/5vrk/10mm= 7,8%
JÄI -92,2% satamatta
_________________
*Niin? Kuka oikeasti edes yllättyi, että jälleen kerran lirvahti
kevätkuukausi tuskin muutaman prosentin normisadannalla? Toki
ilmatieteenlaitos vedättää kuun lopulla pokkana, että maailma suorastaan
hukkuu vesiin. No se meitä tietysti vain valheen määrässä enää jaksaa
huvituttaa. Oikeesti siis kuka tuollaista paskaa edes viittii lukea enää,
kun jokainen ymmärtää, että ollaan ydinaavikoitumisessa kamelikyydissä jo
kohti -50% normisadannan huonompaa päätä.
*Toki on päivän selvää, ettei tilanne parane kuin ajamalla ydinmörskät
rakettikuormana aurinkoon paskaksi. Meillä meni tässä nyt mehiläiset,
matelijat, sammakot, ehkä jo ensi viikolle taas odotamme mm. ydinlauhteisiin
kuolevan meremme syytämää kaspiankampamaneetti-invaasioita. Puumme menee
näköjään paperienergiatarpeineen  ankeroisille muutamassa vuodessa! No yhtä
kaikki KUKAAN ei tule sanomaan, ettenkö jo pitkään ja hartaasti varoitellut
tulevien "punasadeaikojen kauhuista". Nukkukaa hyvin kiivaat
ydinklingonimme, pian emme enää uskalla ydinaavikoitumisen edetessä kohti
vääjäämätöntä loppukliimaksiaan.(

Mita ?
--- posted by geoForum on 
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.pascal
Titolo: code segment too large

salve,
ho il seguente messaggio di errore col BP7: code segment too large.
ho provato a trasportare parte del codice in una unit, ma nulla di fatto
(totale in + files: 5000 righe)
mesi fa, ho ridotto all'osso il codice per bp7 : ovvero quasi tutte le
funzioni e procedure le ho rese vuote, ma il messaggio c'era ugualmente.
per questo motivo sono passato al freepascal
Lo stesso programma, oggi, molto + lungo in FreePascal non da' problemi
(totale in + files: ~10.000 righe)
accetto suggerimenti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


prova ad usare la versione 1.5 del pascal, quella per win (scaricabile dal
sito in firma) l'unica cosa e' che non puoi scrivere i programmi per dos ma
solo per windows, e quindi non puoi utilizzare tutte quelle librerie che usi
oper i programmi dos
--
Ciao
Marchese Gianfranco
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
sito internet personale: 
www.turbo-pascal.cjb.net
  Tutto sul Turbo Pascal
1.5

Newsgroup: it.comp.lang.pascal
Titolo: Aiuto!

Ragazzi, scusatemi se vi disturbo! Potreste per favore aiutarmi?!?
Mi servirebbe un sorgente di un programma in Pascal, che non sia troppo
semplice ma nemmeno troppo complesso.
In poche parole un piccolo database che fa uso di strutture come file di
record, e array: per es. una rubrica telefonica, o registro clienti, ecc...
Sapete dove posso procurarli oppure me ne potete inviare qualcuno?
Grazie mille in anticipo per quanti mi vogliano aiutare. Ne sarò davvero
molto riconoscente!
Se dovete inviare qualche sorgente, potete inviarlo a 
blueb...@libero.it
GRAZIE ANCORA

David Beckham trasformava una punizione quando Tony disse:

io ho esercizi con array, tabelle, file....in genere gestionali, ma
abbastanza semplici, da 3° superiore insomma...cosa vuoi? :-)
Ciao
--
________________________________
L'importante della vita sono le scelte...
...c'è sempre un futuro alternativo! ;-)
________________________________
   FORZA MANCHESTER UNITED!!!
Per scrivere in pvt togliere NOSPAM
Newsgroup: it.comp.lang.pascal
Titolo: Problemi con Free Pascal

Gentili fequentatori di it.comp.lang.pascal,
ho alcuni problemi con il programma Free Pascal 0.99.8, che ho scaricato dal
sito
http://www.brain.uni-freiburg.de/~klaus/fpc/download.html
 . Ho eseguito il
download di tutti i file, eccetto della guida HTML che non riesco a
scaricare per problemi relativi alla connessione col server remoto, anche
con uno dei mirror.
I problemi che tuttora non ho risolto sono:
1) Il programma non riconosce la uses crt, e quindi nemmeno il comando
associato clrscr.
2) Il programma non riconosce bene le accentate (che appaiono male sullo
schermo) né le virgolette (") che sostituiscono l'apostrofo nelle righe
WRITELN: esse nel programma EXE appaiono come normali virgolette.
Sicuro di una risposta, vi ringrazio per l'attenzione.
Alessandro Nucci
nucc...@diemme.it

ho alcuni problemi con il programma Free Pascal 0.99.8, che ho scaricato 
[cut]
Gentile scrittore
il Free Pascal non lo conosco pa se ti interessa il Turbopascal ver.6
te , lo puoi scaricare dal mio sito (sono 600Kb)
Fabio
fabi...@rocketmail.com


http://users.iol.it/fabio.manzo
a me sembrava di avergli fatta anche troppa pubblicita'.
Ciao e poi dimmi cosa ne pensi (gli insulti in privato)
fabio
fabi...@rocketmail.com

 WRITELN: esse nel programma EXE appaiono come normali virgolette.
Mah, io uso la tua stessa versione ma tali problemi non li ho riscontrati ...
Tanto per sapere, cosa significa che non riconosce la unit crt ? Non la trova ? 
Non e' leggibile ? Che errore ti da ?
Bye, Mobius
Newsgroup: it.comp.lang.pascal
Titolo: stranezza con getdir

ciao a tutti.
volevo sapere se a qualcuno č capitato che facendo
getdir(0,stringa);
se la directory corrente ha una lunghezza maggiore di un certo numero ,
diciamo 70 caratteri piů o meno , invece di ritornarvi la directory corrente
vi torna "c:"   !!!!
a me capita , con tp7 e w98.
ovviamente volevo anche sapere come avete eventualmente risolto ;)
ciao

mmmh sulla lunghezza non sono sicuro (provero') ma di certo
si hanno dei problemi con nomi di directory lunghi e/o contenenti
spazi... non e' colpa del tp o meglio una volta il problema non c'era...
poi' fu win9x e la fat32 ;-)
--
Dreadnaut
 - In un'automobile in moto, l'aria all'interno dei pneumatici gira
   anch'essa?

Newsgroup: it.comp.lang.pascal
Titolo: E' vero che il TP 7 ha problemi con l'Athlon?

Ciao ragazzi.
Premetto che sono un assoluto principiante.Devo sostenere l'esame di
Programmazione 1,e devo imparare il Pascal.
Io posseggo il Turbo Pascal 7,e vorrei comprare il manuale della Mc
Graw Hill "Turbo Pascal 7-Guida completa",che è stato consigliato da
parecchi di voi(ho già il Welsh-Elder "Introduzione al Pascal"per lo
standard).
Ho letto però che il TP 7 ha seri problemi a funzionare sugli Athlon e
,dato che tra qualche mese comprerò proprio un Athlon,non vorrei
gettare al vento i soldi del manuale sul TP 7,nè sprecare tempo a
programmare su un ambiente che poi non potrò usare più.
Domanda : a voi risulta che il TP7 abbia problemi a girare sugli
Athlon o posso stare tranquillo e comprarmi e studiare il manuale sul
TP7?
Vi prego,rispondete numerosi:pendo dalle vostre labbra!
Grazie infinite.

 ha scritto nel messaggio
news:3aab55d7...@news.libero.it...

SI , ci sono dei problemi con l'uso del CRT...esiste in rete una patch che ,
modificando un file *.tpu , risolve il  problema.
Cmq i tuoi programmi li puoi scrivere ugualmente...basta che non usi il crt.
Comunque se vuoi un consiglio, penso che ti basti il Welsh -Elder...non ti
conviene sprecare soldi per la guida al TP, anche perchè il Pascal lo userai
pochissimo nel corso di laurea in Informatica...piuttosto comprati la guida
completa del C: ti servirà in seguito!!! ^__^
Ciao
Fly

 SI , ci sono dei problemi con l'uso del CRT
[cut)
sapevo che il problema era con tutti i processori oltre una certa frequenza,
indipendentemente dal fatto che siano amd o intel.
ciao,
-- gabri

 ha scritto nel messaggio
news:98je27$2aost$2...@ID-53993.news.dfncis.de...

Si è vero, diciamo che poichè si parlava di Athlon, ho particolarizzato.
^_^
Fly
Newsgroup: it.comp.lang.pascal
Titolo: Qualcuno ha fatto l'orale di programmazioneA ad informatica all'univ di napoli?

Come da testo...
Com'č??

 Com'è??

A proposito che fascia di cognome sei?

Sto nel gruppo 3...Comunque l'ho fatto...Ho preso 24...
"Giovanni Ceglia" <giovann...@TOGLIQUESTOinwind.it> ha scritto nel
messaggio news:L8w6a.308470$AA2.11...@news2.tin.it...


Posso chiederti cosa t'ha chiesto?!?

 ha scritto nel messaggio
news:4Kb7a.327149$AA2.12...@news2.tin.it...


 E qualche ordinamento....
benissimo,  posso sostenere quest'esame :-))))))
--
Ciao
Gianfranco Marchese
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
sito internet personale: 
http://www.turbo-pascal.cjb.net
  Tutto sul Turbo
Pascal  1.5

Newsgroup: it.comp.lang.pascal
Titolo: reindirizzamento output DOS

Ho disperatamente bisogno di un programma che faccia in modo da poter eseguire
un qualsiasi comando DOS e che la risposta del DOS non vada sullo schermo ma in
un file di testo, cioe' l'output del DOS deve essere reindirizzato.
Come posso fare?
    Grazie a tutti coloro che mi aiuteranno
         Marco
-- 
Posted from  [212.171.80.80] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

"comando > nomefile.txt" ?
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it
(Life would be easier if I had the source code)

Newsgroup: it.comp.lang.pascal
Titolo: Libro introduttivo al pascal

Che libro mi consigliereste di cominciare a leggere per entrare nel
mondo Pascal?
Sono digiuno di tutto e adesso ho un po' di tempo libero per poter
finalmente leggere.
Devo iniziare dalla a alla zeta quindi vi pregherei se possibile di
indicarmi qualche buon testo facilmente comprensibile per entrare nel
la forma mentis del programma che dopo vorrei usare ossia delphi.
Grazie a tutti coloro che mi risponderanno
Ciao

 mondo Pascal?
Pascal
guida alla programmazione
andrea guidi
nazario renzoni
Mcgraw-hill libri italia srl
ciao

 ha scritto nel messaggio
news:8p70g0d7f0uakplnc...@4ax.com...

cerca pure qualche cosa in rete. nel sito in firma c'e' una guida creata da
me, oppure in altri siti, basta usare google, se poi conosci l'inglese
allora problemi non ne dovresti avere.
-- 
Ciao
Gianfranco Marchese
http://www.Turbo-Pascal.cjb.net
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
UIN icq 117743990
Newsgroup: it.comp.lang.pascal
Titolo: Ardua questione

Qualcuno sa dirmi perchè ad un certo punto il TP7 comincia a dare i numeri?
Ho sviluppato un algoritmo di calcolo speciale delle colonne che abbiamo una
certa proprietà in una matrice: funge tutto alla perfezione fino a quando la
variabile integer che contiene il numero delle colonne contate (si
incrementa con "col:=col+1;") comincia a decrementare anzichè incrementare,
stampando a video numeri tipo "-22.500"... Ho potuto calcolare massimo fino
a 32.000 circa, dopodichè comincia a verificarsi il decremento...
Qualcuno può aiutarmi?
Ciao,
Mendocino.

probabilmente hai usato variabili integer che arrivano ad un massimo di
32767, dopodichč viene incrementato anche il bit piů significativo che
rappresenta il segno, divenendo cosě negative. Per risolvere il problema
usa variabili word (max 65000 circa) o longint (max 2000000 circa).

Qualcuno puň aiutarmi?
Beh, semplice: il tipo integer va da un minimo di -32768 a 32767.
Per cui, una volta arrivato a 32767, ricomincia da -32768.
Usa il tipo word (che va da 0..65535) o il longint(che va da
-
2147483648
 a 
2147483647
).
<=- Negus -=>
www.infinito.it/utenti/negus80
 ... pascal, c++, asm

 >Qualcuno può aiutarmi?


 Mendocino.
 Usa il tipo LongInt invece del tipo Integer.

Newsgroup: it.comp.lang.pascal
Titolo: La Stampa

Vorrei spiegazioni su come è possibile stampare in pascal  mentre si utizza
la modalità grafica.
In pratica, componendo un qualsiasi disegno... come lo posso stampare?
Avete una unit che mi aiuti in questa mia esigenza?
Ringrazio tutti quelli che mi risponderanno.

 Avete una unit che mi aiuti in questa mia esigenza?
 
 Prova a cercare nei motori di ricerca, magari trovi
 una dll da cui esportare la funzione che ti interessa.
 Cerca anche nel sito del produttore della tua stampante,
 magari trovi qualche bel manuale tecnico, che spiega
 come pilotare la stampante tramite la porta parallela
 o seriale.

 ha scritto nel messaggio
news:slrn8uo1cj....@localhost.localdomain...


 di inviare i comandi grafici direttamente su stampante.
 Ripeto:
 
  1) Per cercare esistono dei siti chiamati "motori di ricerca"!
  2) La mia soluzione smanettosa: trovare nella lista degli
     interrupt di R.Brown quello che stampa lo schermo e dumpare
     la memoria a partire dall'indirizzo ivi puntato. :-))
Newsgroup: it.comp.lang.pascal
Titolo: protected

salve, potreste spiegarmi in una "class" come si usa una "protected"
e magari farmi un esempio funzionante?
grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

grazie
Il pascal non essitono le classi ( class ) ne gli oggetti statici (
object ) a dire il vero il pascal non è per nulla OO. La Borland sin
dalla versione 5 ( o dalla 5.5? boh ) a inserito gli oggetti statici
ma non avevano aree specifiche ( private, public, protected o
published ) dalla 6 ha introdotto il private e nell 7 ha introdotto la
public. e qui mi fermo perke è qui che si ferma la borland con il
pascal le altre duce ( protected e published ) sono di delphi quindi
ti rimando al suo NG ( it.comp.lang.delphi )
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596
-----------------------------------------------
Founder of MediaPlayer Project
http://mpp.iwebland.com

 "protected" e magari farmi un esempio funzionante?
nella programmazione ad oggetti metodi e campi possono
avere diversi "livelli" di visibilita', protected e' uno di questi
private - il metodo/campo e' visibile soltanto nella classe
che lo dichiara. In delphi/tp e' visibile soltanto nella unit
che contiene la dichiarazione della classe.
protected - il metodo/campo e' visibile nella classe che lo
dichiara e in tutte le classi eredi - delphi/tp in tutte le unit
che definiscono la classe e le classi eredi
public - visibile ovunque, all'interno come all'esterno della
classe.
In pratica andrebbero definiti private i metodi/campi che
caratterizzano l'implementazione della classe ma non
l'interfaccia, protected i metodi di utilita' che classi eredi
potrebbero riutilizzare ma che non vogliamo siano visibili
all'utilizzatore e public solo quelli necessari per l'uso
della classe da parte di un programma, ovvero i "servizi"
che la nostra classe fornisce.
Un esempio... mmhhh
beh una classe file potrebbe avere un campo Handle che
lo identifica come protected, in modo che chi usa l'oggetto
non possa fare danni (chiuderlo erroneamente o cose
strane) mentre classi eredi possono vederlo ed utilizzarlo
per esterndere il funzionamento della classe.
direi chiarezza zero in questo post :-)
-- 
Dreadnaut
(Life would be easier if I had the source code)
 
http://dreadnaut.servebeer.com/
Newsgroup: it.comp.lang.pascal
Titolo: CASE OF coi reali

Ciao a tutti...
    Vorrei sapere come mai l'istruzione ' case of ' non funziona coi tipi
reali  e se esiste qualche soluzione (che non siano gli IF annidati).
    Ringrazio in anticipo.

reali e se esiste qualche soluzione (che non siano gli IF annidati).
No, il linguaggio non consente di usare il 'case of' con i real.
Una ragione e' probabilmente il fatto che questo costrutto viene
utilizzato per generare dei salti 'veloci' nel codice, facendo uso di
confronti tra registri.
Non esiste altra soluzione che un IF annidato.
--
Andrea Laforgia
andrea_...@bigfoot.com

Prova a moltiplicare la tua variabile per 10,100 o 1000,etc.
faccio un esempio
uses dos,crt;
var r1:real;
    t1:integer;
begin
 r1:=3.14;
 t1:=round(r1*100);
 case t1 of
 314:writeln('3.14!!');
....
....
 end; (* end case *)
end.
Ciao Michele.
mnar...@libero.it

Newsgroup: it.comp.lang.pascal
Titolo: Caricare in memoria e stampare a video .bmp

Ciao a tutti,
                    ho osservato e studiato diverse procedure  ma nessuna
mi ha soddisfatto.
Dall' inizio scusate......
Voglio realizzare un videogames in Tp6
Ho sprite bitmap 20*20 e vorrei caricarli in memoria in variabili per poi
gestirli come mi pare e piace .
Che procedura usare ?
procedure load (namebtm :string ; namevar : bmptype);
Come fare poi a puttarla sullo schermo alle coord x,y
Grazie in anticipo.
c...@libero.it
cek

> Voglio realizzare un videogames in Tp6
se è uno solo la s non ci va!
: p
: )

 wrote in message 8582t2$fen$1...@nslave1.tin.it...

Anche se sono 2, in italiano tutte le parole straniere sono invariabili :)
Ciao,
-----
Giovanni Bajo
Lead Programmer
Prograph Research S.r.l.
http://www.prograph.it

 : )
--
Rimuovere *NOSPAM* per rispondermi
ICQ: 29141138 Nick name: Pierlo
mia pagina Web:  
users.iol.it/pierleo
Sito non ufficilale del Sony CRX100 e HP8100 ( e gli altri della serie):
 
http://www.freeweb.org/computer/SonyCRX100/
di Enrico S.

 wrote in message
387CBE96...@tiscalnet.it...


 Come fare poi a puttarla sullo schermo alle coord x,y
Dipende da ke risoluzione usi...
cmq la memoria video VGA inizia su A000:0000 puoi quindi spostare la tua
immagine dove vuoi...
Usi la modalità 13h? Se si' posso darti una mano!
--
Ciao,
Carlo.
- - -
e-mail: 
carl...@tin.it
 , 
bl...@supereva.it
My Home Page: 
http://blaze.supereva.it
My VisualBasic HomePage: 
http://www.ubi1k-vb.net/aree/winsock
My MP3 list: 
http://members.antionline.com/blaze/
ICQ UIN: 19128262
Newsgroup: it.comp.lang.pascal
Titolo: ragà help!!

non so se arrivano i miei msg...ma ne ho mandati già 2 scusate se sono
ripetitivo..ma mi servirebbe la procedura dell'ordinamento di un
array..con i cicli for annidati risp pls bye bye!!

...


 End.
La mia vuole solo essere una piccola precisazione: credo che il "<=" sia
inutile dato che non vedo l'utilità di scambiare 2 numeri uguali tra loro.
Un "<" andrà benissimo.
Ciao
--
KNOWLEDGE IS POWER
http://www.chameleon.f2s.com
http://chameleon.go.to

grazie a tutti!! :)

Solo per precisazione:
Per ottenere un ordinamento più effeciente sarebbe bene affidarsi ad
algoritmi di ordinamento più sofisticati che non ad un semplice scambio di
coppie!
Nello specifico ci si potrebbe rifare ad implementare il Bubble Sort,
Selection Sort, Insertion Sort, ma più efficaciemente l' Heap Sort!
Il tutto, ovviamente, dipende dalle particolari esigenze cui il programma
deve sottostare:
- semplicità di utilizzo
- facilità di implementazione
- efficienza dell'algoritmo
etc.
Ciao Bersny

Selection Sort, Insertion Sort, ma più efficaciemente l' Heap Sort!
Io conoscevo il QickSort o MergeSort (per vettori più grandi dello
spazio disponibile)
cosa sono in parole pover  il (forse li conosco ma non li so associare
al nome)
Selection Sort ???
Insertion Sort  (è forse un avanzamento in un array o meglio lista
ordinata finche non si trova la posizione adatta con eventuale
scrolling, solo per l'array dei dati successivi???...Sfigatissimo se
si parte da una sequenza invertita)
Heap Sort Spiegami il principio di funzionamento, mi ispira fiducia.
UHM... Forse ricordo qualcosa si tratta forse di creargli un indice?
Vettore  indice
47	2
35	1
102	4
94	3	
Grazie per le eventuali delucidazioni.

Newsgroup: it.comp.lang.pascal
Titolo: Avete creato dei programmi?

Avete creato dei programmi?
Ho creato un sito nel quale vorrei raccogliere tutti i programmi fatti dai
giovani programmatori italiani(fatti con tutti i programmi e per tutte le
piattaforme), i migliori link, e che potesse servire come vetrina di quello
che si può fare con un linguaggio di programmazioni.
Vorrei che fosse inoltre un posto dove poter trovare programmi per tutti i
gusti,alternativi ai costosissimi programmi commerciali.
Il sito contiene anche una sezione dedicata alle faq su Linux
Visitate il sito e scrivetemi se volete inserirvi le vostre applicazioni e
tutto ciò che volete.
http://programmi.terrashare.com

 
http://programmi.terrashare.com
Guarda sul mio sito : 
web.tisaclinet.it/Airex
 ... lě ci sono alcuni miei
programmi, se sono di tuo interesse inserisici un link alla mia Hp nel tuo sito
o prendi i file che ti interessano e , se possibile , inserisci un nota con
l'indirizzo da cui li hai presi.
A presto....
Newsgroup: it.comp.lang.pascal
Titolo: DATA BASE

1) Nei data base come si costruisce una tabella usando i comandi SQL
(create table; select; create wiew; etc. ....)
2) Riguardo ai dati, nei data base, che cosa significa integrità
semantica,
integrità di contesa, integrità referenziale.
Vi ringrazio anticipatamente del vostro aiuto.
Rocco.

 
SELECT campi FROM tbl_origine INTO tbl_destinazione
bye!
-- 
Emanuele Cesena                 
http://www.penguinpowered.com/~ecesena
ece...@penguinpowered.com
                 Attenti all'antispam NOSPAM
"Preoccupati delle pagliuzze e le travi si arrangeranno da sole", legge di
Peter sulla Sostituzione

Newsgroup: it.comp.lang.pascal
Titolo: Borland Turbo Pascal 7.0

C'è un sito dove posso scaricarlo, o bisogna necessariamente acquistarlo?

http://www.crackstore.com/tools
  per la 9999999E+99999 volta  :-)))))))

Sul mio sito, ovviamente!   -> 
http://digilander.iol.it/darkbytes
Alex ha scritto nel messaggio ...



Ma sarebbe estremamente più carino acquistarlo, anche perchè non cosa 
questa grandissima cifra!
http://www.itshop.it/
  =>  Lit. 167.000
-- 
Andrea Zwirner
yuppi...@yahoo.it
"Poni ciò che sei nel minimo che fai."

Newsgroup: it.comp.lang.pascal
Titolo: Saluti!

Salve a tutti!
Sono un neofito del Pascal e Turbo Pascal .Mi piacerebbe scambiare pareri
sulla
progammazione con chi ne abbia voglia.
Avrei un quesito da porre : come faccio in modalità grafica a "plottare"
una
funzione matematica.GRAZIE in anticipo per le risposte.Rispondete anche 
alla mia e-mail.
 
lui...@tin.it
 

...

Prendiamo una funzione a caso, ad es. y=3x^2-2x+4
Allora:
- fai variare la x da 0 a GetMaxX (il n° max di pixel in orizzontale), con
un ciclo FOR
- calcoli la y (es. y:=3*x*x-2*x+4)
- disegni il punto.
In questo modo ottieni una successione di punti.
Se vuoi puoi unirli, allora fai una lienea da un punto a quello
successivo... scegli un po' tu.
Se vuoi aumentare la precisione, puoi far variare una variabile ciclica
(invece della x), e calcolare la x in funzione di questa.
Ad es:
var i:integer;
      x,y:real;
for i:=0 to 6400do
   begin
      x:=i/10;
      y:=3*x*x-2*x+4;
      putpixel(round(x),round(y),15);
   end;
Ciao
Emanuele Cesena
d.a.m...@iol.it
Newsgroup: it.comp.lang.pascal
Titolo: guida per pascal  e lazarus

Salve ragazzi , sono nuovo qui' ,spulciando in giro ho scoperto di 
lazarus ambiente di programmazzione visuale simil delphi che esiste sia 
su windows che su linux per questo ora vorrei imparare a programmare in 
pascal ma mi servirebbe qualche guida da stamparmi e magari una che 
parli della gestione ad oggetti se avete qualche link sarebbe ben accetto
per ora so programmare nei vari dialetti basic tipo visualbasic so 
qualcosina ina ina in C++ e conosco l' assembler 68XXX come le mie tasche
grazie dell' aiuto
www.freelanders.it

 wrote:
[Cut]
Per il pascal e lazarus potresti dare un'occhiata su 
www.freepascal.org
.
La documentazione è ben fatta ed è rigorosamente in inglese.
Ciao.
-- 
« Invento ergo sum »
[G]reedy[F]ly aka Shuren @ 
irc.azzurra.org
Powered by Slackware Linux
Linux User #283140
GPG Public Key 
http://www.cucciolo.net/pub/michele/michele.asc

 
E una rigorosamente in italiano ?
www.freelanders.it

Newsgroup: it.comp.lang.pascal
Titolo: Come Intercettare il key up da tastiera.

Non sono molto esperto di Pascal e attualmente sto programmando con il BP
7.0 per Dos. Mi sapete indicare come intercettare lo schiacciamento ed il
successivo rilascio di un tasto sulla tastiera. Mi interessa capire quanto
tempo il tasto sta premuto.
Grazie

 wrote:

E' possibile farlo con l'istruzione port[$60].
Se il valore e' minore di 128 significa che l'ultima operazione
eseguita sulla tastiera e' stata la pressione di un tasto, mentre se
il valore e' maggiore di 128 sinifica che un tasto e' stato
rilasciato. Ogni tasto della tastiera ha un valore minore di 128 e
quando questo viene premuto port[$60] assumera' questo valore. Se poi
questo tasto viene rilasciato port[$60] assumera' tale valore + 128.
per esempio quardati questo programmino:
program	tasto;
uses	crt;
var	t:byte;
	c:char;
begin
   writeln;
   repeat
	t:=port[$60];
	writeln(t);
	if keypressed then begin
	     c:=readkey;  (*svuotamento buffer tastiera*)
	     if c=#0 then c:=readkey
	end
   until t=1     (* pressione tasto esc *)
end.
bye,  fabio
fabi...@rocketmail.com
Newsgroup: it.comp.lang.pascal
Titolo: Cursore con la grafica

Scusate, sarei veramente grato se qualcuno sapesse dirmi come si fa a far
apparire il cursore mentre si sta utilizzando la modalità grafica (con la
unit graph). Mi servirebbe per far sapere all'utente quando sta per inserire
un dato.
Grazie mille
ciao
MArco
P.S.
Colgo l'occasione per ringraziare tutti coloro che hanno risposto ai miei
precedenti messaggi.

 
non esiste il cursore... devi disegnarlo tu :-)
bye!
-- 
Emanuele Cesena                 
http://www.penguinpowered.com/~ecesena
ece...@penguinpowered.com
                 Attenti all'antispam NOSPAM
"Jean Jacques Dormi'  Jean Jacques Russo'"
		-- Riccardo Cassini

bye!
Ciao
Grazie
MArco

un dato.


 
io ti consiglio questa soluzione: riscrivi una tua versione di readln,
puoi chiamarla readgraph :-)
La funzione e' basata sul readkey, e, quindi, legge carattere per
carattere cio' che digiti, ed accoda il tutto ad una stringa.
Devi gestire i caratteri speciali, per esempio BackSpace per cancellare.
Altro carattere speciale e' Invio: premendolo la funzione termina e
ritorna la stringa.
La stessa funzione e' molto duttile, per cui puoi aggiungere varie finezze,
tra cui sicuramente il cursore, ossia un rettangolino che ad intervalli 
regolari si accende e si spegne.
Poi potresti gestire l'input di stringhe a lunghezza fissa, per esempio non
piu' di tot caratteri.
Altra cosa, puoi modificare il significato di alcuni caratteri (se
ti puo' servire...).
Devo scappare. bye!
-- 
Emanuele Cesena                 
http://www.penguinpowered.com/~ecesena
ece...@penguinpowered.com
                 Attenti all'antispam NOSPAM
"The show must go home."
		-- Piero Scamarcio (e lo Scippatore di Emozioni) (Toti & Tata)

 Come si fa in gerene?
Segui lo schema:
    ch: char;
    ...
    ...
    repeat
        while not keypressed do
            begin
                codice che disegna/cancella il cursore nella posizione
corrente
            end;
            ch := readkey;
            case ch of
                ...
                ...
            end;    { fine case }
    until ch=#13; { #13 = invio }
    ...
    ...
Ciao!
Simone
_____________________________________________
"....c'e' vita nell'universo ?"
"Giusto un po' il sabato sera...."
            C.Guzzanti
e-mail:  
drfa...@libero.it
 
drfa...@tiscalinet.it
 
drfa...@tin.it
web:     
http://www.tiscalinet.it/drfalken
 
http://free.prohosting.com/~drfalken
ICQ#:  19598133
_____________________________________________

Newsgroup: it.comp.lang.pascal
Titolo: prova non leggere

perchè lo hai letto? ti hoi detto cvhe è una prova....

Perchč non avevo nulla di meglio da fare!!!! :-)
--
Posted from 
twingo.tiscalinet.it
 [195.130.224.85] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:8jv4ih$2m6$1...@sirmdpsin17.inwind.it...


 
mattacchione. informati su it.test...
Newsgroup: it.comp.lang.pascal
Titolo: dati compressi

come si fa a convertire un valore letto da un file di record compresso? mi
spiego meglio: il valore numerico è compresso, esiste qualche funzione che
lo converte in chiaro?
Ciao, Grazie


wrote:

? In ke senso è compresso... dove lo peschi?
cmq ke io sappia no...
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596

Newsgroup: it.comp.lang.pascal
Titolo: 4 domande

E' la seconda volta che propongo queste domande, spero che ora qualcuno mi
risponda (anche solo a qualcuna) o mi dia dei links utili:
1) cosa sono le equazioni ellittiche, qual è la loro utilità e come sono
implicate nella dimostrazione di Wiles del Teorema di Fermat, nonché nel
Teorema di Tanihiama-Shimura?
2) forse mi sono confuso, ma esistono gli orbitali in matematica? se sì,
cosa sono? dovrebbero centrare con la composizione di funzioni...
3) esiste il "coseno parabolico", come quello iperbolico (insieme alle altre
funz. goniometriche naturalmente)?
4) qualcuno mi sa dare informazioni su trasformazioni del piano non linari
(tipo x'=ax^n+bx^(n-1)+....vx^2+wx+z; y'=...)?
Grazie
Ciao

you wrote:

it.scienza.matematica
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------
#exclude <windows.h>

Andrea Laforgia ha scritto:

Si penso anch'io!!!

 Si penso anch'io!!!
Vabbe'....ma cancellare il resto del post, no ?

 Vabbe'....ma cancellare il resto del post, no ?
Ok hai trovato il pelo nell'uovo :-)
MaTTeO.

Newsgroup: it.comp.lang.pascal
Titolo: opzioni

ciao a tutti, di turbo pascal capisco solo il poco che ho imparato a scuola,
ma volevo provare a programmare un po', qualcuno potrebbe indicarmi un
compilatore freeware/shareware o gratuito ;) e magari un paio di siti che
riportano esempi di programmazione, piccoli manuali... qualcosa di semplice
x iniziare insomma :)
Ciao e grazie.
Claudio.

si scusate, il titolo non c'entrava proprio niente :)

Un buon compilatore free č il FreePascal. Lo tro vi al sito
www.freepascal.org
č un compilatore dos o linux a linea di comando.
Al sito 
www.crackstore.com
\tools trovi anche il Turbo Pascal 7 (Io ti
consiglio questo) in tutto sono al massimo 2Mega.
I Manuali su internet te li devi cercare con i motori di ricerca ce ne sono
un'infinitą(in inglese).
Ti posso perņ consigliare un libro: Guida Completa al Turbo Pascal 7 della
McGrawHill; č un pņ caro(75.000) ma ne vale la pena.
CIAO!! :-)
Claudio Agosti <claudio@DIO&MADONNAmatrice.it> wrote in message
87ojrq$ful$1...@news.IT.net...
