Forum: Cross-Platform-Entwicklung
Delphi
by Koloss,
11. Jul 2014
Problem mit der Series gelöst!
Statt Series := TLineSeries.Create(Chart);
Kommt Series := TLineSeries.Create(nil);
Da finde ich die series übers Chart!
Beim Button funktioniert:
Statt Button.Free;
Kommt RemoveComponent(Button);
Forum: Cross-Platform-Entwicklung
Delphi
by Koloss,
11. Jul 2014
Es wird verrückt einfaches Beispiel selbe Problem
Button := TButton(FindComponent('Button2'));
if Button <> nil then
Button.Free;
Button := TButton.Create(Self);
Button.Parent := self;
Button.Name := 'Button2';
Forum: Cross-Platform-Entwicklung
Delphi
by Koloss,
10. Jul 2014
Mit neuen Projekt getestet.
Unter Firemonkey Desktop funktioniert es und unter Firemonkey Mobile nicht!
Forum: Cross-Platform-Entwicklung
Delphi
by Koloss,
10. Jul 2014
Ich rufe diese Funktion 2 mal auf.
Beim 2ten mal: Ich komme in Series.Free rein bekomme, Series wird auch nil aber danach beim Namen zuweisen bekomme ich die Fehlermeldung "Die Komponente mit der Bezeichnung 'S1' existiert bereits" FindSeries funktioniert auch richtig.
procedure TfrmTestProperties.cbGroupChange(Sender: TObject);
var Series : TLineSeries; idx : Integer;
begin
Series...