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

Salve, ho qualche problema con il TP7. Quando uso CRT il programma mi dà la
scritta: "Error 200: division by 0". Sul sito della  Borland c'è scritto che
il problema viene alla luce quando tp7 viene fatto girare su pc + veloci del
PentiumPro (ho 1 Celeron 450) e consiglia di scaricare una patch. Problema:
dove trovarne una con istruzioni chiare possibilmente in Ita, ma anche in
Inglese? Io ne ho trovate qualcuna, ma erano in tedesco, a cura di una
Università Finlandese................!!
Help Help...
Grazie
--
M&C
cln...@tin.it

 ha scritto nel messaggio
news:#v$6quC0A...@cwnts22.ciaoweb...


 ha scritto nel messaggio
news:#v$6quC0A...@cwnts22.ciaoweb...


DarkByte... ma non mi ricordo l'indirizzo...
WOWWWW RAGAZZIIIIII Sono DArkbyte (Cioè Vegeta... doppia identità)...
Purtroppo il mio sito non esiste più, ma a quanto pare devo ripubblicarlo...
presto detto.... a presto raga....

Newsgroup: it.comp.lang.pascal
Titolo: Alberi

Sapete come si implementa un albero in pascal ?
c'e' qualcuno che puo' mandarmi qualche esempio
il mio indirizzo e'
lca...@omniway.sm
Grazie 1000 Luca

...





Intendevo albero in generale, comunque anche binario va bene lo stesso, mi
serve per prepararmi a un esame.
Grazie Luca

...

Un albero in generale diventa una struttura piuttosto difficile da gestire,
comunque (se non sbaglio) c'è un teorema o qualcosa che dice che ogni albero
può essere ricondotto ad un albero binario... non chiedetemi come :-)
Per quanto riguarda l'albero binario, la struttura è tipo:
type
 PNodo=^TNodo
 TNodo=record
    Elemento:pointer;
    Sinistra:PNodo;
    Destra:PNodo
end;
(capisci bene anche tu che se invece di Sinistra e Destra avessi una lista
di possibili rami... la cosa si complica non poco, soprattutto ti serve una
mem infinita...)
Questo è un nodo dell'albero... nell'albero ci metti la radice ed un po' di
procedure per Gestire... tipo inserimento, cancellazi0one, ricerca,
dimensione e profondità, modifica tutto i nodi (per es. aggiungendo 1...) e
infine i confronti tra i nodi (Uguale, Minore)
Ciao ciao
Emanuele Cesena
d.a.m...@iol.it
ICQ n° #10570672

Sapete come si implementa un albero in pascal ?
Un albero e' solitamente implementato in questo modo :
type  puntatore_foglia = ^foglia;
         foglia = record
                        < definizione dei dati della foglia >
                        sotto_albero0 : puntatore_foglia;
                        sotto_albero1 : puntatore_foglia;
                        .
                        . 
                        sotto_alberoN : puntatore_foglia;
                     end;
Nel caso particolare di un albero binario sotto_albero0 e sotto_albero1
diventano sotto_albero_sinistro e sotto_albero_destro (o viceversa).
 
 
 
Andrea Laforgia
(remove NOSPAM from my address before reply via e-mail)
ICQ #8328956

mem infinita...)
?
Come ? Non è detto che si intenda un numero infinito di figli (Anzi ad
essere rigorosi nella definizione ricorsiva di albero si parla di un numero
FINITO di sotto-alberi).
Samuele Sadocco
samu.s...@dada.it

end;
A dire il vero una procedura un po' piu' compatta mi sembra :
procedure visita (t:tree);
begin
          if (t <> nil) then
          begin
               write (t^.key);
               visita(t^.left);
               visita(t^.right);
          end;
end;
La quale tra l'altro supporta anche il caso che la radice sia NIL , ovvero
l'albero sia vuoto.

Newsgroup: it.comp.lang.pascal
Titolo: [OT] Codici a barre e lettori di codici a barre...

Prima di tutto mi scuso per l'OT...
Vorrei sapere questo:
- Quali sono le informazioni contenute in un codice a barre?
   In particolare sono interessato ai codici a barre presenti sulle
copertine delle riviste...
- Acquistando un lettore di tali codici, come posso trattare le informazioni
che esso acquisisce?
Mi scuso per l'ignoranza in merito... mi piacerebbe saperne di più...
Grazie a coloro che vorranno rispondere!!!!!


In linea di massima un codice a barre č un codice composto da: un asterisco 
di apertura, un numero, un asterisco di chiusura.
ES.
    	*123456789*
Un lettore di codice a barre non č altro che un dispositivo che viene 
installato nel PC nell'entrata della tastiera che in vece dell'utente 
digita il codice e preme INVIO.
Io personalmente non l'ho mai provato, anche se fra poco dovrň implementare 
un mio programma in Delphi con un lettore del genere, comunque teoricamente 
in pascal con un ciclo del tipo seguente dovresti leggere tutto quello che 
da in input un lettore di codici:
Ripeti
  Scrivi il tasto premuto.
Fino a quando il tasto premuto non č uguale ad ESC
Scusa se sono stato vago, comunque all'interno della confezione in cui c'č 
il lettore di codici a barre viene spiegato tutto.
-- 
Andrea Zwirner
yuppi...@yahoo.it
"Poni ciň che sei nel minimo che fai."

 che esso acquisisce?
Guarda qui per una intro ai codici a barrre:
http://www.isrds.rm.cnr.it/HyperDocs/issn/Icode.html

Newsgroup: it.comp.lang.pascal
Titolo: non riesco a fare un prog. con i file

Perchè questo semplicissimo programma non funge?
program provaprovinoprovetto (testo,output);
var testo:text;
      ch:char;
begin
   reset(testo);
   while not eof (testo) do
   begin
      readln(testo,ch);
      write (ch);
   end;
end.
Mi dice "file not assigned"
Eppure il file testo.txt esiste e si trova nella stessa dir del file
pas
dove sbaglio?
______________________________
e-mail:  
Aur...@hotmail.com
ICQ:     16005054

dove sbaglio?
"testo" e' solo il nome della variabile che usi nel programma, non ha
alcuna attinenza col nome "testo.txt" del file.
Se non assegni alla variabile di tipo file il nome del file da
leggere, non ti e' possibile gestirlo.
Devi anteporre a reset(testo); il comando :
assign (testo, 'testo.txt') ;
Newsgroup: it.comp.lang.pascal
Titolo: dove far vedere i propri prog ?

