mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.pascal
Titolo: Presenza di un file

Come faccio in pascal a vedere se un file è presente in un certo percordo
(es:\ c:\file.txt)?

 ha scritto nel messaggio
news:oyoJ9.760$Ou4....@twister2.libero.it...


Mi da errore Unknow Ident... su OK di Ioresult, cmq ho trovato gia il modo
ma ora ho il problema dell'esecuzione del file exe. Potrei usare l'EXEC, ho
infatti seguito il programma nell'Help ma mi chiede Cmdline e non so proprio
cosa sia. Se puoi darmi una mano ne sarei contentissimo
"ReDiCuori" <redicu...@NOSPAMinwind.it> ha scritto nel messaggio
news:OGsJ9.3726$lV4.1...@news2.tin.it...


news:OGsJ9.3726$lV4.1...@news2.tin.it...
se ti posso dare un consiglio non scrivere il tuo messagio e poi
"incolare" alla fine il messagio a cui rispondi ma piutosto eliminale
le parti non neccessare ( anche l'intero post ). Non voglio obligare
nessuno a quotare come faccio io ( anche se molti creano interi flame
di insulti reciproci su questo ) seocndo me facendo un buon quoting si
risparmi tempo nel caricare i messagi ( a me non importa nulla visto
che il mio server di news è locale percui ci metto 3 nanosecondi a
ricevere il msg ma so che a qualcuno con il 56k a questo problema ) e
cmq in una quotatura a tono si capisce molto meglio. Ripeto non
obbligo nessuono e non tornero sul argomento.
bye!
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

 wrote in message
oyoJ9.760$Ou4....@twister2.libero.it...


Newsgroup: it.comp.lang.pascal
Titolo: Aiuto per la stampa

Ciao a tutti, avrei bisogno di aiuto:
ho creato un programma e vorrei stampare su carta il risultato che adesso mi
viene mostrato a video, ma non conosco la funzione di stampa, qualcuno mi
potrebbe aiutare?
Grazie

 ha scritto nel messaggio
news:9011qv$jpf$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:9063u4$76i$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.pascal
Titolo: Informazione su oggetti.

Salve a tutti,
volevo solo una risposta alla seguente domanda:
Quando creo un oggetto con una procedura (o funzione), un costruttore e un
distruttore, se chiamo la procedura, il costruttore e il distruttore non
devono rispettivamente precedere e seguire la chiamata alla procedura?
E se l'oggetto č ereditato?
In C++ con le classi č cosě, ma in Pascal con gli oggetti si puň fare?
Ecco il sorgente del mio programma di prova:
program
  oop;
uses
  crt;
type
  baseobj = object
    constructor initbase;
    procedure scriviciao;
    destructor donebase;
  end;
  derivedobj = object (baseobj)
    constructor initderived;
    procedure scriviciao;
    destructor donederived;
  end;
constructor baseobj.initbase;
  begin
    writeln ('Costruttore oggetto base chiamato...');
  end;
procedure baseobj.scriviciao;
  begin
    writeln ('Ciao Base');
  end;
destructor baseobj.donebase;
  begin
    writeln ('Distruttore oggetto base chiamato...');
  end;
constructor derivedobj.initderived;
  begin
    writeln ('Costruttore oggetto derivato chiamato...');
  end;
procedure derivedobj.scriviciao;
  begin
    writeln ('Ciao Derived');
  end;
destructor derivedobj.donederived;
  begin
    writeln ('Distruttore oggetto derivato chiamato...');
  end;
var
  objbase : baseobj;
  objderived : derivedobj;
begin
  clrscr;
  objbase.scriviciao;
  objderived.scriviciao;
  readln;
end.
Ebbene, l'output č:
Ciao Base
Ciao Derived
Quindi non ha lo stesso risultato della classi in C++?
Grazie
Luigi.
--
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

 ha scritto nel messaggio
news:000501c01828$cf415e20$05352797@u8e3o5...


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

Ciao a tutti !
avrei bisogno di qualcuno esperto che riuscisse ad interpretare questa
scritta:
Runtime error 200 at 0E9E:0091
Mi appare quando faccio partire un file .exe
(solo una volta o due è partito correttamente, è un programma che consiste
in quel solo file)
Se avete delle soluzioni a questo fatto per me inspiegabile rispondetemi su
timeb...@freemail.it



.... ma perchè parlo?
ERROR 200 = DIVISONE PER ZERO
=
quel exe è stato creato con una versione non patchata del
Turbo/Borland Pascal 7,0...
esiste la patch per i file .exe per risolvere questo problema...
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : 
razzi...@usa.net
 (Primary),
 
IlRazz...@netscape.net
 (for Attachent)
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 quel exe č stato creato con una versione non patchata del


 > quel exe è stato creato con una versione non patchata del


 ha scritto nel messaggio
news:3nsL6.7946$Rc5.1...@news2.tin.it...

Newsgroup: it.comp.lang.pascal
Titolo: strutture dinamiche (si chiamano cosi?)

Come posso definire ed utilizzare un array di record con dimensioni
variabili?!
Ho un tipico file of records, ma non posso maneggiarlo con un array,
in quanto le sue dimensioni sono variabili.
help!
Phones

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

di records il cui principio di funzionamento è pressochè identico.
Ok, ma con che codice definisco e manipolo una lista di records?
puntatori? Mi potresti indicare almeno dove guardare nella guida di
tp7?
Grazie Cooper!
Phones

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

Newsgroup: it.comp.lang.pascal
Titolo: Egli e' !!!

mi e' apparso come in sogno RdC su Icq e mi ha parlato !!!
forse presto sara' di nuovo fra noi ?! :-)
--
Dreadnaut
(Life would be easier if I had the source code)

"Dreadnaut" ha scritto nel messaggio >

E che so fat nu fantasma :)))
ReDiCuori
Ps.: finalmente online dopo tanto tempo !

>Ps.: finalmente online dopo tanto tempo !
Bentornato RdC!
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

Newsgroup: it.comp.lang.pascal
Titolo: DOS Shell

Salve al NG.
Voleve chiedervi se sia, ed eventualmente come, possibile sospendere 
temporaneamente il proprio programma e visualizzare una shell DOS. 
Insomma un po' come fa il TP quando si sceglie DOS Shell dal menu FILE.
Grazie a tutti.
--
Kripto

