Zitat von
wuchzael:
Oh lol!!!
Allein, wenn ich "uses U_Main" in den implementation Teil schreibe funzt alles
Gut, dann kann ich endlich auch was hier schreiben. *g*
Du musst immer im Hinterkopf bewahren, dass Delphi einen single pass compiler benutzt.
Er wird erst alle units durchlaufen, die in der interface uses clause stehen (und auch in der Reihenfolge). Danach die in der implementation uses clause.
Auf die Art können sich 2 Units gegenseitig "sehen", wenn auch mit der Einschränkung, dass mindestens eine von beiden es nur in der implementation section kann.
Absolut abstrakter Bleistift, dessen sinnloser Inhalt nicht zu Hause nachgemacht werden sollte:
Delphi-Quellcode:
unit Unit1;
interface
type
TClass1 =
class
public
procedure DoSomething;
end;
implementation
uses
Unit2;
procedure TClass1.DoSomething;
begin
if self
is TClass2
then
blabla
else
blabla;
end;
end.
Delphi-Quellcode:
unit Unit2;
interface
uses
Unit1;
type
TClass2 =
class(TClass1)
end;
implementation
end.