if-then-else

[alcaeus]

Hi Lol,

hier ein Beispiel mit begin und end:

Delphi-Quellcode:

if edit1.Enabled then
begin
  if edit1.Text = '' then 
    edit1.SetFocus
end
else if edit2.Enabled then
begin
  if edit2.Text = '' then 
    edit2.SetFocus
end
else if edit3.Enabled then
begin
  if edit3.Text = '' then 
    edit3.SetFocus
end;

IMHO sieht aber deine zweite Möglichkeit sauberer aus.

Greetz
alcaeus