Prova usando {$M 8192,0,0} prima di Uses Crt e poi a usare
Exec(GetEnv('COMSPEC'),' ');
Poi fammi sapere...
Saluti da VEGETA IL PRINCIPE DEI SAIYAN
=)
     /\  /\
\_/   \/  \_/
Kripto ha scritto nel messaggio ...


 ha scritto nel messaggio
news:WnO_5.118934$hk4.4...@news.infostrada.it...


 Poi fammi sapere...
Tutto OK. Grazie.
--
Kripto

 Prova ad eseguire il 
command.com
 da programma se non ricordo male devi
Si, avevo provato ma non andava. In realtà sarebbe bastato anche in 
questo caso aggiungere la direttiva suggeritami da Vegeta, ma rimaneva il 
problema di essere legato al path del "
command.com
".
Invece con GetEnv('COMSPEC') posso ricavarmi subito l'intero path del 
command.com
, qualunque esso sia.
Vi ringrazio comunque. La programmazione Win32 mi aveva arrugginito per 
quanto riguarda quella DOS. Erano un paio di anni che non toccavo più il 
buon vecchio TP. ;)
Ciao.
--
Kripto

Newsgroup: it.comp.lang.pascal
Titolo: Pureblisslt@hotmail.com

..Ehm..la foto? Non me l'hai spedita!!

Oopps..ehm..scusate..una distrazione ;)
Non rispondete con improperi:)

Newsgroup: it.comp.lang.pascal
Titolo: Turbo Pascal e COM Port

Ciao 2 all
   qualcuno conosce come far dialogare il Tp con la com1?
devo inviare solo caratteri.
Grazie
_________________
"Pretendo Comando e Voglio" disse Bill Gates prima che win98 gli sputasse in
faccia il primo errore di fronte a diverse centinaia di
rappresentanti... 
del...@infotel.it
 (Gian Luca De Lillo)

...

Newsgroup: it.comp.lang.pascal
Titolo: AMICI, quanto potrei chiedere per un programma che ho scritto fatto cosi` e cosi`?