Sono alle prime armi e avrei alcuni prog.
da fare controllare a qualche esperto pazienzioso.....
Che si puo' fare ??
siti,newsgroup,tramite e-mail ,etc....??
tnx 1000 in anticipo
Cek
c...@libero.it

 
puoi iniziare a postare qualcosa di breve qui sul NG... oppure
qualche pezzo di prog. piu' lungo/complesso.
Vedrai che gli aiuti non mancheranno, sempre che tu sia ben disposto
ad apprendere :)
bye!
-- 
Emanuele Cesena                 
http://www.penguinpowered.com/~ecesena
ece...@penguinpowered.com
                 Attenti all'antispam NOSPAM
/*
 * [...] Notate che 120 secondi e' definito nel protocollo come il
 * massimo RTT possibile.  Io credo che dovremo ricorrere a qualcosa di
 * diveso dal TCP per fare talk all'Universita' di Marte.
 * PAWS ci permette timeout maggiori e finestre piu' larghe, cosi', una
 * volta implementato, l'ftp verso Marte funzionera' bene.
 */
		-- Tradotto dal vecchio /usr/src/linux/net/inet/tcp.c,
		   commento inerente l'RTT (Round Trip Time)
Newsgroup: it.comp.lang.pascal
Titolo: Volevo sapere...

Volevo sapere come si potrebbe gestire il controllo di dati inseriti da
tastiera.
Ad esempio pongo la domanda dgt S o N come si puň fare per poter evitare che
il programma si blocchi se si dgt un carattere diverso o numero?
Vorrei visualizzare sullo schermo la dicitura Tasto errato
digitarne uno nuovo.
Un altro caso di cui ho bisogno di aiuto č quello di fare in modo che
l'utente non possa digitare caratteri diversi dall' 1 al 10?
Aiutatemi vi prego
Devo consegnare il progetto con questi con controlli per evitare di far
bloccare il programma entro lunedě
Grazie

 l'utente non possa digitare caratteri diversi dall' 1 al 10?
qui cambia..
leggi la var
repeat
read(numerointeger);
until (numero<=10) and (numero>=1)
ciao, Augusto

    until (ord(lettura)=ord('S')) or (ord(lettura)=ord('N'));
le ord non servono
Lettura naturalmente va dichiarata
Var Lettura : byte;
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 ha scritto nel messaggio
news:4wC18.1862$RQ5....@news1.tin.it...


 Var Lettura : byte;
ma se noi mettiamo cerchiamo di mettere in una var byte
un carattere fa un po casino no? almeno con
readl(lettura)
e mettiamo un carattere un bel error numeric format lo abbiamo
non possiamo neanche fare
a:=readkey;
se la var a č di tipo byte no?
usiamo una var di tipo char, il ciclo a me sembra giusto, l'ho provato
su tp7 e funziona...

 GRAZIE
until (ord(lettura)=ord('S')) or (ord(lettura)=ord('N')) or
(ord(lettura)=ord('s')) or (ord(lettura)=ord('n'));
o piů bello
until (ord(upcase(lettura))=ord('S')) or (ord(upcase(lettura))=ord('N'));

 until (ord(upcase(lettura))=ord('S')) or (ord(upcase(lettura))=ord('N'));
o piuuuu' bello ancora
until ord(upcase(lettura)) in ['S','N'];
raga esistono gli insiemi !!! usateli :-)
(servono a stecca)
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it
(Life would be easier if I had the source code)

 raga esistono gli insiemi !!! usateli :-)
sai che non li ho mai usati? com'è che funzano??
in []
nelle parentesi quadre posso mettere ciò che mi pare?
costanti e anche variabili? please help.

 costanti e anche variabili? please help.
un buon punto di partenza e' l'help di 'set' :-)
puoi usarli solo con elementi costanti ed enumerabili
(byte, char, cost. simboliche e tutto cioe' che puo'
essere messo in corrisp. biunivoca con i byte)
ti faccio un esempio con i char che spiega tutto :-)
 var
   c: char;
dove di solito metti
if  (ord(c) > 64 and ord(c) < 91) or
    (ord(c) > 96 and ord(c) < 123) then...
puoi sostituire
if c in [ 'A'..'Z', 'a'..'z' ] then
che e' un po' piu' leggibile :-)
poi puoi definire variabili set of <tipo enumerabile>
e le operazioni + - * su di esse hanno effetto di
unione, differenza e interesezione...
ciao

Newsgroup: it.comp.lang.pascal
Titolo: Memoria con TURBO PASCAL 6

Avrei un problemino.
Ho realizzato un prg in TP6 che apre e chiude files,
ha procedure in assembler, effettua chiamate ai driver,
...
Il problema??
Dopo 2600 linee di cosice..... la memoria termina.
Cosa fare per aumentare la memoria: cappero, ragazzi, ho
64 Mb di RAM.... non é possibile che se ne possa usare
solo 640 Kb.
Mailatemi numerosi.

...

Allora, hai 2 soluzioni: impari ad usarti i gestori di memoria tipo XMS ed
EMS (io personalmente non ne so nulla!!)
Compili il tuo codice in modalità protetta a 32 bit... e allora la memoria è
tutta uguale, e ne puoi usare da 1Mb a 2Gb :-)
Comunque, 2600 linee non sono poi un'immensità: non puoi ottimizzare un po'
di più?? :-)
Ciao
Emanuele Cesena
d.a.m...@iol.it
ICQ n° #10570672
http://www.geocities.com/SiliconValley/Grid/8879
"Il proiettile in arrivo ha diritto di precedenza"

Potresti, suddividere il programma in moduli ( Unit ) ed usare la
programmazione con gli overlaid, che ti cinsentono di usa la memoria espansa
( max 16 Mbytes ), caricando la unit in memoria convenzionale solo quando
effettivamente il programma ne necessita. Gli overlaid sono nati per questo,
inizialmente le unit risiedevano su disco fisso, e quindi il caricamento era
lento, ma puoi appunto caricarli tranquillamente in memoria espansa, quindi
nettamente più veloce.
-------------------------Ciao
----------------------------------Davide
-------------------------o00o----o00o--------
-------------o00o----o00o--------------------
-o00o----o00o--------------------------------
No Spam, to cut : o00o

nettamente più veloce.
E come si fa???

Newsgroup: it.comp.lang.pascal
Titolo: da dove inizio?

Ho l'impegno e un libro ma...dove inizio a digitare il mio primo PROGRAM
pascal????
devo scaricare qualcosa???
grazie JUNIOR!!!

 devo scaricare qualcosa???
magari il compilatore......

scaricati il compilaatore turbo pascal 7  su 
www.crackstore.com
 sulla
sezione tool
Newsgroup: it.comp.lang.pascal
Titolo: Cercare in Pascal

