-mwindows

具体给个例子让我看看啊. -mwindows是什么意思?我不懂啊. 谢谢孟兄.

我的编译系统怎么不认识 -mwindows gnatbind:missing numeric value for switch:m 你用的什么编译的啊??

Gnat 3.15

我下载了仍然出现同样的问题.后来用Wscite,编译成功,可 出现ld:can not find -lgtkada 我该怎么使它知道GTKADA的目录啊. gnatbind 里也没 -mwindows 只有-Z NO MAIN SUBPROGRAM(ZERO MAIN)的选项

编译gtkada程序，需要加入 -IC:\GtkAda\include\gtkada 参数（假设gtkada安装在C:\GtkAda）。

要去掉dos窗口需要加入 -mwindows 参数。

如：gnatmake xxx.adb -mwindows -IC:\GtkAda\include\gtkada

我安装了gps-2007和gtkada-2.8，在命令行了执行以上命令编译成功，在IDE里面加上以上2个参数也编译成功。

我在SCITE的相应部分作了修改，即gnatmake -mwindows $(FileName)

编译后成功。可在JGRASP与GPS里+命令都没成功，不晓得怎么回事。

-I命令可以不要的，因为我首先安装了GNAT3.15以及GNAT3.15-WIN，在

注册表里就可以发现库了，接着安装GPL2006或者2007的，再安装GTKADA，

在注册表中加入gtkada2.8.0:"DIR:\GTKADA\include\gtkada"

# Define SciTE settings for Ada files.
filter.ada=Ada (ads adb)|*.adb;*.ads|
file.patterns.ada=*.ads;*.adb
lexer.$(file.patterns.ada)=ada
#indent.size.$(file.patterns.ada)=3
#use.tabs.$(file.patterns.ada)=0
# Keyword except of operator keywords
keywordclass.ada.main=abort abstract accept access aliased all array at begin body \
case constant declare delay delta digits do else elsif end entry exception exit for \
function generic goto if in is limited loop new null of others out package pragma \
private procedure protected raise range record renames requeue return reverse \
select separate subtype tagged task terminate then type until use when while with
# Keywords for operators
keywordclass.ada.operators=abs and mod not or rem xor
keywordclass.ada=$(keywordclass.ada.main) $(keywordclass.ada.operators)
keywords.$(file.patterns.ada)=$(keywordclass.ada)
# Ada styles
# Default
style.ada.0=fore:#808080
# Keyword
style.ada.1=$(colour.keyword),bold
# Identifiers
style.ada.2=
# Number
style.ada.3=$(colour.number)
# Operators (delimiters)
style.ada.4=$(colour.operator),bold
# Character
style.ada.5=$(colour.char)
# End of line where character is not closed
style.ada.6=fore:#000000,$(font.monospace),back:#E0C0E0,eolfilled
# String
style.ada.7=$(colour.string)
# End of line where string is not closed
style.ada.8=fore:#000000,$(font.monospace),back:#E0C0E0,eolfilled
# Label
style.ada.9=fore:#7F0000
# Comment
style.ada.10=$(colour.code.comment.line),$(font.code.comment.line)
# Illegal token
style.ada.11=fore:#FF0000
# Comments
comment.block.ada=--~
braces.ada.style=4
statement.indent.$(file.patterns.ada)=5 begin declare else elsif exception for if is loop while
statement.end.$(file.patterns.ada)=10 ;
statement.lookback.$(file.patterns.ada)=20
block.start.$(file.patterns.ada)=10 then is
block.end.$(file.patterns.ada)=10 end
calltip.ada.word.characters=._$(chars.alpha)
adagcc=gcc -c $(FileNameExt)
#######################################################################
#AppleLab Modify 2005/04/20
#---------------------------------------------------------------------------
gnatmake=gnatmake $(FileName)
#command.compile.*.ads=$(adagcc)
command.name.0.*.ads=编译
command.0.*.ads=$(adagcc)
command.name.1.*.ads=捆绑
command.1.*.ads=gnatbind $(FileName)
command.name.2.*.ads=连接
command.2.*.ads=gnatlink $(FileName)
command.name.3.*.ads=生成EXE
command.3.*.ads=gnatmake -mwindows $(FileName)
command.name.4.*ads=命令运行
command.4.*ads=gexecute $(FileName)
command.name.5.*.ads=直接运行
command.5.*.ads=$(FileName)
#command.build.*.ads=$(gnatmake)
#command.go.*.ads=$(FileName)
#---------------------------------------------
#command.compile.*.adb=$(adagcc)
command.name.0.*.adb=编译
command.0.*.adb=$(adagcc)
command.name.1.*.adb=捆绑
command.1.*.adb=gnatbind $(FileName)
command.name.2.*.adb=连接
command.2.*.adb=gnatlink $(FileName)
command.name.3.*.adb=生成EXE
command.3.*.adb=gnatmake -mwindows $(FileName)
command.name.4.*.adb=命令运行
command.4.*adb=gexecute $(FileName)
command.name.5.*.adb=直接运行
command.5.*.adb=$(FileName)

#command.build.*.adb=$(gnatmake)
#command.go.*.adb=$(FileName)