Exatamente colega,
Nem sabia que era normal isso, que dureza ! Tava precisando voltar para o
comando acima. Pensei que tinha outro jeito. Mas obrigado, vou usar o console
sem a unit CRT32D7 e nesse caso tem como voltar para o comando passado.
O pior eh que eu queria usar o tal LIMPAR TELA, exemplo CLRSCR para utilizar
isso tem que ter a unit crt32 ou crt32d7.
Vlw.
Luciflávio Gomes de Santana
Graduando Sistemas de Informação - 7º Período
Justiça Federal do Estado de Sergipe - Técnico de Suporte
Secretaria Municipal da Educação - Técnico de Suporte
----- Mensagem original ----
De: Rubem Nascimento da Rocha <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 18 de Abril de 2008 10:22:05
Assunto: RE: [delphi-br] CRT32D7
Nunca ouvi falar dessa unit CRT32D7. E acredito que ninguém (além de vc)
conhece essa dita! Poderia falar mais sobre essa unit? Pelo seu nome, deduzo
que seja uma unit que vc tenha encontrado na Internet para desenvolver
aplicações console.
Sobre a sua inquietação mencionada ("ele não mostra todos os dados do
programa"), vc está se referindo ao comportamento que se tem à medida que se
emite a instrução WriteLn()? Se sim, deveria saber que isso é um comportamente
absolutamente normal em aplicações console. Não tem resolver isso, ou seja, não
tem como voltar atrás ao que se é emitido em linha de comando. Nem nos tempos
áureos do MS-DOS isso era possível.
Se não entendi direito sua dúvida, forneça mais detalhes e uma explicação mais
detalhada do seu problema.
Sds.
____________ _________ _________ __
To: [EMAIL PROTECTED] os.com.br
From: [EMAIL PROTECTED] com.br
Date: Thu, 17 Apr 2008 18:48:25 -0700
Subject: [delphi-br] CRT32D7
É o seguinte pessoal, ao executar o programa pascal dentro do delphi contendo o
tal uses crt32d7 ele não mostra todos os dados do programa, exemplo: quando
passa as informaçoes vai subindo, soh que não tem como ver o que está em cima
ou seja as informaçoes passadas.
tem como resolver isso ?
Luciflávio Gomes de Santana
Graduando Sistemas de Informação - 7º Período
Justiça Federal do Estado de Sergipe - Técnico de Suporte
Secretaria Municipal da Educação - Técnico de Suporte
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
http://br.mail. yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
____________ _________ _________ _________ _________ _________ _
Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o
Messenger! É GRÁTIS!
http://www.msn. com.br/emoticonp ack
<!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#0000ff;text-decoration:none;}
-->
<!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
-->
<!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-reco {
margin-bottom:20px;padding:0px;}
#ygrp-reco #reco-head {
font-weight:bold;color:#ff7900;}
#reco-grpname{
font-weight:bold;margin-top:10px;}
#reco-category{
font-size:77%;}
#reco-desc{
font-size:77%;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
-->
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
http://br.mail.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