Ciao, mi chiamo Andrea e sono di Aviano.
C'e` qualcuno che mi puo` aiutare?
Ho scritto un programma in pascal/assembler che gestisce un'archivio di
una ditta di pompe idrauliche. Non solo, fa anche alcuni conti sulla
portata, sui fori e sulle caratteristiche del naspo a monte e a valle.
E` a tendine e l'interfaccia e` uguale a quella a finestre di Win 95,
quindi gradevolissima all'occhio.
Stampa, pure.
Ah, dimenticavo di dire che la ditta me l'ha commissionato lasciandomi
l'onere di stabilire le leggi che governano le pompe partendo da una
tabella excel immensa di dati sperimentali. Solo questo (per cui ci
volevano conoscenze di tipo ingegneristico - sono al quinto anno di
ingegneria meccanica) mi e` costato 2 gg di lavoro. Totale ore lavorate
= 110 (sono un programmatore abbastanza esperto e quindi veloce nel mio
lavoro, anche se ammetto che se avessi usato un altro linguaggio qualche
decina di ore l'avrei risparmiata).
Ora il mio capo vuole che determini io il prezzo (e` soddisfatissimo del
prodotto finale, superiore alle sue piu` rosee attese).
E io non ho idea di quanto possa chiedere, visto che non faccio il
programmatore di mestiere.
Se mi potete aiutare... ve ne sarei grato.
Ciao, Andrea

Inizia con 5.000.000
Ciao
  Carlo

Ciao Andrea, anchio sono un programmatore e ti facci i miei complimenti per
il tuo lavoro, ma io non mi sarei neanche messo a fare un programma del
genere in Pascal.
Forse sarebbe stato comveniente anche al tuo datore di lavoro visto che,
come hai detto anche tu, con qualche altro linguaggio ad un livello più alto
avresti sicuramente risparmiato una decina di ore se non di più. Comunque di
solito io non uso una tariffa oraria ma preferisco essere pagato per la
difficolta (o la noiosità) del lavoro eseguito. Secondo me questo tuo
programma è stato molto impegnativo e il tuo "capo" ne è stato soddisfatto
quindi io mi farei pagare sui 10.000.000 se non 11.000.000.
Ciao Nicola

avresti sicuramente risparmiato una decina di ore se non di piů.
Scusate l'ignoranza, ma con "linguaggio ad un livello piů alto" cosa
si intende di preciso?

Newsgroup: it.comp.lang.pascal
Titolo: AIUTO!!!! come si cancella un record???

 come cancello un record di un file???????

 come cancello un record di un file???????
Devi riscrivere il file, escludendo quel record.
Non c'e' possibilita' di rimuovere un record all'interno di un file (e
questo prescinde dal pascal) con conseguente "riattaccamento" dei
dati.
Il metodo adottato con i database, ad esempio, e' quello di segnare i
dati come cancellati e compattare il file in un secondo momento,
riscrivendolo.

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

Ciao ragazzi,
sapete dove posso trovare un tutorial che mi spieghi come programmare un
piccolo gioco oppure dei codici sorgenti
di giochi molto semplici??????????''

Dai un occhio su 
www.lagrandezucca.cjb.net
 a Mario, Space Lords,
P-Robots.
-- 
Omega e' omega e basta
ma per le cose buone ci sia sempre posto.
Newsgroup: it.comp.lang.pascal
Titolo: IMPORTANTE (Per me)

Ciao, io volevo un aiuto.
Ho un prog, la battaglia navale. L'utente contro il PC.
Devo generare i tiri del computer, in modo intelligente perň, cioč:
Dopo che ha colpito una nave, deve controllare le coordinate adiacenti solo
(Sopra,Sotto,Destra e Sinistra).
E fare la nuova, in modo di affondare la nave con il minor numero di tiri.
Le navi non sono adiacenti. Il computer sŕ giŕ che tiri ha effettuato perchč
memorizza nella matrice dei simboli:
 0(zero) dove ha tirato ed ha preso ACQUA
X dove ha giŕ beccato una nave.
Il resto del programma l'ho giŕ fatta tutto.
Mi manca solo questa procedura.
Se qualcuno ha qualche consiglio...
N.B.   Non voglio la procedura giŕ fatta.
GRAZIE!!!!!!!!!!!!!!!!

 - rimuovi XXX  x  rispondere  ICQ	#8814554
 
Presentata a Maranello la nuova Ferrari.  Nuovo il motore, nuovo il cambio,
nuova  la  carrozzeria,  nuovo	anche  il  colore.   E'  una  Williams.
		--   Panfilo   Maria   Lippi,	"TABLOID   TABLOID"@"Mai   Dire   Gol"

Newsgroup: it.comp.lang.pascal
Titolo: Perchè non funziona "Borland Pascal per Win 7"

Da qualche tempo cerco di far funzionare il programma:"Borland Pascal 7 per
Win", ma e' tutto inutile.
Ogni volta che  lancio il compilatore mi appare la scritta:"Runtime error
105 at 001:003D".  Apparentemente il programma viene compilato e lincato
perfettamente...!
Chi mi puo' aiutare?
Grazie a tutto il NG per la collaborazione.
Ciao, Carlo.

Carlo ha scritto:

Mi pare che me lo dava pure a me... dopo un po' e sparito...
--
------------------------------------------------
IL RAZZIATORE
EMAIL: 
razzi...@usa.net
WEB:   
http://www.geocities.com/il_razziatore/
ICQ:   67552596
--------------------------------------------------

Newsgroup: it.comp.lang.pascal
Titolo: mi conviene?

ciao a tutti,
sono un novizio di programazione e per ora so solamente il qbasic. secondo
voi mi conviene passare al Pascal oppure mi conviene dirigermi verso altre
rotte?
--
*****************
Interfree
http://www.ag4all.cjb.net
Togliere NOSPAM e il puntino tra lib ed ero
per rispondere
***********************

 ha scritto nel messaggio
news:l2du8.32036$m41.8...@twister2.libero.it...


rotte?
Certo è un lingaggio molto versatile e se poi ti serve una mano da uno
che ha un sito meglio del tuo... accomodati!
-- 
Antispam: togli la "carrucola"
Sito: 
www.tagp.too.it
FAQ di ICGAG: 
www.tagp.faq.too.it
Gruppo: 
http://it.groups.yahoo.com/group/emporioAG

 che ha un sito meglio del tuo... accomodati!
sigh! dove mi giro mi giro me lo ritrovo :-)
Newsgroup: it.comp.lang.pascal
Titolo: Compilatore Turbo Pascal

Come posso procurarmelo?
C'è qualche sito in rete dove poterlo scaricare e quanto costerebbe?
Grazie, Marco


gratis seguendo il link in firma...
-- 
Ciao
Gianfranco Marchese
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
UIN icq 117743990
sito internet personale: 
http://www.turbo-pascal.cjb.net
  Tutto sul Turbo
Pascal  1.5

Scusate ma oggi so polemico.... ;)
Perchè non leggi  qualche post precedente tipo :  "Tp di manag del
06/11/2003 "
ReDiCuori
-- 
L'informatica è un arte
---------------------------------------------------------
 
www.pascallike.too.it
 
http://utenti.lycos.it/pascallike
 il sito sulla programmazione pascal
 sorgenti, tutorial ed utility
---------------------------------------------------------
"Marco75" <ma...@mail.mail> ha scritto nel messaggio
news:botc7n$4q7$1...@lacerta.tiscalinet.it...


CUT
Grazie :-)

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

Sapete dove posso scaricare Pascal non Turbo Pascal.
Grazie

 Sapete dove posso scaricare Pascal non Turbo Pascal.
Ciao,
Premetto che non so se esiste un compilatore che si chiami solo pascal..
Cmq il Turbo Pascal č un ambiente che comprende compilatore editor 
debugger ecc.., mentre il pascal č il linguaggio!
Byez

 ha scritto nel messaggio
news:3CA44A36...@freemail.it...


il free pascal? il tmt pascal?
il Pascal cosi come lo hai detto è SOLO il linguaggio...
NM



-------------------------------
Message Posted by  <dedGateway>
http://www.dedonline.com/forump
Newsgroup: it.comp.lang.pascal
Titolo: Keypressed

Carissimi, sono nuovo del forum.Frequento la 4^ superiore come ragioniere
programmatore, e prima di avventurarmi in visual basic sto facendo ancora
qualche cosa di pascal.
Il mio problema è questo: devo visualizzare tutti i record contenuti in un
file di record. Il problema è che in pascal, in modalità non grafica, non si
può nemmeno salire con il cursore quindi dopo tre record che visualizzo (tre
campi ognuno), gli altri cancellano i primi e  consegue una gran confusione.
Ho pensato di porre un "repeat until keypressed" alla fine del ciclo:
while not eof(nomefile) do
begin
visualizzo un record
repeat until keypressed
end;
Il problema è che la funzione "keypressed", della libreria CRT, una volta
che si pigia un tasto della tastiera, risulta vera e quindi dopo che pigio
un tasto la prima volta (dopo aver visualizzato il primo record), i
successivi record vengono visualizzati a raffica, senza fermarsi alla fine
di ogni visualizzazione.
Ho pensato che evidentemente i deve essere un comando che resetti keypressed
per farla ritornare al valore falso (keypressed è boolean), ma non l'ho
trovata.
Per chi non lo sapesse la funzione "keypressed" risulta vera se si pigia un
tasto qualunque.
Potete cortesemente risolvere questo mio problema? Ho fatto impazzire due
professori, ma loro mi hanno risposto dopo una mezz'ora, "se metti un readln
non è la stessa cosa?", come soluzione non è il massimo.
Vi pregherei di mandarmi la soluzione all'indirizzo 
bald...@libero.it
,
piuttosto che scriverla qui sul forum, è la prima volta che ci vengo e
sicuramente mi scorderò di ritornarci...
Filippo

Basta metterci subito dopo un readkey;
Puori farti una funzione del tipo:
function UntilKey: char;
begin
 repeat until keypressed;
UntilKey := readkey;
end;
che per lussuria aggiuntiva ti restituisce anche
il tasto premuto :-))
saluti,
Dreadnaut

 - rimuovi XXX x rispondere    ICQ #8814554
 
"Chi s'e' visto s'e' visto!", disse lo specchio rotto.
		-- Da it.hobby.umorismo

 - rimuovi XXX x rispondere    ICQ #8814554
 
Oceano, s.m.:
	Corpo d'acqua che occupa circa due terzi di un mondo fatto per
	l'uomo -- che non ha le branchie.


scrisse:
[OT]
mio cuggino mio cuggino :-D
forza elio

Whops e' vero !
Bisogna controllare se il primo e' zero, perche' allora ce n'e'
un secondo subito dopo !
diciamo:
function UntilKey: char;
var
 c : char;
begin
 repeat until keypressed;
 c := readkey;
 if  c = #0 then c := readkey;
 UntilKey := readkey;
end;
ok, cosi' dovrebbe andare :-)
ciao,
un Dreadnaut che poi la sign a che serve ?

 - rimuovi XXX x rispondere    ICQ #8814554
 
Se il primo amore e' un violino, si scorda facilmente.
		-- Da it.hobby.umorismo
Newsgroup: it.comp.lang.pascal
Titolo: Aruba - ora basta - supporto ZERO !

Sono stamco per un dominio .it da trasferire solo
come name server non solo non rispondono alle email
ma fanno perdere 10 giorni di lavoro e di credibilita'
con i programmatori che aspettano il cambio server
per non parlare di 15 gg persi o 1 mese di server dedicato pagato
chi altro ha problemi di attese con ARUBA ?
chi si unisce per un fax di protesta ?
chi fa una colletta per fare me MANTEINER ? con 2 milioni almeno
diventiamo manteiner noi e ci trasferiamo i domini entro 24 ore
visto che loro per i troppi clienti ormani danno supporto zero.
grazie
Anonimo incazzato
webma...@tin.it


Mha... io non darei una lira per finanziare qualcuno che risulta anche
anonimo a diventare qualcosa che non sa neanche come si scrive. 
-- 
Andrea Zwirner
yuppi...@yahoo.it
"Poni ciò che sei nel minimo che fai."

 ha scritto nel messaggio
news:9062A2FB8yup...@212.41.192.21...


scusa ma cosa centra co aruba ?
Perchè non leggi il post precedente?


Perchè non leggi il post precedente?
Forse non lo legge perche' lo hai visto solo te,
o forse lo hanno cancellato.
extrabug @ 
iname.com


Newsgroups: it.comp.lang.pascal
Subject: Aruba - ora basta - supporto ZERO !
Sono stamco per un dominio .it da trasferire solo
come name server non solo non rispondono alle email
ma fanno perdere 10 giorni di lavoro e di credibilita'
con i programmatori che aspettano il cambio server
per non parlare di 15 gg persi o 1 mese di server dedicato pagato
chi altro ha problemi di attese con ARUBA ?
chi si unisce per un fax di protesta ?
chi fa una colletta per fare me MANTEINER ? con 2 milioni almeno
diventiamo manteiner noi e ci trasferiamo i domini entro 24 ore
visto che loro per i troppi clienti ormani danno supporto zero.
grazie
Anonimo incazzato
webma...@tin.it


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

Ciao a tutti! :)
Ho messo a disposizione un fix per i programmi compilati con Borland/Turbo
Pascal 7.0 alla mia homepage 
http://web.tiscalinet.it/drfalken....(tali
programmi non girano sui processori piů potenti a causa di un bug)
Inviate i Vs. commenti a 
drfa...@tiscalinet.it
 !
Ciao!
P.S.: sviluppo programmi (in ambiente DOS) e patch/fix su richiesta....

 wrote in message
7ghcu4$khs$1...@aquila.tiscalinet.it...

Newsgroup: it.comp.lang.pascal
Titolo: Liste!Urgente, sono in crisi!!!

Per favore, potreste spiegarmi come posso fare a riordinare alfabeticamente
dalla lettera A alla Z una lista(lineare) costituita da record con un campo
dichiarato come stringa?Es:.
Record of
   numero:integer;
   nome:string;
   link:puntatore;
END;
Questa è la procedura che ho scritto:
PROCEDURE riordina_lista(VAR h,n:pointer);
VAR
z,p:pointer;
temp:string;
BEGIN
   z:=h;
   p:=h;
   REPEAT
      readln(n^.nome);
      temp:=n^.nome;
      n:=n^.link;
      REPEAT
         readln(n^.nome);
            IF n^.nome<temp THEN BEGIN
               temp:=nodo^.nome;
               z^.link:=n^.link;
               n^.link:=p;
               z:=n;
               p:=n
               END
               ELSE BEGIN
               z:=n;
               n:=n^.link;
               END;
      UNTIL n=nil;
   p:=h^.link;
   n:=p;
   z:=p;
   UNTIL p^.link=nil;
   n:=h;
END;{riordina_lista}
Il problema è che non mi stampa niente: l'ho già riscritta più volte, non
ottenendo risultati, anzi...ottenendo 'NIL pointere dereferenced'!

E' sbagliato proprio il metodo di codifica.
Ti conviene se vuoi ordinarla in qualche maniera, scrivere qualche
sottoprogramma in più che ti faccia astrarre la lista in modo da poterla
accedere diciamo direttamente elemento per elemento.
Cioè dovresti fare una funzione che acceda all'elemeno n e che vada a
leggerlo, poi ti devi fare una funzione che conti il numero di elementi
nella lista, e un'altra che faccia lo scambio di elementi.
quindi:
directaccesslist(..)
countelements(..)
swapelements(..)
a questo punto pigli un qualsiasi algoritmo di ordinamento e gli dai impasto
la lista utilizzando i sottoprogrammi sopra indicati.
Se invece vuoi risparmiare tempo come stai cercando di fare allora ti
scervellerai solamente e alla fine non ti funzionerà maiiii niente!
Ciao da Giovanni.
--
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
                           Giovanni Ceglia
                WebMaster & WebDesigner
 
http://www.xungame.com/
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

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

Cerco una qualunque versione del turbo pascal GRATIS
Qualche sito!!!!!!!


 
www.freepascal.org
-- 
Andrea Zwirner
yuppi...@yahoo.it
"Poni ciò che sei nel minimo che fai."

 Qualche sito!!!!!!!
www.crackstore.com
www.freepascal.org
 (Consigliato)
Ciao
-- 
KNOWLEDGE IS POWER
Newsgroup: it.comp.lang.pascal
Titolo: aiuto

 bloccare il ciclo se l'utente indovina prima dell'ultimo giro del loop il
1° soluzione (squallida)
Usi un goto es:
while x=true do
begin
  [...]
    if .. then
        goto uscitaciclo
  [...]
end;
uscitaciclo:
 [resto programma]
2° soluzione + intelligente
Se il ciclo si trova in una procedura e in questa c'è solo quel ciclo, basta
usa un exit.
procedure xxx;
begin
    while ..
      begin
            if x=true then
                exit
    end;
[questo eventuale blocco di istruzioni viene ignorato se usi l'exit]
end;
3° soluzione (la meglio)
Posti la condizione per la quale fai andare il ciclo falsa.
Es:
while k>10 then
    begin
        if .. then
            k:=9;
    end;
Ciao,
Alex
--
------------------
email: el_co...@TOGLIQUESTOlibero.it
icq: 132581870
------------------


Questa è un po' rozza... una bella variabile boolean?
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

> Questa è un po' rozza... una bella variabile boolean?
Perchè scusa?
Facendo come hai detto te bisogna per forza aggiungere una var e devi
mettere un'altra condizione nel ciclo: while k>10 o uscita=true do....
rallentando il tutto.
Non è che la memoria salga con una boolean o il ciclo venga notevolmente
rallentato, ma se si può usare una var invece di 2 perchè non farlo?
Ciao,
Alex


end;
--
Dreadnaut (dn)
drea...@liberoDALLASPAM.it
(Life would be easier if I had the source code)

> ragazzi esistono sempre break e continue :-)
ma lo sai che ne ignoravo l'esistenza?
Che figurina...


Alex
le Exit e un po' come la goto... fa veramente schifo in termini di
eleganza... una var Boolean occupa poco e il suo significato e
certo...


ehm...
:-)

Newsgroup: it.comp.lang.pascal
Titolo: somma dei numeri natirali

Ciao, devo creare in pascal un programma che mi dice la somma dei numeri
naturali da 10 a 20.
Qualcuno puň aiutarmi?
grazie ciao


Beh potresti pensare ad un bel ciclio
che parte da 10 ed arrivi a 20 sommando ogni volta l'indice
somma=0
start = 10
end = 20
while (start<=end)
    somma=somma+start
    start=start+1
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
---------------------------------------------------------

Se proprio vuoi fare il "fico"....
Primo      := 10;
Secondo := 10;
V := (Secondo-Primo)+1;
Somma := V*Primo+V*(V Div 2);
--
Ciao,
David (
www.utilityweb.net
)

Scusa
Secondo := 20;
è stata la fretta
--
Ciao,
David (
www.utilityweb.net
)

 Somma := V*Primo+V*(V Div 2);
hiihihi se vuoi fare il `fico' risparmi una moltiplicazione e scrivi:
Somma := V * ( Primo + V div 2 );
-- 
Dreadnaut - 
http://dreadnaut.servebeer.com/
(Life would be easier if I had the source code)

