Einzelnen Beitrag anzeigen

theo1709

Registriert seit: 26. Feb 2009
2 Beiträge
 
Delphi 7 Architect
 
#1

Komponenten plazieren mit ToolsAPI

  Alt 15. Mär 2009, 14:46
Hallo!

Ich erzeuge in einem Wizzard neue Komponenten. Das Funktioniert ohne Probleme.

Wie kann ich auf die Property "Top" bzw. "Left" bei non-visible-Komponenten zugreifen (lesen und schreiben)?

Delphi-Quellcode:
          OldComponent:=TRDAFBDataSet(FormDesigner.GetComponent(CRUniComponents.FDS_ComponentsCompName.AsString));
          FOTAFormEditor.FindComponent(OldComponent.Name).GetPropValueByName('Top',NewTop);
          FOTAFormEditor.FindComponent(OldComponent.Name).GetPropValueByName('Left',NewLeft);
          inc(NewLeft,5);

          NewComponent:=TUniQuery(FormDesigner.CreateComponent(TUniQuery,FormDesigner.Root,NewLeft,NewTop,24,24));
          NewComponent.Name:=FormDesigner.UniqueName(OldComponent.Name);
Alles läuft ohne Probleme, "GetPropValueByName" liefert False, dadurch werden die Variablen "NewTop" und "NewLeft" nicht gesetzt.

Wo kann ich die Position von non-visible-Komponenten ermitteln?

[edit=mkinzler]Tippfehler im Titel korrigiert Mfg, mkinzler[/edit]
  Mit Zitat antworten Zitat