Inzwischen habe ich herausgefunden, wie man die Positionen der nicht-visuellen Komponenten erhält:
Delphi-Quellcode:
for i := 0 to TForm(Owner).ComponentCount - 1 do
begin
if not (TForm(Owner).Components[i] is TControl) then
begin
CodeSite.Send('Left', TForm(Owner).Components[i].Name + ': ' +
IntToStr(LongRec(TForm(Owner).Components[i].DesignInfo).Lo));
end;
end;
Wer weiß, wie man diese Positionen verändern kann?