Ragazzi e Ragazze, ho bisogno del vostro aiuto. Sto facendo una specie di
database in Pascal, cioč ho inserito informazioni riguardanti delle
macchine. Ora: io vorrei che quando il computer mi chiede "Inserire il
modello:" io possa inserire "Mercedes" e lui mi trovi tutti i modelli della
Mercedes. Come si fa?
Esempio:
Io nel file Quattroruote.pas ho messo come informazioni cosě:
writeln('Mercedes Classe A 190, cilindrata 1.898 cm3, 3/5 porte');
writeln('Mercedes Classe A 200, cilindrata 1993 cm3, 3/5 porte');
Ecc... Poi ho messo anche:
writeln('Inserisci il modello che vuoi cercare:');
readln(Modello)
Ora: come faccio a far sě che se io inserisco Mercedes Classe A 190, mi dia
le informazioni date nel writeln? Cioč:
Mercedes Classe A 190, cilindrata 1.898 cm3, 3/5 porte
Spero di essere stato chiaro!
P.S.: quale č la combinazione per farsě che mi esca il simbolo dell'euro e
anche il numero 3 perň in apice? (Es: Alt Gr + ?)
Matteo

 Mercedes. Come si fa?
[...]
intanto dovresti dirmi che tipo di database e', (array paralleli, record,
ecc)
--
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

anche il numero 3 però in apice? (Es: Alt Gr + ?)
Mmmm... non credo che sotto msdos di possa fare.
NM
PS: meglio le BMW.

Spero di essere stato chiaro!
anche io spero di essere stato chiaro....

Newsgroup: it.comp.lang.pascal
Titolo: Grafica in (turbo) pascal

Ciao a tutti!!
  sono uno studente di Milano e sto cercando un fantomatico quanto per ora
inesistente libro di pascal intitolato appunto "Grafica in (turbo) pascal".
  Se qualcuno avesse notizie, consigli, siti o libri da darmi gli sarei
molto grato.
  Luigi Nodari
 
Noda...@promo.it
--
Posted from 
grus.promo.it
 [194.243.49.2]
via Mailgate.ORG Server - 
http://www.mailgate.org

  
Noda...@promo.it
Un sistema semplicissimo e' lanciare graphics dal dos e poi stampare
il video dal programma con il tasto Stamp.
Bye,   Fabio.
fabi...@rocketmail.com

Scusate, volevo rispondere ad un'altro post.
fabi...@rocketmail.com
Newsgroup: it.comp.lang.pascal
Titolo: algoritmo che mi crei i pezzi del TETRIS!!!

C'è qualcuno che mi può mandare un'algoritmo (procedura) che mi crei su una
matrice 4x4 (partendo da 1 --> 1..4, 1..4) un pezzo del tetris a caso,
settando a 1 le celle occupate dal pezzo e a 0 il resto. Grazie in anticipo.
fru...@geocities.com

settando a 1 le celle occupate dal pezzo e a 0 il resto. Grazie in anticipo.
Eccoti il programma :
{$x+}
uses crt;
type tipo_matrice = array [1..4, 1..4] of boolean;
var pezzo : tipo_matrice;
procedure azzera_matrice(var p : tipo_matrice);
begin
  fillchar(p, 16, integer(false));
end;
procedure crea_pezzo(var p : tipo_matrice);
var x, y, i, d : integer;
begin
  x := random(4)+1;
  y := random(4)+1;
  p[x, y] := true;
  for i := 1 to 6 do
  begin
    d := random(4);
    case d of
      0 : if (y > 1) then dec(y) else dec(i);
      1 : if (x < 4) then inc(x) else dec(i);
      2 : if (y < 4) then inc(y) else dec(i);
      3 : if (x > 1) then dec(x) else dec(i);
    end;
    p[x, y] := true;
  end;
end;
procedure disegna_pezzo(p : tipo_matrice);
var i, j : integer;
begin
  for i := 1 to 4 do
    for j := 1 to 4 do
    if p[i,j] then
    begin
      gotoxy(i*2, j);
      write(#219#219);
    end;
end;
begin
  randomize;
  repeat
    clrscr;
    textcolor(random(15)+1);
    azzera_matrice(pezzo);
    crea_pezzo(pezzo);
    disegna_pezzo(pezzo);
    delay(5000);
  until keypressed;
end.
Andrea Laforgia
----------------------------------------------------------------------
Sto facendo il militare.....vi rispondo tra una o due settimane !!! :)

Newsgroup: it.comp.lang.pascal
Titolo: SITI PORNO SCIOCCANTI

http://happyportal2000.iscool.net
 
http://www.happyportal2000.too.it
http://happyportal2000.cjb.net
http://happyportal2000.3000.it
 
http://happyportal2000.da.ru
http://happyportal2000.xredirect.com
Responsabile Marketing
Erika Pieroni
0
0
0
0
0
0
0
0
0
0
080
9
80
89
0
8
08909

 Erika Pieroni
ma su it.comp.lang.pascal, cioè
Italia.Computers.Languages(programming).Pascal, non si dovrebbe trattare
solo di Pascal?????
Newsgroup: it.comp.lang.pascal
Titolo: Cornice di asterischi...

Ciao
ho un problema :
come faccio utilizzando le procedure, a fare una cornice  di asterischi
come questa?
      *****************
      *               * 
      *               *
      *               *
      *               *
      *               *
      *****************
Grazie.
-------------------------------------------------------
Messaggio inviato da 
http://www.sandlab.org/newsgroup/
Accesso gratuito via web ai Newsgroup

Guarda nell'help la procedura gotoxy, serve per spostare il cursore nella
posizione desiderata.
Ciauz
--
KNOWLEDGE IS POWER
http://www.sverzat.com
¯`·.           .·´¯`:
'·.   .`·.   .·´.   .·'
   `:--·´   `·--:´
      `·. '_' .·
        ;`·-·´;

Ecco ciò che cerchi
(************************************)
uses crt;
const a:char='*';
var x,y:integer;
procedure alta;
begin
for x:=1 to 79 do
begin
gotoxy(x,1);
write(a);
end;
end;
procedure bassa;
begin
for x:=1 to 79 do
begin
gotoxy(x,25);
write(a);
end;
end;
procedure lato(where:integer);
begin
for y:=1 to 24 do
begin
gotoxy(where,y);
write(a);
end;
end;
begin
alta;
bassa;
lato(1);
lato(26);
lato(52);
lato(79);
readln;
end.

 ha scritto nel messaggio
news:a5dtrb$6e8d8$1...@ID-84487.news.dfncis.de...


tutti postano metodi... ne metto uno anch'io :-)
questo ti permette di arrivare fino all'ultima riga e all'ultima colonna
dello schermo senza far scattare lo scrolling, e non sposta la
posizione del cursore
 type
  CrtMap16  = array [1..50,1..80] of word;
 var
  CrtMem16 : CrtMap16 absolute $B800:$0000;
 procedure Cornice(y1,x1,y2,x2,fore,back,ch: byte);
{ y1, x1 : angolo alto sx / y2, x2 : angolo basso dx
   fore : colore testo / back: colore sfondo
   ch : codice carattere bordo }
  var
   x,y : byte;
   att : word;
  begin
   att := (back shl 12) + (fore shl 8) + ch;
   for x := x1 to x2 do
    begin
     CrtMem16[y1,x] := att;
     CrtMem16[y2,x] := att;
    end;
   Inc(y1);
   Dec(y2);
   for y := y1 to y2 do
    begin
     CrtMem16[y,x1] := att;
     CrtMem16[y,x2] := att;
    end;
  end;
