菜鸟问题：Delphi中有没有类switch语句？

Question

1、
var ii: Integer;
case ii of
   0:begin   end;
   1:begin   end;
   2:begin   end;
   else begin   end;
end; 2、
exports
  MyFun;

Answer 1

Case语句类似Switch
菜单->NewItem->New->Dll Wizard

Answer 2

还要说明的是每个Case语句后，不需要加Break！！！

Answer 3

怎么不用case呢?
case 表达式 of
表达式值1:....;
表达式值2:....;
...
end;
注意表达式值不能为字符串型.
新建dll工程,不是在菜单File->new... 中有个DLL吗?
然后你在此dpr文件中实现函数,export 函数名即可.

Answer 4

dll中输出函数的定义和输出声明都在dll.dpr文件中写吗？
另外delphi中有没有类c中的#define NUM_1 1这样的define预定义语句？
有没有其他实现方法？

Answer 5

我记不清楚 是不是TypeDef 了

Answer 6

case xxx of
相当于switch+break

Answer 7

delphi中有没有类c中的 #define NUM_1 1 这样的define预定义语句？
有没有其他实现方法？

Answer 8

Case V of
...
end;#define NUM_1 l; <=> Const NUM_1=L;

Answer 9

var
  i;integer;
begin
  case i of
   1:ShowMessage('1');
   2:ShowMessage('2');
   else:
     ShowMessage('I dont know');
  end; 
end;