Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Bild Zoomen

    Delphi
    by bitsetter, 7. Mai 2007
  Hi,
  
  du hast wohl das onClick Ereignis und ich das onMouseDown Event genommen. Der Code ist auch von einem TImage.
• Forum: Multimedia

  Re: Bild Zoomen

    Delphi
    by bitsetter, 5. Mai 2007
  Hallo,
  
  du könntest ja das Event der Scrollbox benutzen. Das Problem ist nur, dass durch das Image in der Scrollbox diese keinen Focus bekommt und dadurch das Event nicht ausgelöst wird. Durch setzen des Focuses könnte man das abändern.
  procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
  begin
  Scrollbox1.SetFocus;
  end;