Giusto ma bisogna pure far sudare un po' i "ragazzi" che vogliono imparare (anzi che vogliono superare il compito)
--
Ciao,
David (
www.utilityweb.net
)

Per quel che ricordo.. somma dei numeri da M a N
Somma:= N*(N+1)/2-M*(M+1)/2;
oppure per essere ancora + fighi
Somma:=(N*(N+1)-M*(M+1))/2
Newsgroup: it.comp.lang.pascal
Titolo: screen saver...

quando lo avete fatto postreste mandarmelo?
grazie


ahahahahhahahaahahahhha :-))
Quando lo implemento, te lo mando...Però poi lo screen-saver vero e proprio
te lo devi fare da solo, visto che non credo ti serva come lo farò io....
:-)

 te lo devi fare da solo, visto che non credo ti serva come lo farņ io....
gli bastava usare google
http://www.google.it/search?q=screen-saver+pascal+%22source+code%22
e trovava dei link come questo
http://www.programmersheaven.com/zone24/cat31/4330.htm
:-D

Il Manchester United mi incantava con il suo gioco quando C1P8
(
PLEASENOS...@supereva.it
) mi interruppe asserendo:

grazie! perņ vorrei anche quello di Davide...

vuoi avere la pappa pronta? ;)

 
http://www.programmersheaven.com/zone24/cat31/4330.htm
ciao,
Ho il Turbo Pascal for Windows v 1.5 ( 1992 ) su Win Xp HE, con cui faccio
semplici programmi .
Ho scaricato dal tuo link lo sceensaver ma qualcosa non và.
Il codice inizia così:
{$A-,B-,D+,E-,F-,I+,L+,N-,O-,R+,S+,V+}
{$M 5000,0,0}
PROGRAM SCSVCOMM;
   Uses CRT,DOS;
