Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
31. Dez 2004
Also, hier die Lösung dafür, dass ausserhalb der Objekte nichts angezeigt wird...
procedure THotelForm.PaintBox1MouseMove(Sender: TObject;
Shift: TShiftState; X, Y: Integer);
var mausPos: TPoint;
zma, i: Integer;
merker: Boolean;
begin
mausPos.X := x-hRand;
mausPos.Y := y-vRand;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
31. Dez 2004
Richtig, dass habe ich mir so vorgestellt!
Die Umsetzung ist grad das Problem!
Ich denk, dass das Problem einfach darin liegt, dass der Hilfetext nur einmal angezeigt wird. Aber selbst mit einem Timer wird es schwer zurealiesieren sein...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
31. Dez 2004
Hallo Luckie!
Dann passiert nichts... überhaupt nichts... Dann werden überhaupt keine Hint's gezeigt!?!
Was mir noch aufgefallen ist...
Wenn ich mir einen Hilfe-Text hab anzeigen lassen, dann auf ein anderes Objekt gehe - es passiert dann ja nichts - dann von der PaintBox runter gehe und dann wieder drauf, aber in einen freien Bereich - wird mit die Information zum zweiten Objekt...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
31. Dez 2004
Hallo!
Ich habe eine PaintBox mit verschiedenen gezeichneten Objekten drauf.
Nun möchte ich, wenn der Benutzer mit der Maus auf ein solches Objekt zeigt, dass ein Hilfetext (gelbes Schildchen) mit einer Beschreibung angezeigt wird.
Das funktioniert auch mit meinem Code.
Das erste Problem besteht darin, dass, wenn ich die Maus wieder bewege, und ich sie dann auf eine freie Fläche bewege,...