Einzelnen Beitrag anzeigen

PeterPanino

Registriert seit: 4. Sep 2004
1.465 Beiträge
 
Delphi 10.4 Sydney
 
#31

AW: Nicht-visuelle Komponenten dauerhaft ausblenden?

  Alt 30. Okt 2012, 20:14
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?
  Mit Zitat antworten Zitat