блджад!

[jles]

if Selected<>1 then
begin
btnEdit.Enabled:=False;
if (Mode=9) or(Mode=10) then
btnAdresse.Enabled:=False;
end
else begin
if Selected=1 then
begin
btnEdit.Enabled:=True;
btnAdresse.Enabled:=True;
end;
end;

Вторая проверка Selected такая няшечка, аффтару, видать, жалко выкидывать было.

Comments

[moonkan]

Я от синтаксиса уже в ужасе! Что это за языг?

[jles]

Это Delphi (хотя и Паскаль сожрёт, если типы и переменные будут правильно объявлены).

[moonkan]

Ясно. Ни разу не писал на них, просто, даже видел всего пару раз...