Written by Loryea Ottobre 30, 2011, 09:27:00 pm15552 ViewsRating: 0 (0 Rates)Print
Introduzione Buongiorno, oggi vi insegnerò come utilizzare al meglio tutte le unità esterne, tra le quali mouse, stampante, scanner... Inizio a dirvi subito che gli esempi e i termini che si utilizzeranno durante la guida saranno fedeli al free-pascal.
Cercando con Google si possono trovare link per lo scaricamento di queste appartenenti alla rtl (run time library)
Keyboard Ovviamente, appiamo bene che per input pascal, si utilizza read(X:String)/readln(X:String), ma per delle funzioni avanzate della tastiera, usare la libreria Keyboard é fondamentale. Molti di voi sicuramente saranno perplessi e si chiederanno cosa si potrebbe fare con queste funzioni AVANZATE, ed é per questo che descriverò subito la loro utilità:
Utilizzare tasti particolari (come F12 o pag. su o up (freccietta) senza l'utilizzo delle direttive
Utilizzare un qualsiasi tipo di joystick
Per inizializzare il driver della tastiera o joystick utilizzare la procedura InitKeyboard, per disattivarlo DoneKeyboard, entrambe senza parametri.
La maggior parte delle costanti della libreria son tasti particolari:
KbdF1 F1 KbdF2 F2 KbdF3 F3 KbdF4 F4 ecc. KbdAlt Alt KbdCtrl Crtl KbdApps Menù principale KbdDown Freccetta Giù KbdUp Freccietta Sù KbdRight Freccetta Destra KbdLeft Freccetta Sinistra KbdPgDN Pagina Giù KbdPgUP Pagina Su KbdHome Home KbdShift Shift
KbdDelete Nascondi carattere KbdInsert Fai apparire carattere
Program EsmpioMouse; Uses Graph,Mouse; Var X,Y:integer;
Begin Gd:=detect; InitGraph(Gd,Gm,’C//:FPC’); RestetMouse; SetMouseWindow(0,0,1000,1000); {Ecco un bottone} Rectangle(0,0,100,100); {Diamogli il valore di bottone per il mouse} X:=GetmouseX; Y:=GetmouseY; If ((X>0) and (Y>0) and (X<100) and (Y<100) then Write(Fine programma); Readln; Resetmouse; End.
Ecco le funzioni: Resetmouse Restetta il mouse, lo inizializza o lo chiude, da usare all’inizio e alla fine per il corretto funzionamento della prossima funzione. Setmousewindows In collaborazione con resetmouse da le coordinate di un rettangolo limite delle operazioni col mouse. GetmouseX/Y Mi sembra abbastanza ovvio guardando il codice: Restituisce la posizione del mouse rispetto all’asse X o Y.
Il programma è molto incompleto anche se funzionante, mancano: Left/Rightpressed Restituisce true se premuto il tasto sinistro o destro (left/right) del mouse. Mouseinstalled: Restituisce true se installato un mouse.
Per concludere, la tavola grafica è molto semplice da usare, basta registrare in memoria la posizione del click del mouse e subito dopo rispondere cambiando il colore di quel pixel o di quei pixel. Infatti la maggior parte delle tavole grafiche sono corrispondenti ai driver dei mouse.
Per maggiori dettagli:
Siamo giunti finalmente alla libreria più attesa, printer che permette di stampare da stampante (o plotter) testi in/output. Ecco come fare, in maniera molto semplice:
Initprinter: Inizializza driver stampante o plotter; Assinglst: stampa testo (parametro); IsLstAvaiable: controlla se c’è un driver stampante o plotter installato;
Altro Una volta inserita un’unità esterna, essa sarà parte di quella interna quindi per aprire unità esterne, basta inserirle nel computer e aprirle con una directory normale. Parlando in termini di windows, però, c’è un cambiamento: Il prefisso “C:” cambia e diventa
E: Per le SD card D: Per i compact disk (DVD RW) Z: Per le memory card F: Per le pendrive
Sempre con windows, si può determinare un prefisso di unità esterna, aprendo “computer” o “risorse del computer” (a seconda delle versioni) e vedendo il nome dell’unità appena inserita seguito dal prefisso tra parentesi. Per altri sistemi operativi, ci sono altri modi sempre semplici.
Vi auguro un buon uso di queste funzioni nei vostri futuri programmi.
About the author
Loryea registered at Italian community of Lazarus and Free Pascal on Ottobre 19, 2011, 03:40:18 pm and has posted 117 posts in the boards since then. Last visit was Luglio 22, 2012, 06:29:14 pm.
Written by xinyiman
il Novembre 10, 2011, 09:26:10 pm
Gran bell'articolo
2) Re: Utilizzare Unità esterne
Written by Legolas
il Novembre 24, 2011, 03:55:27 pm
Notavo un'imprecisione: non è detto che le periferiche esterne in windows vengano mappate sempre e solo su quelle lettere di unità; in linea di massima è così, ma se - esempio - assegno una unità virtuale alla lettera F tramite il comando DOS "subst", se in seguito inserisco una pendrive, essa avrà assegnata una lettera differente, probabilmente G.
Commenting option has been turned off for this article.
Questo blog non rappresenta una testata giornalistica poiché viene
aggiornato senza alcuna periodicità. Non può pertanto considerarsi un
prodotto editoriale ai sensi della legge n. 62/2001.
Questo sito utilizza cookie, anche di terze parti, per offriti servizi in linea con le tue preferenze. Chiudendo questo banner, scorrendo questa pagina, cliccando su un link o proseguendo la navigazione in altra maniera, acconsenti all’uso dei cookie.