Okay, es ist Montag, aber vielleicht hat ja doch jemand eine Lösung
ich habe eine Scrollbox mit width 100, height 100
OnMouseMove habe ich
Code: Alles auswählen
procedure TForm1.ScrollBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Form1.caption:=IntToStr(X);
end;
Wenn ich die Maus bewege, erhalte ich die Koordinaten 0..99
solange ich den BorderStyle auf bsNone habe.
Stelle ich bsSingle ein, müste ich eigentlicht die Koordinaten 0..99-2 also 0..97 bekommen
weil rechts und links je ein Pixel für den Rand benoetigt wird.
Tatsächlich bekomme ich aber nur Koordinaten von 0..95
Rechts fehlen 2 Pixel, da reagiert MouseMove anscheinend nicht.
MouseY das gleiche Problem, geht auch nur von 0..95 bei bsSingle
Ich hab das nun eben in Delphi 6 probiert, da stimmt es. 0..97
Hat jemand eine Erklärung dafür ?
mit freundlichen Bits
Siro