es:
Cornice(1,1,25,80,12,4,ord ('*') );
--
Dreadnaut
(Life would be easier if I had the source code)

Newsgroup: it.comp.lang.pascal
Titolo: pascal: come lo faccio partire?

Salve, ho scaricato il free-pascal per win (un file  zippato di 22
Mb).
l'ho scompattato, ho eseguito il file insatlla exe e il programmma si
è installato su una directory chiamata "pp"
Adesso come faccio a farlo partire? non vedo nessun file eseguibile.
Dato che sto leggendo i fondamenti di pascal voglio iniziare a fare
qualche esercizio

 ha scritto nel messaggio
news:3adbed2...@news.libero.it...

Newsgroup: it.comp.lang.pascal
Titolo: Dinamic String

How declare a dinamic string? (A string that lenght is not predefine)
and how use it?

In Turbo Bascal is not possible (you must use a dynamic array) in Delphi 
use SetLenght function

( TC - news:MXH4f.16605$
Pe2.3...@twister2.libero.it
 )
in turbo pascal puoi dichiarare una stringa semplicemente come 
var
 s : string;
ed essa non avra' alcuna lunghezza predefinita. Come tutte le stringhe 
turbo pascal e' pero' limitata a 255 caratteri. Se ne hai bisogno di piu', 
puoi utilizzare il tipo PChar e la unit Strings.
in Delphi e altri dialetti le stringhe sono gestite diversamente, e hanno 
limiti piu' ampi - ti consiglio ti specificare quale compilatore usi, ed 
eventualmente controllare nella sua documentazione :)
-- 
Dreadnaut - 
http://dreadnaut.servebeer.com/
(Life would be easier if I had the source code)

 
E magari parlare italiano, visto che questo è un NG della gerarchia it.*
-- 
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
MSN   : 
IlRazz...@netscape.net
ICQ   : 67552596
Yhaoo : Razziatore82
-----------------------------------------------
Founder of MediaPlayer Project
http://mpp.iwebland.com

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

 
ATEC...@GEOCITIES.COM

Napoli, 29/09/99
qual'č l'indirizzo?
Tony
Negus ha scritto nel messaggio <01bf06d2$2abb9ae0$61557bd4@fabrizic>...


Newsgroup: it.comp.lang.pascal
Titolo: winzoz 2000

Grazie al cielo ho letto il post di Mark.......
Stavo proprio per formattare il mio disco rigido ri partizionarlo per
installare WINDOWS2000 e LINUX......
Come č questa storia che il turbo pascal non funziona???
Se non sbaglio qualcuno ha parlato di DOS emulato o sbaglio??
Se win2000 ha un dos emulato perchč non dovrebbe girare il TP7?
io ho win ME e neanche questo ha un dos reale, perň il TP7 gira
benissimo..... che differenza c'č??
Ma veniamo al dunque, siccome sono seriaente intenzionato a combiare
il mio OS ( e linux č ancora troppo per me) come farň a programmare in
pascal con win2000.... il freepascal cosa h di diverso dal TP7?
Quante domande.... ci hai rotto le ba@@e      :))))
grazie a tutti
---------------------
Saluti da Ulysse
Considerate la vostra semenza:
fatti non foste per viver come bruti 
ma per seguir virtute e conoscenza.

 benissimo..... che differenza c'č??
non creiamo falsi allarmismi!!!! TP sotto win2000 funziona a perfezione, al
massimo dovrai ricompilare...

 il mio OS ( e linux è ancora troppo per me) come farò a programmare in


ma per seguir virtute e conoscenza.
grazie a tutti :))))


 d'ambiente con TP ti restituisci DOS 5.00.
again... non emula un dos 5.00 ma una sua versione nuova.
il fatto che il TP erroneamente restituisca 5.00 e dovuto al fatto che
la versione del sist op, cioe' di Win, e' 5.00
prova a dare un 'ver' dal prompt/console di Win2k
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it
(Life would be easier if I had the source code)
Newsgroup: it.comp.lang.pascal
Titolo: Programmare per Internet

Salve a tutti, il mio č un problema che mi affligge da un paio di giorni e
non sň proprio come risolverlo, quindi vi prego di aiutarmi (ma questo era
scontato :-) )
Veniamo al sodo, io dovrei fare un programma che mi si connetta alla porta
80 dell'host che mando tramite una pag. html con una form, e lě mi recuperi
il codice html della pagina index.html per esempio.
Mi sapreste aiutare a risolvere questo problema, oppure conoscete qualche
sito (rigorosamente in ITALIANO!! ma anche in ing. se proprio non ne
conoscete....) che mi possa aiutare?
Un grazie sentito a tutti coloro che mi aiuteranno.
GAROFALO Vincenzo
^KEnZo^
enzo...@inwind.it

 il codice html della pagina index.html per esempio.
Questo programma deve girare sotto DOS reale, finestra MS-DOS di Windows o
Windows ?
Nel primo caso vai su 
www.pas-os.com
 e scarica lo stack tcp/ip per Borland
Pascal (codice sorgente + esempio) di Jonathan Ramsey.
Nel secondo caso devi trovare l'interrupt dell'interfaccia di rete di
Windows.
Nel terzo caso...usa Delphi che fai mooooolto prima! (altrimenti BP sotto
Windows...)
Ciao!
Simone.
-=============================-
    Webmaster di :
 
www.drfalken.com
 
www.pas-os.com
    ICQ# : 19598133
    FAX  : 06.233.235.314
-=============================-

 Ciao!
Ciao

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

Conoscete un'Api per far suonare un suono conoscendo la frequenza. Col buon
vecchio Turbo Pascal ciň era possibile con la chiatata sound(frequenza)
Grazie

vecchio? io ho il 7.0 e uso questo comando,non credo esistano versioni
nuove...

Newsgroup: it.comp.lang.pascal
Titolo: Abbinare un file ad un variabile

Salve a tutti,
come posso abbinare un file del pc quale c:/file.txt ad una variabile
in modo da potrelo aprire nel programma.
Cioè posso modificare il contenuto di un file del pc tramite un
programma pascal.
Come fare se ad esempio volessi:
- Aprire il file c:/file.txt
- Andare a capo
- Scrivere " ci sono riuscito".
?
DeV
skywa...@usa.net
-- TeenWare Membro --

