if befehl - problem

[nailor]

Delphi-Quellcode:

procedure TForm1.SpeedButton1Click(Sender: TObject); 
begin 
If Speedbutton26.Down then 
  begin 
    IF OpenPictureDialog1.Execute THEN 
      begin 
        speedbutton33.Glyph.LoadFromFile(OpenPictureDialog1.FileName); 
      end 
  end //<---daaaaaaaaa  
else 
If Speedbutton27.Down then 
  begin
    IF OpenPictureDialog1.Execute THEN 
      begin
        speedbutton18.Glyph.LoadFromFile(OpenPictureDialog1.FileName); 
      end;
  end; 
end;

-----------------

nailor's versuch