writele()和readln有问题!(50分)

A

ak

Unregistered / Unconfirmed
GUEST, unregistred user!
如何生成一个只含以下程序的工程:
program intdemo;
var
val1:integer;
begin
val1:=30;
writeln('The val1 is:',val1);
readln;
end.
上面程序一执行,要么显示103或代码错误,要么根本不writeln和readln?
 
W

wjiachun

Unregistered / Unconfirmed
GUEST, unregistred user!
还没有AssignFile那,不能读写
建议你看看Pascal的书籍先
 
H

htw

Unregistered / Unconfirmed
GUEST, unregistred user!
先看pascal的书吧,这种问题都问的话,你是没法当个合格的程序员的。
 
L

loxer

Unregistered / Unconfirmed
GUEST, unregistred user!
这是Pascal语言,不是Delphi语言。
 

张剑波

Unregistered / Unconfirmed
GUEST, unregistred user!
htw:
注意 AK 的自信心。
 
H

hbsandy

Unregistered / Unconfirmed
GUEST, unregistred user!
用delphi改写即可!
Try it yourself!
 
M

mat

Unregistered / Unconfirmed
GUEST, unregistred user!
writeln和readln都需要先声明读写文件的类型,直接执行往那里读写文件内容。
这样的问题在一般的DELPHI书上都有介绍。看书先。
 

萧月禾

Unregistered / Unconfirmed
GUEST, unregistred user!
这只是PASCAL的入门问题,不过DELPHI是基于OBJECT PASCAL的,以此为基础没有错
一步一步来吧,别管别人怎么说

 

吴明星

Unregistered / Unconfirmed
GUEST, unregistred user!
W

wjiachun

Unregistered / Unconfirmed
GUEST, unregistred user!
program intdemo;
var
f:textfile;
val1:integer;
begin
val1:=30;
assignfile(f,'c:/test.txt');
writeln(f,'The val1 is:'+inttostr(val1));
readln;
end.

还不结束??
 

一个过客

Unregistered / Unconfirmed
GUEST, unregistred user!
你们别自作聪明!人家只是要向标准输出(屏幕)打印几个字符而已,
你们吃饱了撑的写什么文件?我要是ak早被你们气死了!

别听他们的,这样改就好了:
program intdemo;
var
val1:integer;
begin
val1:=30;
<font color=red>{$I-}</font>
writeln('The val1 is:',val1);
readln;
<font color=red>{$I+}</font>
end.
 

一个过客

Unregistered / Unconfirmed
GUEST, unregistred user!
注意你们自己的自信心吧!
 
L

lha

Unregistered / Unconfirmed
GUEST, unregistred user!
>>来自:htw 时间:01-4-8 16:24:02 ID:496009
>>先看pascal的书吧,这种问题都问的话,你是没法当个合格的程序员的。

唉,大富翁怎么变成这样了,不好好解决别人的问题而打击新手。

to wjiachun: 你在误导他!

to ak:
你要写的是以前的Pascal(DOS下),现在用的是Delphi(属于Windows编程)
先 New 选Console Application,然后就可以了。

program Project1;
{$APPTYPE CONSOLE}
uses SysUtils;
var
val1:integer;
begin
val1:=30;
writeln('The val1 is:',val1);
readln;
end.
编译运行,ok!


to 一个过客:呵呵,又遇到你了。
 
P

Phoenix2000

Unregistered / Unconfirmed
GUEST, unregistred user!
你这个程序没有使用 {$APPTYPE CONSOLE} 编译指示,那么编译器默认情况下将此程序编译
为基于 GUI 的图形用户接口程序,那么 Write、Writeln、Read、Readln 的输入输出必须
指定文件才能正确!除非你在程序中的 program intdemo 下一行加入 {$APPTYPE CONSOLE}
那么就编译为控制台程序,虽然也是基于 Win32 的,但是完全是模拟了传统 DOS 程序的
行为,不使用 GUI 的。这时,Write 等过程将自动把标准输入输出设备映射为默认文件进
行操作,程序就正常了。这种情况在 VC++、C++Builder 中都是一样的!如果不信的话,你
可以在 VC++ 中试试 printf 函数,只要不编译为控制台模式程序,也会出错的。问题就
在于这个标准 I/O 设备上。对于过去的老的 Pascal 程序,Delphi 其实是完全支持的,
只要你把他编译为控制台模式就可以了,不过对于某些特殊的程序(比如使用了 BGI)就
不行了。还有一点,就是控制台模式程序虽然很像传统的 DOS 程序,但内核却是真正的
Win32 结构,绝对不能在真正的纯 DOS 环境下运行(比如 DOS 6.22),只能在 Win9x/nt/2000
的 MS-DOS 方式下运行。不过,我已经往 中国软件 www.csdn.net 上传了一个 Delphi 的
扩展开发包,可以使 Delphi 也可以开发出真正的纯 32 位的保护模式 DOS 程序,就像
用 Watcom C++ 开发的 DOS4GW 程序一样,完全的 DOS 内核,可以使用 4GB 内存,保留了
Delphi 的优秀的 OOP 结构……具体的内容可以在大富翁论坛里找我发的一个帖子,名字
好像叫“Delphi for DOS”吧,我记不清了 :)
 
D

Derlin

Unregistered / Unconfirmed
GUEST, unregistred user!
来晚一步!
 
W

wjiachun

Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.
 

Similar threads

S
回复
0
查看
787
SUNSTONE的Delphi笔记
S
S
回复
0
查看
790
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部