[PASCAL!!!!] Controllo errori

beog · 10-11-2003, 11:42

Ciao ragazzi, devo chiedervi una cosa su... PASCAL!!!!
Detto Furbo Pasquale per gli amici.

Sapete come si gestiscono gli errori in PASCAL? una specie di try - catch?

In pratica io devo far leggere un input e voglio un Integer.
Se il pirla dell'utente mi da "adabaada" al posto di un numero io non vorrei che uscisse dal programma, ma voglio insultare un po' l'utente e poi rifargli provare.
Insomma un ciclo finchè non mi da un benedetto numero.

Io ho penso che o mi serve il corrispettivo in JAVA di try-catch oppure un CharAt (che mi legga un carattere alla volta della stringa in input).

Sapete, se esistono, a quali comandi corrispondono?? Grazie,ciao

cisc · 10-11-2003, 12:24

ti devi arrangiare o leggendo in una stringa, controllare che i caratteri siano effettivamente numeri e convertirla quindi in un numero (procedura val), oppure "abilitando" solo alcuni caratteri (tipo se l'utente digita tasti che non sono numeri, non registra la digitazione ne a video e ne nella stringa di lettura, che poi verrà convertita in numero con la solita procedura senza il controllo)

spero di essere stato chiaro, ciao

beog · 10-11-2003, 12:44

procedura val...
potresti farmi un esempio di come posso usarla?

Grazie 1000

ilsensine · 10-11-2003, 13:12

Il Pascal della Borland (Delphi) ha i costrutti try...except...end e try...finally...end. Sono però estensioni Borland, nulla è presente nel Pascal standard. Non so se questi costrutti sono implementati già nel Turbo Pascal.

beog · 11-11-2003, 10:12

No, io devo usare Furbo Pasquale. Non Delphino.
Credo che cisc abbia indicato una soluzione, ma non ho capito il comando preciso.

Grazie

cisc · 11-11-2003, 21:03

la procedura val è una semplicissima procedura che converte una stringa in numero (c'è tutto il funzionamento sull'help del TP 7)

10-11-2003, 11:42	#1
beog Senior Member Iscritto dal: Apr 2001 Messaggi: 850	[PASCAL!!!!] Controllo errori Ciao ragazzi, devo chiedervi una cosa su... PASCAL!!!! Detto Furbo Pasquale per gli amici. Sapete come si gestiscono gli errori in PASCAL? una specie di try - catch? In pratica io devo far leggere un input e voglio un Integer. Se il pirla dell'utente mi da "adabaada" al posto di un numero io non vorrei che uscisse dal programma, ma voglio insultare un po' l'utente e poi rifargli provare. Insomma un ciclo finchè non mi da un benedetto numero. Io ho penso che o mi serve il corrispettivo in JAVA di try-catch oppure un CharAt (che mi legga un carattere alla volta della stringa in input). Sapete, se esistono, a quali comandi corrispondono?? Grazie,ciao

10-11-2003, 12:24	#2
cisc Senior Member Iscritto dal: Nov 2002 Città: Cosenza --> Roma Messaggi: 853	ti devi arrangiare o leggendo in una stringa, controllare che i caratteri siano effettivamente numeri e convertirla quindi in un numero (procedura val), oppure "abilitando" solo alcuni caratteri (tipo se l'utente digita tasti che non sono numeri, non registra la digitazione ne a video e ne nella stringa di lettura, che poi verrà convertita in numero con la solita procedura senza il controllo) spero di essere stato chiaro, ciao __________________ GNU MyServer Wants YOU!! We live thinking we will never die. We die thinking we had never lived. Jason Becker

10-11-2003, 13:12	#4
ilsensine Senior Member Iscritto dal: Apr 2000 Città: Roma Messaggi: 15625	Il Pascal della Borland (Delphi) ha i costrutti try...except...end e try...finally...end. Sono però estensioni Borland, nulla è presente nel Pascal standard. Non so se questi costrutti sono implementati già nel Turbo Pascal. __________________ 0: or %edi, %ecx; adc %eax, (%edx); popf; je 0b-22; pop %ebx; fadds 0x56(%ecx); lds 0x56(%ebx), %esp; mov %al, %al andeqs pc, r1, #147456; blpl 0xff8dd280; ldrgtb r4, [r6, #-472]; addgt r5, r8, r3, ror #12

11-11-2003, 21:03	#6
cisc Senior Member Iscritto dal: Nov 2002 Città: Cosenza --> Roma Messaggi: 853	la procedura val è una semplicissima procedura che converte una stringa in numero (c'è tutto il funzionamento sull'help del TP 7) __________________ GNU MyServer Wants YOU!! We live thinking we will never die. We die thinking we had never lived. Jason Becker

10-11-2003, 12:44	#3
beog Senior Member Iscritto dal: Apr 2001 Messaggi: 850	procedura val... potresti farmi un esempio di come posso usarla? Grazie 1000

11-11-2003, 10:12	#5
beog Senior Member Iscritto dal: Apr 2001 Messaggi: 850	No, io devo usare Furbo Pasquale. Non Delphino. Credo che cisc abbia indicato una soluzione, ma non ho capito il comando preciso. Grazie

Strumenti
Mostra una versione stampabile Invia questa pagina per email