if befehl - problem

[Wadim]

hi,

hab da folgendes problem - wenn ich auf den speedbutton 27 klicke (und er ist dann auch down) und dann speenbutton1 klicke erscheint das dialog nicht, kann mir mal einer helfen??

hier der code:

Delphi-Quellcode:

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

danke