اجرا يک exe بدون نمایش پنجره Console

[Delphi XE2]

سلام

من راجع به برنامه بدونه فرم سايت رو سرچ كردم
جايي نوشته بودن از كنسول بايد استفاده كرد

حالا چطور ميشه در يه برنامه كنسول
يه شرط برسي بشه
اگه شرط مثبت بود يه فايل كه كنارشه اجرا بشه
و پنجره سياه رنگ را هم نشون نده

[یوسف زالی]

سلام.
می تونی Compiler Directive رو حذف کنی. یعنی همون خط سبزه که به صورت کامنت نوشته شده: {$APPTYPE CONSOLE}

[Delphi XE2]

یه بار نشد ما یه سوال بپرسیم یه جواب درست و حسابی بگیریم


سلام.
می تونی Compiler Directive رو حذف کنی. یعنی همون خط سبزه که به صورت کامنت نوشته شده: {$APPTYPE CONSOLE}

خط سبز منظورت همینه دیگه {$APPTYPE CONSOLE}



program Project1;

{$APPTYPE CONSOLE} // <-------------

{$R *.res}

uses
System.SysUtils;

begin
try
{ TODO -oUser -cConsole Main : Insert code here }
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.


اما صفحه سیاه رو بازم نشون میده

خودت امتحان کردی

[یوسف زالی]

چرا شاکی می شید؟!!!
بله تست کردم.
شاید روی نسخه های مختلف جواب های دیگه بده.

[arash_ebrahimi_nk]

یه بار نشد ما یه سوال بپرسیم یه جواب درست و حسابی بگیریم



خط سبز منظورت همینه دیگه {$APPTYPE CONSOLE}



program Project1;

{$APPTYPE CONSOLE} // <-------------

{$R *.res}

uses
System.SysUtils;

begin
try
{ TODO -oUser -cConsole Main : Insert code here }
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.


اما صفحه سیاه رو بازم نشون میده

خودت امتحان کردی

حرف شما در ورژن های جدید DELPHI درسته به جای کنسول بنویس GUI حلله. (البته قدیما فک کنم WIN32 بود)
موفق باشی.

[Felony]

کلا اون خط رو حذف کنید ، از منوی Project ، گزینه Option رو انتخاب کنید و در سربرگ Linker تیک گزینه Generate Console Application رو بردارید .