Interagieren mit mehreren Forms

[ratmalwer]

ja aber wahlweise von Form1 oder Form2 (den Namen: Stringrid1 könnte ich ja gleich für beide verwenden, da ich die Struktur gleichhalte)

[ratmalwer]

Nachtrag:
vielleich ist es doch nicht klar, was ich will.

Ich habe eine Form:Fotoanzeige (Form9) welche ein Stringgrid abarbeitet welches sich in Form:Hauptfenster (form1) befindet. Funktionen wie: vor, zurück, markieren etc. können so ausgeführt werden.

Jetzt möchte ich diese Anzeige mit den gleichen Funktionen benutzen um ein anderes Stringgrid mit gleicher Struktur abzuarbeiten, welches in einem anderen Form:Fotoselektion (Form2) ist, ohne den ganzen Code 2x redundant zu schreiben.

Also möchte ich nur die Form von Form1 auf Form2 switchen können und so das andere Stringgrid anzusprechen. Das Stringgrid kann oder soll sogar gleich heissen.

[himitsu]

Zitat:

// wie mache ich hier den Pointer?

Garnicht. (Objekte sind bereits Pointer)
Aber für die Variable brauchst natürlich einen Typ, den beide Forms als Vorfahren haben.
z.B. TForm

Oder man nimmt einen eigenen Vorfahren (von TForm abgeleitet) für Variable und die Forms.
Dort kann man dann auch das Grid (die Variable des Grids), oder eine Funktion auf das Grid, reintun
und dann kann man ohne Cast oder FindComponent auf Grid zugreifen.

Oder man fügt ein Interface in die Forms ein, für den Zugriff auf das Grid, und FormX wird dann vom Typ dieses Interfaces. (Supports)

[ratmalwer]

Danke himitsu

verbal habe ich es verstanden.
Ob ichs umsetzen kann ohne ein Codeschnipsel weiss ich noch nicht.

[ratmalwer]

Nochmals Danke hoika und himitsu

Ihr hattet beide recht... Grosse Probleme können eine einfache Lösung haben.

Code:

SGX : TstringGrid; 

wahlwweie
 sgX   := Form1.StringGrid1;
 sgX   := Form2.StringGrid1; 

dann einfach abfragen nach
sgX.Row