小编Sti*_*ray的帖子

德尔福枚举不同单位

所以我使用Delphi消耗SOAP服务,但努力设置枚举的值.以下是枚举声明:

Extension = (pdf, xls, txt, xlsx, docx, doc, xml, png, jpg, gif);
Run Code Online (Sandbox Code Playgroud)

一旦导入WSDL,就会在Delphi导入单元中声明.现在我的应用程序正在使用这个单元,我尝试了以下选项,但无济于事.

选项1 :(不编译.未申报的标识符:'pdf')

uses SOAPAPI_Unit
type
   Extension = SOAPAPI_Unit.Extension;
....
procedure TForm1.Button2Click(Sender: TObject);
var
   Ext : Extension;
begin
   Document.Extension := pdf;
end;
Run Code Online (Sandbox Code Playgroud)

选项2 :(编译,但我收到服务器错误,说没有设置对象引用)

uses SOAPAPI_Unit

....
procedure TForm1.Button2Click(Sender: TObject);
var
   Ext : SOAPAPI_Unit.Extension;
begin
   Document.Extension := Ext(0);
end;
Run Code Online (Sandbox Code Playgroud)

选项3(在主.pas文件中重新声明枚举,但后来我得到不兼容的类型:'SOAPAPI_Unit.Extension'和'formMain.Extension')

uses SOAPAPI_Unit
type
   Extension = (pdf, xls, txt, xlsx, docx, doc, xml, png, jpg, gif);
....
procedure TForm1.Button2Click(Sender: TObject);
var
   Ext : Extension;
begin
   Document.Extension := pdf; …
Run Code Online (Sandbox Code Playgroud)

delphi enums

1
推荐指数
1
解决办法
510
查看次数

标签 统计

delphi ×1

enums ×1