Dabei bekomme ich einen Compilerfehler:
anpassung.pas(160,33) Error: Operator is not overloaded: not "Class Of TSpeedButton"
Code: Alles auswählen
procedure control_anpassen(tf:Tcontrol);
...
if tf is not TSpeedbutton then
begin
tf.width:=b;
tf.height:=h;
end;
....
Die positive Abfrage dagegen erzeugt keinen Compilerfehler:
Code: Alles auswählen
if tf is TSpeedbutton then
Wie muss dann die negative Abfrage korrekt lauten ?