Unit1:
Delphi-Quellcode:
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Unit2,
ExtCtrls, Menus, StdCtrls, ActnList, Windows, Contnrs;
type
...
Unit2:
Delphi-Quellcode:
unit Unit2;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
StdCtrls, Buttons, Windows;
type
{ TForm2 }
TForm2 =
class(TForm)
...
end;
var
Form2: TForm2;
implementation
uses
Unit1;
So sollte es doch auch in der Theorie funktionieren, oder nicht?
Edit: "Funktioniert nicht" heißt in diesem Fall einfach nur, dass nix passiert! Ich wär ja froh, wenn da wenigstens ne Fehlermeldung irgendwo auftauchen würde, aber es tut sich ja nichts
Edit2: Und mit den Uses sollte es ja nichts zu tun haben. Ich kann ja das Label, egal aus welcher
Unit, nicht verändern