Keine Tooltips (hints) bei verschieben von Komponenten

jazz123 · Hält's aus hier Beiträge: 3

Hallo,

ich möchte gern eine Art laufband Anzeige integrieren. Dies habe ich jetzt mit einem Timer und das verschieben eines Panels gelöst. Problem: wenn ich die Geschwindigkeit erhöhe, erscheinen keine hints mehr wenn ich mit der Maus auf einen Button zeige. Auch ein separater Thread brachte keine Abhilfe. Zur verdeutlichung habe ich mal eine Beispiel Applikation geschrieben: Moderiert von Narses: Siehe Anhang

der Timer:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.TickerTimerTimer(Sender: TObject);
begin
  Panel1.Left := Panel1.Left - pixel;
  if ((Panel1.Left + Panel1.Width) = 0) then
    Panel1.Left := Form1.Width;
end;

Hat jemand eine Idee warum die Hints nicht mehr funktionieren bzw wie man das ändern kann ?

funktioniert nicht
delphi1

wenn man das Panel langsamer durchlaufen lässt, gehts:
delphi2

Moderiert von Narses: Bilder als Anhang hochgeladen.

Einloggen, um Attachments anzusehen!

jaenicke · Verfasst: Di 23.02.10 09:49

Hallo und

Löse doch einfach die Laufbandanzeige besser, dann hast du das Problem erst gar nicht. ;-)

Du kannst z.B. eine PaintBox nehmen und darin den Text jeweils versetzt um die entsprechende Pixelanzahl ausgeben usw., das hat zusätzlich den Vorteil, dass es nicht so flackert wie bei einer verschobenen visuellen Komponente.

Ein separater Thread kann auch nicht viel bringen, da du aus dem sowieso nicht auf visuelle Komponenten direkt zugreifen kannst bzw. darfst.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme