Forum: Cross-Platform-Entwicklung
by Rollo62,
18. Jul 2017
Habs nochmal probiert, mit TLayout als Zwischenschicht und die Spere.Align = Client.
Macht mit dem TLayout direkt unter der Form als auch im TTabItem das was ich erwarten würde.
Ich bleibe dabei, ich denke die Darstellungsfehler kommen von dem Align.Top.
Im linken Bild wird eine kleine Version (je nachdem wie der Splitter steht) gezeichnet.
Rollo
Forum: Cross-Platform-Entwicklung
by Rollo62,
18. Jul 2017
Hallo Günther,
ja das hatte ich vor dem Einspielen auch gelesen (und wieder verdrängt) ...
Könnte sein, aber warum liefern die dann nicht die aktuellen Sources mit aus ?
Zu dem 3D-Problem:
Ich weiss nicht genau was das passieren soll, jedenfalls ist das 3D Bild unten abgeschnitten.
Es sieht bei mir so aus als wäre der Viewport nach oben verschoben.
Vielleicht versuchst du mal das...
Forum: Cross-Platform-Entwicklung
by Rollo62,
18. Jul 2017
Versuche doch mal mit deiner Orginalfunktion (die ja MakeScreensot entspricht)
die Scalings und Rect Width/Height von Hand anzupassen.
Ich hatte damals ähnliche Probleme, nicht mit 3D, aber auch da musste ich iOS und Android von Hand anpassen bis PaintTo und Bitmap richtig gepasst haben.
function TControl.MakeScreenshot: TBitmap;
var
SceneScale: Single;
begin
if Scene <> nil then
Forum: Cross-Platform-Entwicklung
by Rollo62,
17. Jul 2017
Ich würds auch erstmal so probieren wie Harry vorschlägt.
https://stackoverflow.com/questions/16098860/how-can-i-print-a-firemonkey-form-on-windows
Emba hat ja an Threads und Bitmaps rumgeschraubt, bei mir hat es Konsequenzen bei den Scalings vom Bitmaps.
Ob MakeScreenshot jetzt sauber funktioniert kann ich nicht sagen, ich habe nicht gecheckt was die das Alles geändert haben,
aber einen...