Si blocca alla prima riga ( che proprio non so cosa sia ).
Cancellando le prime 2 righe si blocca su Uses CRT,DOS;
Mi puoi, tu o qualcun'altro, dare una dritta?
Antonio.

purtroppo non l'ho provato :(
ho semplicemente cercato con Google
cmq *dovresti* (il condizionale è d'obbligo) trovare qualcosa sui
screensaver nelle swag.

semplici programmi 
Non puoi fare programmi del genere con il PFW devi avere quello per
dos... per quello di windows devi chiamre lo SS di windows.
O meglio li puoi fare ma a quel punto devi usare la grafica e si
complicano di molto le cose...
( consiglio personale: Butta via PFW e o torna al quello per DOS o
prendi Delphi PFW e una via di mezzo che non serve a nulla )
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

 prendi Delphi PFW e una via di mezzo che non serve a nulla )
Cosa ne pensi se passassi al Free Pascal?
Ciao.
Antonio
Newsgroup: it.comp.lang.pascal
Titolo: exe con icona

Sapete dirmi come si fa ad associare un file exe ad una icona che sia
diversa da quella di default?
Grazie e ciao

 ha scritto nel messaggio
news:idnU7.341191$sq5.16...@news.infostrada.it...


 ha scritto nel messaggio
news:idnU7.341191$sq5.16...@news.infostrada.it...


 ha scritto nel messaggio
news:a0074o$qnb$1...@pegasus.tiscalinet.it...


Uhm... Non so che dirti! Buona fortuna!


passa al tpw 1.5 lo trovi nel link in firma
--
Ciao
Marchese Gianfranco
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi da qui)
sito internet personale: 
www.turbo-pascal.cjb.net
 Tutto sul turbo Pascal 7
per il reply togliere NOSPAZZATURA

 ha scritto nel messaggio
news:4aoV7.355675$sq5.17...@news.infostrada.it...


>Uso il TP 6.0
Anche se potrebbe sembrare poco ortodosso io facevo(adesso mi scoccia e gli
lascio quella) così :
tasto destro
Proprietà
Programma
Cambia Icona
Sfoglia
e scegli l'icona
Anche se potrebbe sembrare uno scherzo parlo seriamente se non ti piace
questo metodo non ti posso essere d'aiuto(almeno momentaneamente).
Neo
ICQ     :  146381266

