Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
30. Aug 2004
Also die reine Label-Lösung braucht kein Fensterhandle, und flackert quasi nicht. (s.o)
Gruß, teebee
Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
30. Aug 2004
Also, wenn Du das Label transparent machen kannst, sieht folgendes eigentlich ganz akzeptabel aus:Var Maus: Boolean;
OffX, OffY: Integer;
procedure TForm1.Label1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Maus := True;
OffX := X;
OffY := Y;
end;