ChkClick Sorgente - Libreria Giobe.TPU

ChkClick

CODICE SORGENTE [3 di 4]

La funzione è scritta in Pascal

La procedura verifica lascia la variabile vera se è nel riquadro ed è stato premuto un pulsante

Codice Sorgente
FUNCTION ChkClick (rig,col1,col2:word):boolean ; VAR pixel:boolean; BEGIN ChkClick:=false; pixel:=false; IF ((rigMou(pixel)=rig) AND (colMou(pixel)<=col2) AND (colMou(pixel)>=col1) AND (pulMou<>0)) THEN ChkClick:=true; END;

PASCAL »

PROCEDURE »	Caratteri \| Mouse \| Tastiera \| Tempo, Data & Ora Box \| Cornici \| Cursore \| Aree a Riga Intera \| Aree a Schermo Totale
FUNZIONI »	Caratteri \| Mouse \| Tastiera \| Tempo, Data & Ora

^Home