- Scrivere " ci sono riuscito".
var f : file ;
assign(f, 'c:\file.txt');
rewrite(f);
writeln(f);
writeln(f, 'ci sono riuscito");
close(f);
Andrea Laforgia
---------------
(grattatio pallarum omnia mala fugit)
--
Posted from 
itaca.ulysse.it
 [195.223.254.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

 - Scrivere " ci sono riuscito".
Salvo errori dovuti alla fretta:
var
  f:text;
  s:string;
begin
  filemode:=2;
  assign(f,'c:\file.txt');
  reset(f);
  while not eof(f) do readln(f,s);
  write(f,'Ci sono riuscito');
  close(f);
end.
Ciao
  Roberto
-- 
-------------------------------------------------------------------
 Vabbe`  ma  mica posso fare tutto io! Te lo sai a che ora mi sono
 alzato  questa  mattina? Alle sette meno un quarto! La bambina mi
 ha vomitato tutta  l'anguria  nelle scarpe!  Stamattina e` venuto
 l'idraulico e sai  quanto mi ha chiesto? Centocinquantamila lire!
 E dopo mezz'ora  il  rubinetto ha ricominciato a buttare l'acqua!
 Quela poi e` andata al corso di chitarra alle tre del pomeriggio,
 lo sai a che ora e` tornata? alle  quattro del mattino! Con tutto
 il rossetto  spostato  sulla  faccia. Ma che la chitarra la suoni
 con la bocca? Hai capito?
-------------------------------------------------------------------
 Attenzione:  i  dati  nell'header  sono modificati per difendermi
 dagli spammer. L'indirizzo  esatto  e`:  
crs...@xxxfreenet.hut.fi
                                   senza le tre x^^^

var f : file ;
...ops... sorry 
var f : text ;



Invece di fare cosi' puoi fare:
var	f:text;
begin
	assign(f,'c:\file.txt');
	append(f);
	writeln(f,'Ci sono riuscito');
	close(f)
end.
L'istruzione APPEND apre il file per la lettura e si posiziona alla
fine del file.
NB. Append funziona solo per file di tipo TEXT.
By Fabio
--
fabi...@rocketmail.com

 end.
gia`, perche` non  ci ho pensato?
ciao



Grazie a tutti !!
DeV

var f : text ;
Ciao,
e se volessi stampare (x stampare intendo mandare in output [writeln x
capirci] ) un file, tipo il solito buon vekkio file.txt ?
Se dopo close edito:
writeln (f);
non manda niente in output !
DeV


Per stampare col turbopascal guarda qui
http://users.iol.it/fabio.manzo/stampare.htm
Ciao, Fabio
--
fabi...@rocketmail.com
Newsgroup: it.comp.lang.pascal
Titolo: giochino

ciao a tutti mi chiamo emanuele ed ho fatto un piccolo gioco con il turbo
pascal,
vorrei ora chiedervi un parere su questo mio lavoro quindi se volete vederlo
mandatemi un messaggio

 wrote in message
8tsmhh$47l$1...@lacerta.tiscalinet.it...


Lo vorrei anche io...

 ha scritto nel messaggio
news:8tsmhh$47l$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:8tsmhh$47l$1...@lacerta.tiscalinet.it...


...


Io io voglio listato!
Dare me programma!

mmm, io veramente volevo i sorgenti...
Valnir

 wrote in message
8tsmhh$47l$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:8tsmhh$47l$1...@lacerta.tiscalinet.it...


 wrote in message
8tsmhh$47l$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:8tsmhh$47l$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.pascal
Titolo: copia e modifica

come faccio a copiare un file con il tp?

 wrote in article
<01bcfc01$92420ba0$15c24ec3@ciao>...


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

Mi consigliate qualche programma da fare per esercizio?
Ho finito tutti quelli presenti nel mio libro (wels-elder) ,ma credo
di avere ancora molto da imparare.
______________________________
e-mail:  
Aur...@hotmail.com
ICQ:     16005054
Dark reign,Total annhilation,Age of Empires,Dune2K,C&C2
http://www.geocities.com/TimesSquare/Maze/3856/

Ti procuri da qualche parte un vocabolario, e fai un prg che faccia il giochetto di Fiorello delle 19,50
VINO, VISO, VASO, NASO,CASO,RASO,...... e mandi in stampa il domandiere con la sequenza, il pulsante di aiuto, la possibilità di giocare....
....magare qualcuno la'ha già fatto
buon lavoro

Un bel di' Auran scrisse:
A> Mi consigliate qualche programma da fare per esercizio?
A> Ho finito tutti quelli presenti nel mio libro (wels-elder) ,ma credo
A> di avere ancora molto da imparare.
A> 
Allora, vediamo un po'...
Innanzi tutto riscaldati un po' con programmini matematici vari (se
ti piacciono), tipo:
- minimo comune multiplo
- massimo comun divisore
- numeri primi
- scomposizione in fattori primi
Poi, passiamo a qualche giochino:
- indovina il numero scelto dal PC (serve l'istruzione random)
- battaglia navale (servono le matrici (i vettori))
Ai giochi, poi, applichi la grafica, e li rendi piu' belli.
Poi inserisci una classifica, e ti impari i files.
Poi trovi un vocabolario, e, dopo il prog. che ti ha consigliato
il nostro amico, fai:
- l'impiccato
- la ruota della fortuna
- il gioco "indovina la parola"
Dopodiche' sei pronto per le software house!! :-))))
Ciao et Auguri!
-- 
"Il potere logora chi non ce l'ha", teorema di Andreotti sugli Equilibri
Politici
-- 
Emanuele Cesena
d.a.m...@iol.it
    occhio all'antispam NOSPAM!
http://www.geocities.com/SiliconValley/Grid/8879
Newsgroup: it.comp.lang.pascal
Titolo: Gestione schede audio

Cerco sorgenti di programmi in turbo pascal per la gestione delle schede
audio principali
(insomma voglio riuscire a creare un programma che faccia uscire del suono
dalle casse)
PAS8
PAS16
SB 
SBPRO
SB16
WSS
e chi più ne ha più ne metta
ciao, eddi
Grazie in anticipo

, il giorno 15 Sep 1997 20:39:55
GMT hai scritto:
#Cerco sorgenti di programmi in turbo pascal per la gestione delle
schede
#audio principali
#
#(insomma voglio riuscire a creare un programma che faccia uscire del
suono
#dalle casse)
Ciao, nella mia pascal homepage trovi nelle "unit varie" quelle per la
riproduzione di .mod (per alcune schede audio) e .voc (per sb).
bye
REMO FRANCESCHELLI - ITIAV 4a Info.
http://www.geocities.com/SiliconValley/Lakes/7668/
(Programmazione in Pascal)
** Concentrazione = Forza **

Newsgroup: it.comp.lang.pascal
Titolo: bugfix crt

come rimuovo il bug del crt?
Lo so che se ne č gia parlato ma ho perso le lettere.
Grazie
Michele De Giorgis
--
Hai fatto del tuo meglio e hai fallito miseramente la lezione č: non fare.
Homer J. Simpson

 --

Grazie sei un fenomeno
Cristiano Larghi <C.La...@Micronix.it> wrote in message
10koeqs$mug$1...@fe2.cs.interbusiness.it...


 Lo so che se ne è gia parlato ma ho perso le lettere.
http://bsn.ch/tp-links
patches
-- 
Franz Glaser, Glasau 3, A-4191 Vorderweissenbach Austria +43-7219-7035-0
Muehlviertler Elektronik Glaser.  Industrial control and instrumentation
http://members.eunet.at/meg-glaser/
           mailto:
meg-g...@eunet.at
http://www.geocities.com/~franzglaser/
 
http://members.xoom.com/f_glaser/

Newsgroup: it.comp.lang.pascal
Titolo: varie..delete dizionario e guide..

Ciao a tutti...sono ultra nuovo del ng e volevo salutarvi a tutti!!
Domanda...dove posso trovare dei prog in turbo pascal in sorgente?
Per imparare un o'........
poi altra cosa....posso fargli cancellare un file che 
ad.es
. si trova in
c:\windows\temp?
oppure tutta la cartella?
Se si come?
Altra domanda...vorrei creare una specie di dizionario..uno digita hello e
il programma ti dice ciao...fatta una parola farne altre che so 500 non è
difficilissimo no?
Grazie a tutti!
P.s Siete grandi!


la prima cosa che mi viene in mente č questa
type parole = recod;
     inglese : string;
     italiano : string;
end;
var f : file of parole;
I f scrivi tutti i record che vuoi
Ciao ReDiCuori
------------------------------------------
pascal su IRC : #turbopascal
pascal sul web : 
www.pascallike.cjb.net
------------------------------------------

 Ciao ReDiCuori
ti ringrazio davvero tantissimo!!!!!!!
Ciao
MarLAw
Newsgroup: it.comp.lang.pascal
Titolo: Pascal su Windows

Ciao a tutti vorrei sapere se qualcuno conosce se esistono versioni del
linguaggio pascal per Microsoft Windows a 32 bit (win32, windows 9x, NT),
magari orientato ad oggetti, e se è preferibile optare per questo rispetto a
Visual Basic per programmare RAD.
Grazie
Andrea.

 e se è preferibile optare per questo rispetto a Visual Basic per programmare RAD.
 Ceeeeeeeerto :))