Facendo cosě si crea un collegamento all'exe che ha l'icona che hai scelto.
Non cambi di certo l'icona all'eseguibile.
Alex
------------------
email: el_co...@TOGLIQUESTOlibero.it
icq: 132581870
------------------

Facendo cosě si crea un collegamento all'exe che ha l'icona che hai scelto.
Non cambi di certo l'icona all'eseguibile.
Non penso propio si possa cambiare l'icona di un exe a 16 bit in quanto non
č previsto che ci debba essere (in dos non ci sono certo icone).


 ha scritto nel messaggio
news:a03bsg$eae$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.pascal
Titolo: ARRAY DI LISTE





ciao...qualkuno potrebbe spiegare  CHIARAMENTE 
gli array di liste?..xfavore..ho letto su vari libri..ma mi da' sempre 
errore..POTRESTE FARE QUALKE ESEMPIO?..pleeeeasee..manca poco 
all'esame!!!...



 wrote in message 
000a01c1054d$27276b40$5ee91d97@luigi
...


Newsgroup: it.comp.lang.pascal
Titolo: pascal e basic

Un problema enigmistico potrebbe essere: quanti triangoli con lati di
numero intero ci sono con area 84? (soluzione : 3 oppure 4 ?)
qual'è la misura dei lati ?
 Da risolvere in linguaggio pascal e/o basic.
Si gradisce programmino.
aldobertolotto
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:79Z6Z192Z93Y11...@usenet.libero.it...


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

---------------------

---------------------

---------------------
Saluti da Ulysse
Considerate la vostra semenza:
fatti non foste per viver come bruti 
ma per seguir virtute e conoscenza.

 ---------------------


wrote:

perche sono un po' impedito a impostare free agent , allora.......
perdono :))


In effeti Free agent è un po' complicato...
Newsgroup: it.comp.lang.pascal
Titolo: Dove sbaglio (SetActivePage/SetVisualPage)?

Sto cercando di imparare ad usare le procedure SetActivePage e
SetVisualPage.
Questo prog. dovrebbe alternare tre pagine, visualizzando ogni volta lo
stesso cerchio ma con colori diversi.
Ho inserito dei commenti che precedono i punti in cui il programma non
fa come dovrebbe.
Vi riporto il programma: potete aiutarmi a capire dove sbaglio?
Program SetPage;
Uses Crt, Graph;
Var Driver, Mode :Integer;
Begin
{Inizializza la pagina grafica con risoluzione 1024*768 a 256 colori}
Mode:= 4;
Driver:= InstallUserDriver('Svga256',nil);
InitGraph(Driver,Mode,'D:\Fabio\Pascal7\Bgi');
{Imposta la pagina visibile n 0}
SetVisualPage(0);
{Scrive sulla pagina attiva 0 visualizzando un cerchio verde}
SetActivePage(0);
SetColor(12);
Circle(200,200,100);
Delay(1000);
{Scrive sulla pagina attiva 1 visualizzando un cerchi rosso}
(* I ERRORE: in realtà non dovrebbe mostrare il cerchio rosso perché‚ la
pagina visualizzata è la 0 *)
SetActivePage(1);
SetColor(10);
Circle(200,200,100);
Delay(1000);
{Scrive sulla pagina attiva 2 visualizzando un cerchi azzurro}
(* II ERRORE: in realtà non dovrebbe mostrare il cerchio azzurro perché‚
la pagina visualizzata è sempre la 0 *)
SetActivePage(2);
SetColor(9);
Circle(200,200,100);
Delay(1000);
Repeat
  (* III ERRORE: adesso dovrebbe visualizzare la pagina 0 (quella con il
cerchi verde) *)
  (*                      invece continua a mostrare il cerchio blu *)
  SetVisualPage(0);
  Delay(1000);
  (* IV ERRORE: adesso dovrebbe visualizzare la pagina 1 (quella con il
cerchi rosso) *)
  (*                       invece continua a mostrare il cerchio blu *)
  SetVisualPage(1);
  Delay(1000);
  {Visualizza la pagina 2 (quella con il cerchi azzurro)}
  SetVisualPage(2);
  Delay(1000);
Until KeyPressed;
CloseGraph;
End.
--
Fabio Feuli
E-Mail 
fe...@libero.it
Nick-Name Bacco
"Considerate la vostra semenza:
fatti non foste a viver come bruti,
ma per seguir virtute e canoscenza"
(Dante: Inferno XXVI, 118-120)

Vi riporto il programma: potete aiutarmi a capire dove sbaglio?
Ho letto il programma.
Secondo me il problema è nella modalità video. 
Il numero di pagine a disposizione dipende dalla quantità di RAM della scheda video.
Che scheda video hai ? Di quanta RAM dispone ?
Il problema, dunque, è riconducibile al fatto che con la tua scheda video puoi visualizzara UNA sola
pagina nella modalità 1024x768x256.
Prova a farlo nella modalità 640x480x16 che mette a disposizione il Pascal, e poi fammi sapere.
-=> NeGuS <=-
www.infinito.it/utenti/negus80
Newsgroup: it.comp.lang.pascal
Titolo: Dove sbaglio?

