Ok, Tms rauswerfen hat nichts gebracht.
Eine neue .dproj anlegen lasen hat nichts gebracht.
Aber ein ganz neues Projekt aufsetzen hat es bei mir gelöst.
Irgendwas scheint an deinem Projekt nicht OK zu sein (
dpr, dproj) ?
Mein funktionierende Demo im Anhang.
EDIT:
Ok, das interessiert mich warum:
1. Unterschied: .dpr
Delphi-Quellcode:
program FormLabelTest;
uses
System.StartUpCopy,
FMX.Forms,
LabelTest in 'LabelTest.pas' {Form1},
FMX.WebBrowser in 'FMX.WebBrowser.pas'; // <-- Diese Zeile könnte das Problem verursachen
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
2. .dproj Unterschiede, na klar, aber erstmal nichts auffälliges.
Ich hätte das die Packages der Fremdkomponenten im Verdacht, aber die werden hier ja gar nicht benutzt.
3. Unterschied .fmx
Delphi-Quellcode:
object Form1: TForm1
Left = 0
Top = 0
BorderIcons = [biSystemMenu, biMinimize] //<-- Das kann es doch nciht etwa sein =
Caption = 'Form1'
ClientHeight = 474
ClientWidth = 1052
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
DesignerMasterStyle = 0
object WebBrowser1: TWebBrowser
Size.Width = 649.000000000000000000
Size.Height = 355.000000000000000000
Size.PlatformDefault = False
Position.X = 8.000000000000000000
Position.Y = 6.000000000000000000
end
end
4. .pas
Delphi-Quellcode:
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls,
FMX.Controls.Presentation
, FMX.TMSWebBrowser // <-- Tms mit/ohne macht keinen Unterschied
, FMX.TabControl, FMX.WebBrowser,
FMX.TMSBaseControl, FMX.TMSGridCell, FMX.TMSGridOptions, FMX.TMSGridData,
FMX.TMSCustomGrid, FMX.TMSGrid, FMX.TMSCustomButton, FMX.TMSBarButton,
FMX.TMSButton, FMX.TMSMemo, FMX.Layouts, FMX.Forms;
type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
private
{ Private-Deklarationen }
nr:integer; // <<- Könnte nr ein reserviertes Wort sein ? Ich schreibe mindestens Fnr um solche Fehler auszuschliessen
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.fmx}
Rollo