我在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;
我会非常感谢任何帮助或想法。