Allora, io ho fatto questo programmino SEMPLICISSIMO, ma ogni volta
che lo faccio partire mi da sempre random=0.
Uso il TurboPascal 7.0.
Ditemi dove sbaglio (il random lo ho imparato ieri :-P).
Program Giochetto;
var num,tentativo,k:integer;
begin
	num:=Random(50);
	k:=0;
	writeln('Giochino fantastico');
	writeln('  by Paolo Perini  ');
	writeln;
	writeln('Scopri il numero segreto compreso tra 0 e 50:');
	repeat
		k:=k+1;
		write('Quale pensi sia il numero segreto?');
		readln(tentativo);
		if tentativo<num then writeln('Sbagliato. Il numero da
trovare e'' maggiore. Riprova.');
		if tentativo>num then writeln('Sbagliato. Il numero da
trovare e'' minore. Riprova.');
	until tentativo = num;
if k=1 then writeln('Megalitico! Sei un mago! Solo un tentativo!');
if k<=10 then writeln ('Bravo! Hai usato solo ',k,' tentativi!');
if k>10 then writeln ('Sei un po'' fiacchetto... hai usato ben ',k,'
tentativi!');
writeln;
writeln('Gioca pure quante volte vuoi! Premi INVIO per tornare al
DOS.');
readln;
end.
Grazie e ciao.
Paolo Perini
par...@iname.com
 - ATTENZIONE! Questo è il mio indirizzo
                   e-mail corretto! Ricordatevi di cambiarlo
                   quando mi rispondete via posta.
"Non ho bisogno delle riviste! La mia vista divina
mi permette di vedere chi fa la doccia e chi si
cambia!" - il dio KaiohShin

 	num:=Random(50);
Il randomize inizializza il coso dei numeri casuali.
Ciao, Carotino


Fra parentesi: se uno ci impiega più di 10 mosse altro che fiaschetto!! E'
un idiota :-))
Ciao
Emanuele Cesena
d.a.m...@iol.it
ICQ n° #10570672
"Un generatore di numeri casuali non puo' essere scelto a caso", Knuth


Vedo che anche tu, come mei, sei un esperto di generazione casuale :-)


Newsgroup: it.comp.lang.pascal
Titolo: Scioccante video di Alba e Cristina 50504

 Scioccante video hard di Cristina... e
no.email.address.entered?
Che vuol dire?


E' un utente di 
tin.it
.
Quando ha inviato il post aveva l' ip 213.45.151.175 e l' ho gia' segnalato
all' 
ab...@tin.it
.
Staremo a vedere.
ciao, hal

Newsgroup: it.comp.lang.pascal
Titolo: domanda scema!!

Utilizzando variabili dinamiche, ad esempio avendo un albero di puntatori,
come si fa a far uscire l' albero da una procedura che la scorre fino alla
fine(con l' albero passato come variabile), con il puntatore che punta al
primo elemento, in pratica dovrebbe uscire dalla procedura con le dovute
modifiche che subirą all'interno, ma con il puntatore al primo elemento.
Grazie
TommyGun

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

Dovrei costruire l'automa cellulare life in pascal, qualcuno ha una idea di
come fare?
GRAZIE

 ha scritto nel messaggio
news:bV8j8.2016$%g7.5...@twister2.libero.it...


 vuoi". e così continua.

Newsgroup: it.comp.lang.pascal
Titolo: Funzione Findfile?

Tempo fa qualcuno (mi sembra ReDiCuori) mi rispose qui sul NG che era
possibile aprire più file contemporaneamente qualsiasi nome essi avessero,
usando la funzione Findfile, però mi sembra che questa funzione non esista
(almeno in Turbo Pascal).
Vorrei aprire tutti i files di una directory per leggerne i dati, poi
elaborarli ed infine salvarli in un nuovo file.
Potrei usare un'opzione del tipo "aprimi i file *.* di quella directory" ?
Qualcuno è in grado di darmi un esempio?
Grazie
Stefano

GRAZIE!!! ;-)
Ciao
Stefano
ReDiCuori <redicu...@NOSPAMlibero.it> wrote in message
P_3C6.15796$s93.8...@news.infostrada.it...


 end.
Come faccio ad aprirli uno ad uno e a leggerne i dati?
Stefano

"Stefano"  ha scritto nel messaggio

Apri un file alla volta e lo leggi
Ciao ReDiCuori
----------------------------------------
pascal on IRC : #turbopascal
pascal on web : 
www.pascallike.cjb.net
-----------------------------------------

 Apri un file alla volta e lo leggi
Sì, ma in quale punto devo mettere ASSIGN e RESET, e soprattutto come faccio
a scrivere all'interno di ASSIGN il nome del file?
Stefano


Se ti puo' essere di spunto, questo torna il numero di file.pas
e delle righe di ciascuno in un file.log
i file vengono aperti, letti e richiusi, uno per volta.
solo per file di testo.
---------------------------
uses Dos;
var
 DirInfo     : SearchRec;
 log         : text;
 filetrovati : integer;
procedure apriilfile;
var filedaaprire:text;
    righe:integer;
  begin
    assign(filedaaprire,
dirinfo.name
);
    reset(filedaaprire);
    righe:=0;
      while not eof(filedaaprire)
        do begin
             readln(filedaaprire);
             inc (righe);
           end;
    close(filedaaprire);
    append(log);
    writeln(log,righe:4,'    ',
dirinfo.name
);
  end;
begin
  assign(log,'conta.log');
  rewrite(log);
  filetrovati:=0;
  FindFirst('*.PAS', Archive, DirInfo); { Same as DIR *.PAS }
    while DosError = 0
      do begin
           Writeln(DirInfo.Name);
           apriilfile;
           inc(filetrovati);
           FindNext(DirInfo);
         end;
    append(log);
    writeln(log,filetrovati:4,'    File trovati');
    close(log);
end.
-----------------------------
extrabug @ 
iname.com

> Se ti puo' essere di spunto, ....
MOLTO utile!
Grazie anche a te!
Ora  ho praticamente risolto quasi tutto, grazie ai vostri consigli. L'unica
cosa che mi rimane da risolvere è un problema di variabili locali-globali:
se un array mi supera una certa dimensione mi cambia il valore di una
variabile globale, mentre quella locale rimane invariata...boh! Vedrò di
cercare di capirci qualcosa, anche perché credo sia un po' difficile
spiegarlo qui... però mi sta facendo diventare matto!
Ciao
Stefano

 spiegarlo qui... però mi sta facendo diventare matto!
Problema risolto!!
Grazie all'allocazione dinamica della memoria (i puntatori).
Infatti probabilmente l'eccessiva lunghezza del record che leggeva i dati mi
riazzerava lo stack (spero di non dire cavolate) e mi modificava il
contenuto delle variabili.
Stefano
Newsgroup: it.comp.lang.pascal
Titolo: help

come si potrebbe fare un database in pascal?
Valerio

Qualche idea di come fare il classico Blocco note di windows in pascal per
dos??
Valerio

Newsgroup: it.comp.lang.pascal
Titolo: [Fwd: Cerco una lista degli interrupt]

Sto cercando una lista di tutti gli interrupt BIOS e DOS.
Ringrazio chiunque me ne mandi una.
FE...@yahoo.it

you wrote :
#Sto cercando una lista di tutti gli interrupt BIOS e DOS.
#Ringrazio chiunque me ne mandi una.
#
FE...@yahoo.it
Cerca la lista di Ralph Brown in rete.
........................................................
. Andrea Laforgia        (
andrea_...@bigfoot.com
) .
........................................................

 
La trovi su 
WWW.SOFTSEEK.COM
Si tratta della lista degli interrupt di Ralph Brown (mitico!).
I files si chiamato INTER60A.ZIP 
	              INTER60B.ZIP
	              INTER60C.ZIP
	              INTER60D.ZIP
	              INTER60E.ZIP
	              INTER60F.ZIP
	              INTER60G.ZIP
Li' dentro trovi veramente di tutto ...
Newsgroup: it.comp.lang.pascal
Titolo: Professional Developer's Journal n. 11

E' in edicola il numero 11 di PDJ, la rivista dei programmatori
professionisti.
Gli articoli di questo numero:
Anticipazioni su Delphi 4 (Marco Cantù): In questo articolo Marco
ci fornisce un'anteprima delle principali innovazioni di Delphi 4 che
sarà disponibile a partire da Luglio 98. Troverete ulteriori
approfondimenti nel prossimo numero di PDJ.
Help multimediali Win98-like senza Windows 98 (Cosimo Laddomada):
viene presentata una metodologia alternativa per la formazione di
Help HTML (stile Win98), e una implementazione sia del contenitore-
visualizzatore, sia del compilatore dei documenti html.
La creazione di processi in Delphi 3 (Luca Benassi): creare processi
e monitorarne il loro funzionamento: un'esigenza molto sentita e risolta
in questo articolo con Delphi. La soluzione fa uso delle appropriate
funzioni dell'API di Windows, quindi è facilmente adattabile anche ad
altri linguaggi.
Una gestione STD per gli indici Foxpro in Delphi 3 usando il BDE
(Corrado Cavallini): la classe TTable non contiene una funzione di
reindex. L'articolo presenta una sottoclasse di TTable, specializzata
per la gestione degli indici *.CDX. Il metodo esposto può essere
applicato anche alla gestione degli indici *.MDX.
Selezione di directory in stile Windows 95 con Delphi 3 (Luigi Sandon):
in questo articolo vediamo come costruire un componente Delphi per
ottenere un combo-box di selezione delle directory: lo stesso combo-box
utilizzato da Windows Explorer.
Eventi ed Ereditarietà con Visual Basic (Stefano Castelli): il fatto di
poter utilizzare come eventi ed ereditarietà in VB 5 permette di ampliare
la portata dei nostri programmi. In questo articolo li utilizziamo per
creare
meccanismi di ricerca di testo in maniera molto generale.
Usare C++ Builder “alla C++” (Massimiliano Trezzi): il fatto che C++ Builder
sia uno strumento visuale che utilizza la stessa libreria di Delphi non deve
ingannare: per sfruttarlo al meglio bisogna conoscere bene il C++. Il
rischio è quello di utilizzare solo una parte delle potenzialità di cui
dispone,
senza usufruirne dei benefici. In questo articolo potrete trovare qualche
esempio di come la programmazione possa essere diversa tra Delphi e
C++ Builder.
PowerTrace: tracing potenziato con un server ATL/COM (Andrea Bioli): Il
tracing di MFC non è molto user-friendly. Quante volte vi siete trovati a
dover ricercare e commentare/scommentare le vostre TRACE? Sarebbe
molto utile avere un meccanismo che consentisse di selezionare
dinamicamente quali messaggi di trace si vogliono ricevere in un
determinato periodo... La soluzione proposta serve anche da introduzione
al mondo ATL/COM.
Andrea Bioli
Direttore
Professional Developer's Journal

professionisti.
Io sono di Novara, ma non lo trovo. Dove si trova ?
Ciao.Alberto.
Newsgroup: it.comp.lang.pascal
Titolo: Informazioni

Salve,
dovrei realizzare un programmino per il gioco del lotto, basato su frequenza
e ritardi di numeri, conoscete qualche sito che abbia materiale se non
proprio specifico, ma almeno che ci si possa avvicinare?
Grazie mille
-- 
Posted from 
pop09-acc.tin.it
 [212.216.176.72] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000f01c05652$701e12e0$cedbd8d4@gichech...


Ma chi dice il contrario, vai da un'argomento a un'altro comunque grazie lo
stesso, ho gia' sviluppato quello che cercavo!!!
Auguri,buona fortuna!
-- 
Posted from 
mta03-acc.tin.it
 [212.216.176.34] 



esatto:)
giachech: sarebbe un programma inutile
ciao
-- gabri


