Scrollbox kurzzeitig deaktivieren!

[ZeroX1337]

Hallo,

ich komme bei einem Problem einfach nicht weiter. Finde auch keine Infos dazu.
Ich arbeite mit FMX auf XE6.

Mein Problem: Ich habe meine ganzen Objekte in die TVertScrollBox gepackt, damit ich, wenn ich den Bildschirm vom iPad drehe, auch den Rest des Formulars sehen kann. Funktioniert alles wunderbar.

Allerdings habe ich auf der Form 2 Unterschriften Felder, und wenn ich dort jetzt was schreiben will bewegt sich das ganze Formular mit.

Jetzt möchte ich gerne, wenn ich in dem Unterschriftenfeld "MouseDown" und "MouseUp" Ereignis habe, dass die ScrollBox entsprechend in diesem Zeitraum "aussetzt".

Enable, Visible etc. funktioniert alles nicht, da die kompletten Objekte dort drin dann verschwinden.


Weiß jemand eine Lösung, bzw. kann mir sagen ob überhaupt alle Objekte in die Scrollbox müssen oder ob es auch eine andere Variante gibt?

[Bjoerk]

Wie wärs bei Edit.OnEnter das Enabled der ScrollBox auf false zu setzen und das von dem Edit auf true. Bei Edit.OnExit dann das der ScrollBox wieder auf true ändern?

[ZeroX1337]

Das Problem ist, dass ich alle Objekte der ScrollBox unterordnen musste.
Wenn ich jetzt die ScrollBox disable dann sind auch alle anderen Objekte disabled.

Das ist alles kompliziert zu erklären. Fakt ist, wenn ich die ScrollBox enable = false setze ist alles weg.

Ich kann das Unterschriftenfeld aber auch nicht aus der ScrollBox herausnehmen, sprich überordnen. Denn dann bewegt sich das Feld überhaupt nicht mehr mit.

[himitsu]

Einfach alle Scroll-Messages für die ScrollBox abfangen und schon wird nicht mehr gescrollt.

[ZeroX1337]

Könntest du mir vielleicht sagen wie ich das mache? Bin sehr neu was die Programmierung betrifft.

[Der schöne Günther]

Zitat von himitsu:

Einfach alle Scroll-Messages für die ScrollBox abfangen und schon wird nicht mehr gescrollt.

Es geht hier um Firemonkey, nicht die VCL.

[himitsu]

Auch da wird dennoch intern mit Messages gearbeitet, da man sich die Arbeit ersparen wolle, ein neues Message-System für's Delphi zu erfinden.

Das XE hier kennt den Affen noch nicht, also kann ich nicht mal eben nachsehn.
Ich würde dir ja empfehlen in den FMX-Quellcode zu schauen, aber die Starter hat sowas ja nicht.


Das überschreiben und nachsehn was alles ankommt:
procedure WndProc(var Msg: TMessage); override;
[add] In der ScrollBox, bzw. einer Ableitung davon. Oder mal schauen was TApplicationEvents für Ereignisse bietet.

Und danach kann man auch sowas nehmen:
procedure Xyz(var Message: TMessage); message XYZ;

[ZeroX1337]

Danke, ich schau mal nach!

[himitsu]

PS: Hatte meinen letzten Beitrag inzwischen nochmal etwas bearbeitet.