Scrollen für alle Elemente auf einmal verbieten ?

[uwewo]

Ist bestimmt nicht perfekt, aber es würde funktionieren.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var i : Integer;
begin
  for i := 0 to ComponentCount-1 do
   begin
     if (Components[i] is TMemo) then (Components[i] as TMemo).ScrollBars := ssNone;
     //hier weitere Objekte hinzufügen
   end;
end;

und soviel verschiedene Objekte mit ScrollBars werden es wohl nicht sein.

Konnte auch mal auf die Eigenschaften aller Objekte direkt überprüfen, habe es allerdings nicht mehr im Kopf wie das war.

Uwe