deine Main
Unit sieht doch wie folgt aus:
Delphi-Quellcode:
unit Mainunit;
interface
uses unit2;
//hier ein Uses auf deine unit2
type
TForm1 =
class(TForm)
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
// globale Formvariable im interface teil
implementation
{$R *.dfm}
deine neue
Unit so:
Delphi-Quellcode:
unit Unit2;
interface
implementation
uses Mainunit;
//hier ein uses auf deine mainunit;
end.
wenn du das so machst, dann hast du einen Kreuzbezug zwischen deiner Mainunit und der Unit2.
D.H. beide Units greifen aufeinander zu.
Jetzt ist in deiner Mainunit ja
var:form1:Tform1;
im interface teil, und damit kannst du dank Kreuzbezug direkt drauf zugreifen, auch aus der Unit2
ich finde diese Lösung jedoch ziemlich bescheiden.
Denn wozu mache ich ne Modulare
Unit, wenn beide alles kennen
da kann man es gleich in eine
Unit schreiben.