显示简单图形
摘要:program Project1; {$APPTYPE CONSOLE} begin Writeln(' | | '); Writeln(' x| | '); Writeln('---|---|---'); Writeln(' | 0 |x '); Writeln('---|---|---'); Writeln(' | 0 | ');...
阅读全文
posted @
2007-11-22 16:21
万一
阅读(6344)
推荐(0) 编辑
控制台读写
摘要:program Project1; {$APPTYPE CONSOLE} var str: string; begin Writeln('请输入:'); Readln(str); Writeln('你输入的是:' + str); Readln; end.
阅读全文
posted @
2007-11-21 13:05
万一
阅读(6916)
推荐(1) 编辑
最简单的Delphi程序(Windows)
摘要:program Project1; uses Windows; begin MessageBox(0,PChar('Ok!'),PChar('Title'),0); end.
阅读全文
posted @
2007-11-21 13:02
万一
阅读(8492)
推荐(0) 编辑
最简单的Delphi程序(控制台)
摘要:program Project1; {$APPTYPE CONSOLE} //uses // SysUtils; {这两行,在本程序中无用,如果带着程序大小是:44.5k; 注释掉程序是19k} begin Writeln('ok'); Readln; end.
阅读全文
posted @
2007-11-21 13:01
万一
阅读(12160)
推荐(1) 编辑