Panels-boolean预计得到无类型

时间:2015-02-18 20:50:45

标签: lazarus

我在Lazarus尝试一些东西,试图为一个班级项目制作一个逻辑游戏。但是因为我对delphi不太好 - 我不确定我是什么'我做错了,但我明白了:

Error:Boolean expression expected,but got untyped

所以基本上我正在做的是当一个面板被点击时它会检查另一个面板,如果标题是空的,如果它是,它将改变两个面板的颜色和标题。现在,我不知道这是否是一种可能的语法,但对我来说似乎应该有效。我的代码是:

procedure TForm1.Panel2Click(Sender: TObject);
begin
    if panel1.Caption:='' then
    begin
       panel2.Caption:='';
       panel2.Color:=clWhite;
       panel1.caption:='Panel2';
       panel1.Color:=clMaroon;
    end;
end;              

我会非常感谢任何帮助或想法。

0 个答案:

没有答案