Scalewdith /height bei selber erstellten Controls

[DrMueller]

Hallo Leute,
folgendes Problem: Ich habe, ebenfalls hier gefunden, ein Modul, welches, wenn ein Form verzogen wird, die Controls dem Form entsprechend resizt.
Das Problem ist jetzt, das bei den selber erstellten Controls eben die Werte Scalewdith/heigh fehlen, was dazu führt, dass das Modul nicht mehr klappt.
Meine Frage:
Kann man das irgendwie umgehen?
Kann man einem selber erstellten Control die Werte irgendwie mitgeben?

Ich danke schon mal im Vorraus für die Antwort.

 

[Alex F.]

Ja kann man

Erweitere dein Control

Public Property Get ScaleWidth as Integer
' private Variable 
end Property

Public Property Let ScaleWidth (Value as Integer)
' Code zum Resizen
' private Variable setzen
end Property

Public Property Get ScaleHeight as Integer
' private Variable 
end Property

Public Property Let ScaleHeight(Value as Integer)
' Code zum Resizen
' private Variable setzen
end Property

und dann kann dein Control das auch


Grüße bb