Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Drag & Drop

   
    by Natcree, 29. Jun 2014
  okay.
  
  Wie bekomme ich denn das Panel raus über dem sich der cursor befindet?
• Forum: Programmieren allgemein

  AW: Drag & Drop

   
    by Natcree, 29. Jun 2014
  x und y werden Übergeben weil ich den Button beim Drag and drop mit sichtbar halte und ihm beim ziehen über die form sehen will.
• Forum: Programmieren allgemein

  AW: Drag & Drop

   
    by Natcree, 29. Jun 2014
  procedure TForm1.SchaltflaecheMouseUp(Sender: TObject; Button: TMouseButton;Shift: TShiftState; X, Y: Integer);
  begin
  if (sender is TLMDDockSpeedButton) then
  TLMDDockSpeedButton(Sender).Left:=Panel2.Left;
  TLMDDockSpeedButton(Sender).top:=Panel2.top;
  TLMDDockSpeedButton(Sender).BringToFront;
  if *Shift<> then exit;
  end;
  
  Das funktioniert schonmal wie bekomme ich es hin...
• Forum: Programmieren allgemein

  Drag & Drop

   
    by Natcree, 29. Jun 2014
  Hallo ich suche eine Lösung für ein Drag and Drop Problem. Ich möchte gerne einen Tbutton auf eine vorgegebene Position z.B. ein Panel mit der gleichen größe Umbewegen. Das Bewegen geht aber er soll auf der Panel Position einrasten wenn ich die linke maus taste los lasse. Hier mal mein Bisheriger Code.
  
  procedure TForm1.SchaltflaecheMouseDown(Sender: TObject; Button: TMouseButton; Shift:...