请赐教，哪里错了？(50分)

begin
if rdydj<>‘‘ then
rdydj :=combobox1.text;
combobox3.Enabled :=false;
combobox4.Enabled :=false;
button2.Enabled :=false;
combobox2.Enabled :=true;
combobox2.items.clear;
with query2 do
begin
close;
sql.clear;
sql.add(‘select distinct gcmc from ttml.dbf where dydj="‘+rdydj+‘"‘);
open;
while not eof do
begin
combobox2.items.add(fieldbyname(‘gcmc‘).value);
next;
end;
query2.Close;
end
else
showmessage(‘电压等级不能为空！‘);
end;
------------------
上面语句if...then...else...那里错了？
为什么提示[Error] testdbf.pas(145): ‘END‘ expected but ‘ELSE‘ found。
请赐教？

begin
if rdydj<>‘‘ then
[red]begin[/red]
rdydj :=combobox1.text;
combobox3.Enabled :=false;
combobox4.Enabled :=false;
button2.Enabled :=false;
combobox2.Enabled :=true;
combobox2.items.clear;
with query2 do
begin
close;
sql.clear;
sql.add(‘select distinct gcmc from ttml.dbf where dydj="‘+rdydj+‘"‘);
open;
while not eof do
begin
combobox2.items.add(fieldbyname(‘gcmc‘).value);
next;
end;
query2.Close;
end
[red]end[/red]
else
showmessage(‘电压等级不能为空！‘);
end;

[red]补充：[/red]
建议书写格式要规范。
另外上面的程序代码中的单引号是不是弄错了，应该是半角的吧？

单引号没错，cupy过来就这样。
另，继续请教
[red] [/red]是什么意思？

看出来，太明显的错误啊。

你前面的那个if后面还差个BEGIN啊,因为你后面还有else！！

问题找到了！但...
if后面何时用BEGIN...end,何时不用？

if...then后面执行的语句超过一句，就要用begin...end

谢谢！给分！！