pascalutn2003
24-08-2006, 04:02:10
Hola a todos: :)
Bien; primero gracias a Roman por la solución, el me habia pasado : :D
if (AOwner is TForm) Then
Self.Color := TForm(AOwner).Color;
solo que habia que invertirlo, ;) para poder usarlo como yo quería que quedara; y quedo asi :
If (AOwner is TForm) Then
TForm(AOwner).Color:=$FFFFFFFF //Por poner un color cualquiera
Créanme que funciona de mil maravillas. :cool:
GRACIASSSS
Bien; primero gracias a Roman por la solución, el me habia pasado : :D
if (AOwner is TForm) Then
Self.Color := TForm(AOwner).Color;
solo que habia que invertirlo, ;) para poder usarlo como yo quería que quedara; y quedo asi :
If (AOwner is TForm) Then
TForm(AOwner).Color:=$FFFFFFFF //Por poner un color cualquiera
Créanme que funciona de mil maravillas. :cool:
GRACIASSSS