Einzelnen Beitrag anzeigen

ksh
(Gast)

n/a Beiträge
 
#1

Verbindung von Unit und Formular verschwindet

  Alt 12. Apr 2007, 09:33
Hallo!

Also so ein komisches Problem hatte ich noch nie... Ich binde Units aus zwei verschiedenen Ordnern ein - bisher waren alle Formulare in einem Ordner. Dies musste ich umstellen, so dass meine Main mit dem Fenster MainWindow in dem anderen Ordner ist. Das erste Mal klappt alles noch, aber sobald ich das Projekt neu starte, bringt er die Fehlermeldung, dass er die Ressource nicht finden kann.
Und wenn ich jetzt die Unit neu einbinde, findet er das Formular überhaupt nicht. Jetzt hab ich die Unit wieder zu den anderen Ordner gepackt und nun verschwindet auf einmal das nächste Formular! Er bindet nur noch die Unit ein und wieder nicht das dazugehörige Formular - obwohl ich nichts geändert habe.
Ich habe leider keinen Schimmer, woran das liegen könnte - vielleicht habt ihr eine Idee. Ich wüsste auch nicht, welcher Code euch helfen könnte...

Hier mal die Projektdatei:
Delphi-Quellcode:
program Projekt;


{$R *.res}
                        
uses
  Forms,
  Access in 'Access.pas',
  Ausgabe in 'Ausgabe.pas',
  Berechnen in 'Berechnen.pas',
  ObjIAS in 'ObjIAS.pas',
  ObjJub in 'ObjJub.pas',
  ObjRent in 'ObjRent.pas',
  ObjTeilw in 'ObjTeilw.pas',
  ObjIFRS in 'ObjIFRS.pas',
  ADOX_TLB in '..\..\Masterordner_Kollektiv\ADOX_TLB.pas',
  DialogEinlesen in '..\..\Masterordner_Kollektiv\DialogEinlesen.pas{DialogTabelle},
  Hifunc in '..\..\Masterordner_Kollektiv\Hifunc.pas',
  HiType in '..\..\Masterordner_Kollektiv\HiType.pas',
  MyPrint in '..\..\Masterordner_Kollektiv\MyPrint.pas',
  ObjEin in '..\..\Masterordner_Kollektiv\ObjEin.pas',
  ObjPers in '..\..\Masterordner_Kollektiv\ObjPers.pas',
  qxheub05 in '..\..\Masterordner_Kollektiv\qxheub05.pas',
  Such in '..\..\Masterordner_Kollektiv\Such.pas{SuchDialog},
  svrent05 in '..\..\Masterordner_Kollektiv\svrent05.pas',
  svrent in '..\..\Masterordner_Kollektiv\svrent.pas',
  tw05_IAS in '..\..\Masterordner_Kollektiv\tw05_IAS.pas',
  tw05_JUB in '..\..\Masterordner_Kollektiv\tw05_JUB.pas',
  tw05_PEN in '..\..\Masterordner_Kollektiv\tw05_PEN.pas',
  Main in 'Main.pas';

// bei den letzten beiden müsste hier jeweils ein Formular mit eingebunden werden!!!!

begin
  CreateAngDaten(AngDaten);
  Application.Initialize;
  Application.Title := 'Teilwert Version 2.2';
  // ohne Formular wirds hier natürlich nicht aufgerufen...
  Application.CreateForm(TDialogTabelle, DialogTabelle);
  Application.CreateForm(TSuchDialog, SuchDialog);
  Application.Run;
end.
und hier noch der Anfang der Main-Unit
Delphi-Quellcode:
unit Main;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Menus, Grids, StdCtrls, ExtCtrls, Printers, WinProcs, Clipbrd, HiType,
  MyPrint, Access, hifunc, Dialog_Pension, Ausgabe,
  ObjEin, ObjPers, ObjRent, ObjTeilw, ObjJub, ObjIAS; // zu berechnende Units hier einbinden

const Version = 'Angebot v. 2.0';
type
  TMainWindow = class(TForm)
    MainMenu: TMainMenu;
    Datei: TMenuItem;
    Neu: TMenuItem;
    N1: TMenuItem;
    Drucken: TMenuItem;
    N2: TMenuItem;
    Beenden: TMenuItem;
    Bearbeiten: TMenuItem;
    Aendern: TMenuItem;
    PrintDialog: TPrintDialog;
    PrinterSetupDialog: TPrinterSetupDialog;
    SaveDialog: TSaveDialog;
    Bild: TImage;
    OpenDialog: TOpenDialog;
    Info1: TMenuItem;
    ffnen1: TMenuItem;

        // hier folgen die Prozeduren
  Mit Zitat antworten Zitat