Sent With pronews 1.0 Reg.
 TOgliere Nononospam dall'indirizzo.

Visual Basic per programmare RAD.
Credo proprio di no.
Programmare in VB e' di sicuro piu' produttivo ed e' sicuramente piu' richiesto.
Devi sempre optare, a mio avviso, per cio' che sia piu' vicino al tuo S.O.
Andrea Laforgia
-------------------------------------
(grattatio pallarum omnia mala fugit)

programmatori con esperienza di ambienti di sviluppo di Microsoft. 
Non credo solo in Italia.
Andrea Laforgia
----
I guai ve li andate a cercare : 
quando Bill Gates annuncio' che avrebbe fatto scrivere 
Windows98 a Topo Gigio perche' non gli avete creduto ?

Buon Divertimento!!!!!!!!

begin 644 col256.tpu
<encoded_portion_removed>

begin 644 col256.tpu
<encoded_portion_removed>

Windows98 a Topo Gigio perche' non gli avete creduto ?
 eppure mi pareva che avessi le idee chiare.. ma ;)) 


 Per fortuna.. nessuno di loro sa fare il mio lavoro...
E dopo tutto questo si poteva concludere con qualcosa che avesse senso ?
Neanche a parlarne !...
Andrea Laforgia
----


Sei pregato di non postare dei file.
Non e' consentito in questa gerarchia.

Newsgroup: it.comp.lang.pascal
Titolo: HELP (WIN/MCI): how to handle 2 or more CD-ROM drives to play Audio CDs with MCI

English:
Hello.
I'm new in Windows MCI programming, so I would need help.
How can I handle more than one CD-ROM drive for audio CDs playback?
I would like to make my CD-player program do something like:
- playing 2 or more CDs simultaneously (if possible)
- handling more than one CD-ROM drive (like Windows 95' CD Player) for
simple or programmed playback
I use Turbo Pascal for Windows 1.5. However, this message has been posted
to C/C++ newsgroups, too, because I think the secret is behing MCI and not
behind the programming language, isn't it?
If you can help me, please add my e-mail address (
maur...@tin.it
) in the
Cc: field of the reply.
Thank you very much!
Italiano:
Ciao a tutti.
Non sono esperto di programmazione delle periferiche MCI di Windows, quindi
avrei bisogno di un piccolo aiuto.
Come posso gestire più di un lettore CD-ROM per riprodurre CD musicali?
Vorrei che il lettore CD che sto programmando, facesse qualcosa del tipo:
- suonare 2 o più CD contemporaneamente (se possibile)
- gestire più di un lettore CD-ROM (come il Lettore CD di Windows 95) per
la riproduzione semplice o programmata di CD audio.
Uso Turbo Pascal for Windows 1.5. Tuttavia, questo messaggio è stato
spedito anche ai newsgroup dedicati a C/C++ perché credo che il segreto sia
nell'interfaccia MCI piuttosto che nel linguaggio di programmazione,
giusto?
Se potete aiutarmi, per favore aggiungete il mio indirizzo e-mail
(
maur...@tin.it
) nel Cc: della risposta.
Grazie infinite!
-- 
Mauro Molinari
Internet e-mail: 
maur...@mbox.vol.it
 / 
maur...@tin.it

 Internet e-mail: 
maur...@mbox.vol.it
 / 
maur...@tin.it
-- 
mox...@geocities.com
hl...@concentric.net
 (down)
--------------------
http://www.geocities.com/SiliconValley/Bay/4961
http://www.concentric.net/~hlhj
 (down)


I have a help file for MCI programming that I got somewhere.   It is
about 100K zipped.  let me know if you want it.
--
Wolfgang John    - AM-WOLJO Shareware -
wj...@fix.net
 
http://www.fix.net/~wjohn/
 
 - Phone Dialer and Logger - CD Player and Library - Win3.1 / Win95
- CD Player imports data from GIANT internet library -
- FREE programmable 6 cities/countries world clock -

- playing 2 or more CDs simultaneously (if possible)
All you have to do is specify the filename as "D:" when opening
CDAudio if the CD-ROM is D, for example.
Newsgroup: it.comp.lang.pascal
Titolo: che libro mi consigliate?

che libro mi consigliate da comprare in libreria riguardo il pascal? ne
cerco uno che sia abbastanza dettagliato ma nello stesso tempo
comprensibile, grazie
--
Ciao
Marchese Gianfranco
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi da qui)
sito internet personale: 
www.gian1.cjb.net
     UIN ICQ 117743990