wrote:

Se riesce a venderlo NO che non sarebbe inutile.
Almeno lui qualche soldo lo guadagnerebbe.
Perche vuoi togliere ai creduloni l'illusione che 
una cosa così li aiuti a diventare ricchi.

 una cosa cosě li aiuti a diventare ricchi.
uhm? di quanti mesi e' questo post? :)
il programma sarebbe inutile di x se'... se poi qualche allocco lo compra,
e' un altro discorso :)
ciao,
-- gabri

Newsgroup: it.comp.lang.pascal
Titolo: R: Traduttore Pascal/C

Scusate mi ero dimenticato qualcosa!!
Sapreste indicarmi dove poter reperire un traduttore di codici da Turbo
pascal
a C ?
Grazie mille.
P.S Vi prego di rispondermi qui 
f.gent...@tin.it

beh sotto linux con quasi quasiasi distribuzione te ne
danno uno... mi sembra p2c, altrimenti ecco: questi sono i primi
links che di darebbe google con la stringa "pascal to c translate"
( "tentar [Google prima del NG] non nuoce" diceva il saggio... )
Pascal to C/C++ converter
www.ispras.ru/~knizhnik/ptoc/Readme.htm
Dave Gillespie Home Page
... P2c is designed to translate large, complex programs. A number of people
have
used p2c to translate 100K- to million-line Pascal programs into C. ...
www.synaptics.com/people/daveg/
Pascal Understands C
www.mactech.com/articles/mactech/Vol.09/09.12/PascalUnderstandsC/
Pascal to C Source Code Translator and Converter. The Quickest and
Easiest Way to Translate Large Pascal Applications to C. ...
www.mpsinc.com/pas2c.html
--
Dreadnaut
(Life would be easier if I had the source code)

 a C ?
P2C, se non mi sbaglio, è un pacchetto presente nella Mandrake 8.X (e forse
anche precedenti) ma è per Linux... per win$ non saprei.
Ciauz
--
KNOWLEDGE IS POWER
http://www.sverzat.com