Illegal character in input file: '?' ($3F) (10分)

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #1

帮我想想，谢谢！
j:=(i?i?i?i mod (i+30))+(i?i mod (i+20))+i?3+1;
提示错误：
[Error] Illegal character in input file: '?' ($3F)
如何办？

 

W

wzboy1984

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #2

在第二个窗体f_about中加
uses f_system;
或者选择菜单file->use unit,在弹出的窗口中选择主窗体。

 

X

XWHope

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #3

private不行
改成public
当然还要引用主窗体

 

K

komaz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #4

函数在public下声明
第二个窗体f_about -> uses f_system;

 

K

kouchun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #5

對了,就是 uses f_system;
不過建議你用一個公共單元放起來...

 

P

pany

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #6

虽然uses 都有可能.但我觉得还是赞成"XWHope"的.

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #7

Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter'?????????

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-09

• #8

提示如下错误:
Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter'?
怎么办?如何改正呢?

 

晋

晋少

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #9

建议：公共型的函数、过程都写到另一个单元中去，以便共享使用。

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #10

提示如下错误:
Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter'?
怎么办?如何改正呢?

 

B

BrainYang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #11

提示如下错误:
Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter'?
怎么办?如何改正呢?
----------------------------
把
主窗体：f_system中的下面一段
private
procedure Encrypt(TempStr:string);
改成
public
function Encrypt(TempStr:String):String;

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #12

Function Tf_system.Encrypt(TempStr:string):string;
Var
Str1:String;
i,j:Integer;
Begin
Str1:='';
For i:=1 to Length(TempStr) do
begin
j:=(i?i?i?i mod (i+30))+(i?i mod (i+20))+i?3+1;
Str1:=Str1+chr(ord(TempStr)+j);
j:=(i?i?i?i mod (i+30))+(i?i mod (i+20))+i?3+1;
Str1:=Str1+chr(ord(TempStr)+j);
End;


提示错误：
[Error] U_system.pas(124): Illegal character in input file: '?' ($3F)
如何办？

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #13

Declaration expected but identifier 'Result' found？？？

 

Y

yshhwfl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #14

RealCode:=f_system.Encrypt(InptName);
有误，过程不会有返回值。
你把这个过程改变为一个函数，让它返回一个字串，就可以用这个赋值语句了。

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #15

提示错误：
[Error] U_system.pas(124): Illegal character in input file: '?' ($3F)
如何办？

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #16

RealCode:=f_system.Encrypt(InptName);
有误，过程不会有返回值。
你把这个过程改变为一个函数，让它返回一个字串，就可以用这个赋值语句了。

应该如何修改呢？

 

B

BrainYang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #17

在函数
Str1:=Str1+chr(ord(TempStr)+j);
End;
改成如下
Str1:=Str1+chr(ord(TempStr)+j);
Result:=str1;
End;

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #18

提示错误：
[Error] Illegal character in input file: '?' ($3F)
如何办？

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-10

• #19

帮我想想，谢谢！
j:=(i?i?i?i mod (i+30))+(i?i mod (i+20))+i?3+1;
提示错误：
[Error] Illegal character in input file: '?' ($3F)
如何办？

 

Y

yzp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-11

• #20

多人接受答案了。