Ändern einer Shape - FormÜbergreifend

[demonscave]

Hallo!

Folgendes Szenario:
In Form1 habe ich eine Shape (sh_kreis.Shape:=stCircle.
Nun soll über Form2 die Shape ein Viereck werden!

Form1.sh_kreis.Shape:=stRectangle;
geht nicht!

[Error] einstellungen.pas(97): E2003 Undeclared identifier: 'stRectangle'

Warum geht das nicht?

Danke im Vorraus,
demonscave!

PS: Bitte nicht lachen. Arbeite erst seit 4 Tagen mit Delphi!

[shmia]

Zitat von demonscave:

In Form1 habe ich eine Shape (sh_kreis.Shape:=stCircle.
Nun soll über Form2 die Shape ein Viereck werden!

Form1.sh_kreis.Shape:=stRectangle;
geht nicht!

[Error] einstellungen.pas(97): E2003 Undeclared identifier: 'stRectangle'

Warum geht das nicht?

Du musst die Unit einbinden, in der stRectangle deklariert wurde.
Bloss welche ist das?? stRectangle muss dort deklariert sein, wo auch TShape deklariert wurde.
Also in der IDE die Shape-Komponente markieren und F1 drücken.
Aha! Es ist Unit ExtCtrls. Und diese Unit muss dann hinter Uses auftauchen.

[demonscave]

Danke!!!! Hat geklappt