per il replay togliere NOSPAZZATURA

Il 06 lug 2001 Marchese Gianfranco ha espresso la sua creatività scrivendo:

Io ho imparato il Pascal da un libro che ormai non si trova più in 
commercio, ho comunque acquistato un libro qualche settimana fa che si 
intitola Pascal, guida alla programmazione, McGraw-Hill di Andrea Guidi e 
Nazario Renzoni, prezzo di copertina 42.000 (436 Pag + CD-ROM). E'molto 
interessante, analizza in particolar modo la programmazione strutturata e 
nel CD-ROM vi sono anche IDE e compilatore FreePascal (
www.freepascal.org
).
Trovo che sia scritto discretamente bene, inoltre gli autori lasciano anche 
i loro e-mail per eventuali delucidazioni.
Non ti posso grantire che ti rispondano, comunque mi sembra una bella 
iniziativa da parte loro.
Ciao
-- 
WulfMp3
wul...@email.it
"Poni ciò che sei nel minimo che fai."

Newsgroup: it.comp.lang.pascal
Titolo: [OT] TASM

Ki sa dove posso reperire una versione del tasm o Turbo Assembler della borland?? Scusate l'ottì
Travis

 ha scritto nel messaggio news:rpTG8.3334$se2....@twister1.libero.it...


 ha scritto nel messaggio
news:rpTG8.3334$se2....@twister1.libero.it...
Ki sa dove posso reperire una versione del tasm o Turbo Assembler della
borland?? Scusate l'ottě
Travis
C' č in una versione x dos del compilatore/interprete di c...
cmq se mi mandi un e-mail privata ti mando TASM e TLINK.
ciao g1n0W3h

Mandami una mail con oggetto : TASM che te lo mando
--
*  *  *  *  *
"Non si smette di giocare perché si diventa vecchi, ma si diventa vecchi
perché si smette di giocare" - Chiodo

Newsgroup: it.comp.lang.pascal
Titolo: posso gestire una connessione internet

ciao ragazzi vi pongo il mio problema voglio fare un programma pascal che
ogni mattina si connette a una certa ora prefissata e si disconnetta a una
altra ora prefissata  solo che non so dove incominciare mi potete dire dove
posso trovare un programma molto simile a questo anticipatamente grazie.
p.s lo ho fatto in assembly e funziona solo che voglio vedere di farlo anche
con il pascal.


Perché fare con un programma (credo che dovresti impazzire un po' per fargli
fare queste cose) quando con Linux, un ben "cron" e nient'altro potresti
fare queste cose in maniera molto semplice?
Ciao
Giulio

 ha scritto nel messaggio
news:ba0h0i$o60ns$1...@ID-56223.news.dfncis.de...



se lo hai fatto in assembly, incorpora le procedure di chiamata
al modem come blocchi  "asm ... end;".  Se lavori sulla COM dubito
che win poi riesca a utilizzare la tua connesisone per accedere
alla rete...  cmq la risposta piu' sensata mi sembra quelle che
ti hanno dato su .delphi
-- 
Dreadnaut
(Life would be easier if I had the source code)
Newsgroup: it.comp.lang.pascal
Titolo: Leggere lo schermo

Ciao a tutti
supponiamo che io abbia mandato in esecuzione
...
GotoXY(10,10);
Write('O');
...
C`è un comando  che mi consente di leggere nelle cordinate X = 10 Y = 10
dello schermo
e che mi dia per risultato = 'O' ?


wrote:


 ha scritto nel messaggio
news:4JYx8.62148$vF6.1...@news2.tin.it...


 ha scritto nel messaggio
news:3cc88adb...@news.tiscalinet.it...


 ha scritto nel messaggio
news:aachs2$8ncdb$1...@ID-94218.news.dfncis.de...



è dreadnaut che è tosto!
NM

 NM

> č dreadnaut che č tosto!
io piu' che altro mi sento tostato :-)
saluti, un Dreadnaut di appena tornato dalla maratona
"48 ore consecutive sverso" sponsorizzata dalle cantine
di Caranzano (Acqui)...
--
Dreadnaut
(Life would be easier if I had the source code)

piu' sotto (18/04) c'e' un "repost", prendi le strutture della
CrtMem e semplicemente leggi CrtMem[y,x].Ch e ottieni
il codice ascii del char


 wrote in message
4JYx8.62148$vF6.1...@news2.tin.it...


> č dreadnaut che č tosto!
Ora non esageriamo diciamo che se la cava piutosto bene... cmq non +
di me :D
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 cmq non + di me :D
gelosone ;-)... ah Razz.. appena ho finito i 112 laboratori e i
2953 esami ti rifaccio il loader... adesso come adesso l'idea di
fissare un asc per piu' di un secondo mi provoca crampi
allo stomaco... :-)


allo stomaco... :-)
Me lo sono riscritto da capo da me :D ora osa le mie classi e funge
anche abbatanza bene... ma perche su ICQ non ti si vede mai?


ho scaricato troppi fumetti, ora per tenere la media-costi ho circa
20 sec di collegamento ogni settimana :-)



Ehm?

Newsgroup: it.comp.lang.pascal
Titolo: albero binario

Mi sono imbattuto in questo programma in pascal...qualcuno sa
compilarmelo??...
grazie.
giuseppe.
Scrivere un programma in pascal che consenta di inserire in un albero
binario i caratteri letti da un file esterno fino al suo esaurimento, in
modo che ,ripercorrendo opportunamente l'albero stesso,si possa,alla
fine,ottenre il numero totale di caratteri diversi ed il numero totale dei
caratteri uguali,quest'ultimo per ciascuno dei caratteri presenti nel file e
SOLO PER ESSI.
Le procedure per il caricamento dell'albero e per la sua visita dovranno
essere dotate degli opportuni parametri.

 [snip snip snip]
premetto che mi sembra un problema malato e gli alberi binari il peggior
modo di risolverlo... l'unico modo che mi viene in mente e' 
 leggi un carattere
  scendi il lato sinistro dell'albero cercandone uno uguale
   se arrivi in fondo lo aggiungi a sinistra (e' il primo di quel tipo)
   se lo trovi a meta' scendi a destra fino alla fine e lo aggiungi in fondo
cosi' per sapere quanti caratteri diversi basta misurare il ramo sinistro
dell'albero mentre per sapere quante volte un carattere si ripete lo cerchi
scorrendo il ramo sinistro e poi conti il numero di figli a destra.
...mmmh forse e ' meglio se esemplifico... metti che nel file c'e'
scritto "supercalifragilisti", l'albero che ottieni e' 
s
|\
u s
|
p
|
e
|
r
|\
c r
|
a
|\
l a
|\
i l
|\
f i
|  \
g   i
|    \
t     i
mmmh che grafica :-)
-- 
Dreadnaut
(Life would be easier w/o hangovers)

 t     i
-- 
Dreadnaut
(Life would be easier if I hadn't to cook)

sono babbo... "|" e' un simbolo per il quoting...
s
!\
u s
!
p
!
e
!
r
!\
c r
!
a
!\
l a
!\
i l
!\
f i
!  \
g   i
!    \
t     i
tanto non funzionera' cmq... non ci credo...
-- 
Dreadnaut
[ 
http://dreadnaut.servebeer.com/
 ]
Newsgroup: it.comp.lang.pascal
Titolo: <no subject>





Ciao a tutti,


avrei bisogno di un semplice tutorial su delphi: 
dove posso trovarlo?


Grazie in anticipo!


Eagle



 ha scritto nel messaggio
news:001201c035f3$a9363140$62f3abd4@laborat...






Grazie per l'aiuto Morpheus.


Ciao



Come si fa il simbolo del CopyRight Š in Pascal?
Grazie
--
Non č stato rilevato nessun bug nel sistema.
Si desidera crearne uno?
-- 
Posted from [151.39.48.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Se non ricordo male con ALT+169 quindi #169 ma puoi verificare su una
tabella dei codici ascii.
Ciao
MaTTeO.

Come si fa il simbolo del CopyRight Š in Pascal?
Grazie
-- 


Ho provato ma non funziona
--
Non è stato rilevato nessun bug nel sistema.
Si desidera crearne uno?
-- 


 Si desidera crearne uno?
Grazie Bill........

 Ho provato ma non funziona
 Dipende dalla tabella dei codici che hai caricato
 in memoria, ma cosa c'entra questo discorso con
 il pascal? Prenditi una tavola ASCII e guarda li`!

