Prozedur eines anderen Type aufrufen

[juelin]

In der Prozedur Paint setzte ich unter anderem die Farbe des Shape.
Also in TExtShape9 ändere ich die Farbe von TExtShape10.
Nun müsste ich Paint von TExtShape10 aufrufen, damit die Farbänderung wirksam wird.

[Rollo62]

Farbänderungen zur Farbauswahl sollte man aber eigentlich von aussen machen.
Höchstens das setzen eines Pinsels wäre in Paint Ok.
Das erst beim Malen zu Ändern macht wenig Sinn.
Man setzt den Shapes vorher eine Farbe und dann malen die sich selbst.

Die Farbe eines Objekter beim Malen eines Anderen zu ändern leuchtet mir nicht ein.
Wenn Du das möchtest dann besser einen eigenen OnColorChange Event in die Klasse einbauen,
der die Farbänerung an Andere weiterreicht.

Was genau willst Du erreichen ?

[juelin]

ich habe das Shape als Button benutzt.
Wenn man nun den Shape9 drückt, so soll sich auch die Farbe von Shape10 ändern.

[Rollo62]

Vielleicht bist Du da an einer ganz falschen Stelle.
Schau Dir mal Events und Actions an,
wie hier in dem Video von generic schön erklärt.
https://www.delphipraxis.net/204809-...ml#post1469315

Bin gerade nicht am PC, such mal nach den Begriffen zusammen mit Delphi.
Da müsste es genug Info geben.

[juelin]

OK
ich habe es gefunden.

Anstatt: TExtShape10.Paint;
die Befehle: Form1.Repaint; Form1.Refresh;

Gruß
Jürgen