Delphi控制台应用程序可以从现有控制台窗口的命令行运行,并且可以通过双击其图标来运行。在后一种情况下,它将创建自己的控制台窗口,并在应用程序终止时将其关闭。
如何判断我的控制台应用程序是否已经创建了自己的窗口?
我想要检测到这一点,这样我就可以显示一条类似"Press Enter to close the window“的消息,让用户在窗口关闭之前阅读所显示的内容。显然,如果应用程序是从命令行运行的,那么这样做是不合适的。
我使用的是Delphi 2010,如果这很重要的话。
你能用Mirosoft Basic 2008速成版制作MS-DOS程序吗?我想做一个没有弹出命令提示符的窗口,DOSBOX,或任何正在使用的窗口。我试图创建一个消息框,但它不会像在MS-DOS中那样!我对VB了解不多,但我需要让所有的东西都停留在DOSBOX上。以下是不会保留在CLI中的模板:
Imports System.Windows.Forms
Public Class Dialog1
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArg
这段代码:
@echo off
set /p a=Installing [<nul
set b=1
:loop
if %b% leq 2 set /p a=°<nul
if %b% gtr 4 if %b% leq 6 set /p a=±<nul
if %b% gtr 6 if %b% leq 8 set /p a=²<nul
if %b% gtr 8 if %b% leq 10 set /p a=±<nul
if %b% gtr 10 set /p a=°<nul
choice /t 1 /c
我有一个文本文件'infos.txt‘,我正在用一个FOR /F语句来解析它。在windows环境下,这是按预期工作的,但我的目标是本地DOS。当从DOS环境运行时,我会收到一个语法错误。我用%i %%i写了它,但没有用。这应该很简单。有什么线索吗?同样,这确实是从窗口中的CMD提示符开始工作的,但在VirtualBox DOS或通过USB引导到DOS并运行bat文件时,两者都不起作用。
我的定界符是=
@ECHO OFF
FOR /F "tokens=2 delims==" %%i in (infos.txt) do echo.%%i
我正在完成一个用于Windows的Turbo Pascal 7程序,这是一个编程班级项目的一部分,基本上我们已经得到了一个简报,并告诉我们自己去实现和编码这个程序。
简要说明创建一个程序,在该程序中,用户可以输入一条消息,选择一个字母班次,然后每个字母将根据该班次进行“加密”(本质上是ROT13)。很简单。
我在Turbo Pascal for Windows7终端窗口中运行,它输出结果加密文本:
writeln('Encrypted message is ', line ,' for a shift of ', shift);
readln;
我想做的是进一步