Era il codice ascii 184
Grazie.
--
Non è stato rilevato nessun bug nel sistema.
Si desidera crearne uno?
-- 


Perchè quale tabella dovrei avere in memoria?


Scusa... ma non fai prima a fare un programma del tipo:
program StampASCII;
uses
    Crt;
var
    Ch : char;
    Ln : byte;
begin
    Ln := 0;
    { Parte da 128 perché (c) fa parte dei caratteri non standard (codifica
8 bit) }
    for Ch := #128 to #255 do begin
        WriteLn (byte(Ch):3, ' : ', Ch);
        Ln := Ln + 1;
        if (Ln = 24) then begin
            Write ('Premi INVIO...');
            ReadLn;
        end;
    end;
end.
Non l'ho provato... al max lo fai partire da #32 (spazio) se non rientra
nella codifica ASCII estesa.
Ci metti 20 secondi a trovarlo il carattere che vuoi.
--
Michele
    "Nessun luogo è lontano"
ICQ #64033158

 Era il codice ascii 184
Quando uno è il migliore ;PP
Newsgroup: it.comp.lang.pascal
Titolo: Turbo pascal 7

Da dove lo scarico? o qualche altro compilatore di pascal magari x winzozz
(io ho xp)?
thanks
ciao

 ha scritto nel messaggio
news:kD_7c.88647$FJ6.3...@twister1.libero.it...

sul sito in firma
--
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

Grazie
"Marchese Gianfranco" <dgr...@tinNOSPAZZATURA.it> ha scritto nel messaggio
news:pP18c.92805$z23.3...@news3.tin.it...


Pietman ha scritto:

  vai qui 
http://hackerlandia.altervista.org/programmazione.htm


Da quando è free? Mi è sfuggito qualcosa?
HH

 winzozz(io ho xp)?
www.freepascal.org
-- 
« 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

 > Da dove lo scarico?
sito in firma


> Da quando è free? Mi è sfuggito qualcosa?
Non è free... è semplicemente un progetto opensource che si prefigge di
creare un pascal compatibile con il TurboPascal e qualche cosa in più (tipo
il collegamento con Mysql e Postgresql) e onestamente ci stanno riuscendo
bene.
Se vuoi un simil-delphi guarda pure: 
http://www.lazarus.freepascal.org/
Questo è ancora un progetto un pò acerbo, ma è comuqnue utilizzabile anche
per lavori di una certa complessità.
Newsgroup: it.comp.lang.pascal
Titolo: SOFTWARE IN OFFERTA!!!!!

Vendo programmi di tutti i generi tipo:
MS VISUAL BASIC 5.0 ENTERPRISE ITALIANO
ADOBE PHOTOSHOP 4.0 ITALIANO
CORELDRAW 7 ITALIANO
AUTOCAD 13 C4 ITALIANO
MS OFFICE 97 PROFESSIONAL ITALIANO
MACROMEDIA FREEHAND 7.0 ITALIANO
ADOBE ILLUSTRATOR 7.0
ADOBE PAGEMAKER 6.5 ITALIANO
OMNIPAGE PROFESSIONAL 7.0
SOFTIMAGE 3D 3.7 EXTREME
AUTOCAD 14
MACROMEDIA DIRECTOR 5
A PREZZI ECCEZIONALI!!!!!!!
Richiedi la lista a:
fre...@hotmail.com




wrote:
Vendo diversi autoradio con casse rubati da auto, pezzi di macchine e
computer di terza mano sempre rubati , dispongo anche di ashish e
cocaina a buon prezzo !!
Antonio Tanzillo  
a...@netgroup.it
Marigliano (NA)  
www.netgroup.it/atsoft

Spero tu stia scherzando, non fanno piacere certi messaggi
Saluti
Valentina

invece e' uno scherzo... E' di pessimo gusto...
Possibile che non abbiate capito la sua ironia?? C'era uno che offriva
spudoratamente programmi piratati su cd masterizzati e lui,
ironicamente, ha detto che vendeva pezzi di auto rubate etc.
Con rispetto... sveglia!
Ciao
Alessio Sangalli

 Con rispetto... sveglia!
Oppssss... Scusate l'errore... ho letto il  MSG in
it.comp.sicurezza.virus e non c'era traccia del MSG a cui lui
rispondeva... Non avevo neanche notato il CrossPost...
Scusate nuovamente...
-- 
Bye Bye ]\[ik                {~._.~}
                              ( Y ) 
---------------------------- ()~*~() ----------------------------
            Mirko Nicoletti - netPartner s.r.l. - Italy
                 Milano - Torino - Ferrara - Aosta
     Telecom Italia Official ISDN/InterNet Solutions Provider
--------------------------------o--------------------------------
                      Pionieri CRI Ferrara
-----------------------------(_)-(_)-----------------------------



A PREZZI ECCEZIONALI!!!!!!!

---------------------