[Delphi] if then else

[leska]

Witam mam pewien problem na ktory nie moge znalesc odpowiedzi:

var
pkt :integer;
begin
if strtoint(label7.caption) >= 50 then
begin
image2.Picture:=image3.picture;
label7.caption:=inttostr(pkt-50);
end else form2.ListBox1.Items.Add('Za malo masz punktow !); //[Error] Unit1.pas(117): Unterminated string
begin
pkt:=strtoint(label7.caption);
label7.caption:=inttostr(pkt-50);

end;
end;

 

[hxv]

Zapomniałeś o ' na końcu stringa - ('Za malo masz punktow !');