Pascal/Turbo Pascal - Ayuda con el modo grafico???

 
Vista:

Ayuda con el modo grafico???

Publicado por LoCo... (16 intervenciones) el 17/03/2001 05:14:41
Tengo un problema o sea que cuando estoy diseñando un programa en el modo grafico y quiero leer una variable, uso el readln o el read pero lo que no me gusta es que salen los caractees como si fuera de modo texto y lo que quiero yo, es que salga como una de las fuentes que trae la unit graph.....

Que funcion puedo usar para leer las variables entonces o que proceso puedo emplear etc...

Ya le hice la lucha con esto mas o menos:

repeat
c:=readkey)
outtext(c);
until c=#13;

funciona bien pero cuando pulso retroceso me pone un caracter en forma de cuadro cuando me deberia borrar el caracter anterior..... como valido eso??
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con el modo grafico???

Publicado por Maverick01 (26 intervenciones) el 17/03/2001 15:12:43
prueba este código:

setcolor(texto);
cad:='';
cad_aux:='';
Repeat
If (key<>#13)and(key<>#8)and(key<>#10)and
(key<>#27) then
Begin
cad:=cad+key;
outtextxy(x,y,cad);
End;
if key=#8 then
Begin
setcolor(fondo);
outtextxy(x,y,cad);
for I:=1 to length(cad)-1 do
cad_aux:=cad_aux+cad[i];
cad:=cad_aux;
setcolor(texto);
outtextx,y,cad);
end;
Until (key=#13)or(key=#17);
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar