函数的小错误

Question

这个函数里在TLogF类中定义。而implementation中没有这个函数的完成部分。

Answer 1

var
  Form1: TForm1;
function Login(loged:boolean):boolean;//放在这里

Answer 2

有，测试代码如下(写在“implementation“后：
function Login(loged:boolean):boolean;
begin
  if loged then result:=True
     else result:=False;
end;
继续指点迷津！！

Answer 3

按照编译器的指令，你应该这样写：
function TLogF.Login(loged:boolean):boolean;
begin
  if loged then result:=True
    else result:=False;
end;

Answer 4

2楼兄（aningstar(乘风破浪终有时)　）的方法试后，项目文件
“
  LogF:=TLogF.Create(Application);
  if  LogF.Login then
     begin
    
     end
   else
     begin     end;
“编译提示:[Error] App.dpr(31): Undeclared identifier: 'Login'

Answer 5

to chechy(chechy)　:
我项目文件有如下定义：
“
  LogF:=TLogF.Create(Application);
  if  LogF.Login then
    begin
    
    end
  else
    begin    end;用你的方法，编译后新的问题如下：
[Error] App.dpr(31): Not enough actual parameters
请继续指点迷津！！

Answer 6

你的function Login(loged:boolean):boolean;
是公有函数还是类的成员函数
你能不能把代码贴出来
如果是类的成员函数就不能那样做了

Answer 7

to:aningstar(乘风破浪终有时)　
在LogF中主要代码如下：
type
  TLogF = class(TForm)
   
    function Login(loged:boolean):boolean;
  private
  public
 end;

Answer 8

呵呵，照chechy(chechy)的写
“
  LogF:=TLogF.Create(Application);
  if  LogF.Login（true） then  //参数啊
    begin
    
    end
  else
    begin    end;

Answer 9

搞定，给贴子加10分，兑现。
再次感谢：
  chechy(chechy) &  aningstar(乘风破浪终有时).thank u!