如何製作乙個可以在 Delphi 下的純 DOS 下執行的程式不是控制台程式

首先，這必須是 16 位可執行檔案。

Delphi2 全部用於 32 位系統。

無法生成 16 位**。

如果房東需要這樣的程式。

然後是以下選項。

Turbo C 語言）。

Turbo Pascal（Pascal 語言，類似於 Delphi）是 Borland 的編譯器。

可以在網路上找到。

視窗程式。 也就是說，控制台程式也是乙個 Windows 程式，所以控制台程式也可以使用 Windows API 和 Windows 所具有的其他庫函式，也就是說控制台程式可能無法在 DOS 下執行。

Delphi 是為 Windows 程式設計師設計的，它可以編寫控制台程式和視窗程式，其實可以理解為控制台程式是乙個非視窗程式，房東可以發現 Delphi 視窗程式中有 windows、form 等庫引用，也就是說，它只是在控制台程式的基礎上使用 Windows 功能， 所以綜上所述，在DOS下執行乙個window程式是可能的，但是房東需要將所有使用的Windows庫複製到程式目錄下（幾乎是整個Windows）並修改程式以使其與DOS相容，但是沒有必要為此釣魚。

在 delphi7 中，有乙個 winexec 命令，允許您直接執行特定的 dos 命令。

例如，如果要開啟 tlenet 服務，可以先定義乙個字串變數 mycmd 來儲存 dos 命令，然後通過 winexec 執行，並在執行時新增 sw hide 引數，可以隱藏 dos 視窗的效果。

varmycmd:string;

開始啟用 Tlenet 服務。

mycmd:='net start telnet';

winexec(pchar(mycmd),sw_hide);執行命令。

end;

winexec('cmd /c del c:\',sw_hide);刪除 C： 檔案。

讓我們來看看。

Winexec 是執行外部程式，SW Hide 不顯示表單，cmd c 是執行完成後自動關閉。

德爾福其實在Linux系統下有乙個Kylix版本，你們說那個程式的編譯系統是自成一派的，Windows下的很多DLL檔案都是VC++編譯的，但是最後還是不用依靠Windows的系統核心來執行呢，這就是原因。如果編譯好的程式用完了系統，則它已經超出了程式的範圍，並且已經公升級到了系統的範圍。 軟體系統與系統軟體之間還是有本質區別的。

因為預設情況下您的 cmd 路徑是錯誤的。 先寫cd c：在執行你的**之前，最好先寫乙個批處理檔案。

如果它是乙個單獨的 DOS 程式，請不要呼叫 cmd

作為開發工具，它是一種特殊的應用軟體，需要執行在某個作業系統平台上。

Delphi 的前身是 Pascal，從這個意義上說，Delphi 有乙個基於 DOS 的 Pascal 版本（儘管不一定是 Delphi）、乙個基於 Windows 的 Delphi 版本和乙個基於 Linux 的 Kylix 版本（Delphi 的 Linux）版本。

作業系統直接與計算機硬體打交道，可以看作是硬體的一種封裝。 如DOS、Windows、Unix、Linux、OS 2等。

應用程式處理作業系統，對使用者來說，是作業系統的封裝。 如：IE、QQ、Word、各種遊戲等。

各種開發工具也是眾多應用軟體中的一種，當然，都是基於某個作業系統平台的。

當然，開發工具也可以直接獨立於作業系統而存在。 只是要做的工作太多了，使用者不得不接受，推廣過程很艱難。 因此，除了一些特殊領域（如手機、醫療器械）外，這種做法一般不是首選。

winexec('c:\ ',1);

winexec(' /c cd\',0);隱藏 DOS 視窗。

winexec(' /k cd\',1);顯示 DOS 視窗。

如果不想有視窗，只需使用 win32 程式，並將視窗設定為隱藏。

程式語言與作業系統不同，嚴格來說，它是一種程式設計工具，其基礎是Pascal語言。

任務語言只是乙個工具，而 delphi 就是乙個可以編譯這種語言的程式，任何程式都必須在作業系統中執行。

比如過去，在DOS下，有大名鼎鼎的Turbo C Turbo Pascal，這些程式設計作業也是在作業系統下執行的。

然後你可以使用Pascal，你可以擁有DOS，Delphi是人們專門為WIN系統開發的軟體開發工具。 你問的是。

系統軟體和應用軟體的概念不明確。 計算機級內容。

winexec(edit1．text,sw_hide);它必須是文字才能啟動已註冊的程式。

我不知道具體怎麼呼叫deiphi，但是在C下，可以使用該函式呼叫dos命令：system（char *command）; 如果你能打電話給它。

system("dir");

system("copy c:\ d:\"