Thema: Delphi Label unter Mausposition

Einzelnen Beitrag anzeigen

Lilo

Registriert seit: 10. Jul 2005
26 Beiträge
 
#16

Re: Label unter Mausposition

  Alt 13. Sep 2005, 19:43
@negaH

ich entwickel net unter kylix ^^ ich hab nur mal in der hilfe nach dem begriff gesucht weil das net ging ... und dann husch pfusch bei uses reingeschrieben ^^

Delphi-Quellcode:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var C: TControl;
begin
       C := Controls.FindDragTarget(ClientToScreen(Point(X, Y)), True);
       if C is TLabel then
       begin
       end;
end;
da bekomm ich den fehler "inkombatible Typen - tlabel und tcontrol"

vielleicht bin ich auch nur zu dumm ^^
  Mit Zitat antworten Zitat