AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Fehler im Modul... (beim compilieren)

Ein Thema von Budda · begonnen am 28. Apr 2004 · letzter Beitrag vom 30. Apr 2004
Antwort Antwort
Budda

Registriert seit: 3. Sep 2003
96 Beiträge
 
Delphi 7 Professional
 
#1

Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 10:49
Hallo,

habe folgendes Problem, seid 2 min kann ich mein Projekt nicht mehr kompilieren.
Er schmeisst immer folgende Fehlermeldung:
Zitat:
Fehler im Modul: Deklaration der Klasse TForm1 fehlt oder ist fehlerhaft.
Aber hier ist sie doch deklariert:
Delphi-Quellcode:
type
  TForm1 = class(TForm)
Hat vielleicht jemand ne Idee?

Gruß
Budda
  Mit Zitat antworten Zitat
Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: Dietersheim b. München
6.536 Beiträge
 
#2

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 11:57
Schicke mal den ganzen Code, vielleicht fehlt danach etwas. Bist du sicher dass du die .dfm-Datei noch hast?
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat
Budda

Registriert seit: 3. Sep 2003
96 Beiträge
 
Delphi 7 Professional
 
#3

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 13:12
Hier der Code:
Delphi-Quellcode:
type
  TForm1 = class(TForm)
    MainMenu1: TMainMenu;
    Datei1: TMenuItem;
    Info1: TMenuItem;
    Panel1: TPanel;
    ControlBar1: TControlBar;
    CoolBar1: TCoolBar;
    Einstellungen1: TMenuItem;
    DBGrid1: TDBGrid;
    ADOConnection1: TADOConnection;
    ADOQuery1: TADOQuery;
    DataSource1: TDataSource;
    SpeedButton1: TSpeedButton;
    SpeedButton2: TSpeedButton;
    Panel2: TPanel;
    Bevel1: TBevel;
    N1: TMenuItem;
    Beenden1: TMenuItem;
    Label1: TLabel;
    SpeedButton3: TSpeedButton;
    Panel3: TPanel;
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    GroupBox1: TGroupBox;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    Label8: TLabel;
    Label9: TLabel;
    Label10: TLabel;
    Label11: TLabel;
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    DBEdit3: TDBEdit;
    DBEdit4: TDBEdit;
    DBEdit5: TDBEdit;
    DBEdit6: TDBEdit;
    DBComboBox1: TDBComboBox;
    DBEdit7: TDBEdit;
    DBEdit8: TDBEdit;
    DBEdit9: TDBEdit;
    GroupBox2: TGroupBox;
    Label12: TLabel;
    Label13: TLabel;
    Label14: TLabel;
    Label15: TLabel;
    Label16: TLabel;
    Label17: TLabel;
    Label18: TLabel;
    Label19: TLabel;
    DBEdit10: TDBEdit;
    DBEdit11: TDBEdit;
    DBEdit12: TDBEdit;
    DBComboBox2: TDBComboBox;
    DBComboBox3: TDBComboBox;
    DBComboBox4: TDBComboBox;
    DBEdit13: TDBEdit;
    GroupBox3: TGroupBox;
    DBMemo1: TDBMemo;
    TabSheet2: TTabSheet;
    BitBtn1: TBitBtn;
    SpeedButton4: TSpeedButton;
    Bevel2: TBevel;
    SpeedButton5: TSpeedButton;
    SpeedButton6: TSpeedButton;
    SpeedButton7: TSpeedButton;
    Bevel3: TBevel;
    SpeedButton8: TSpeedButton;
    SpeedButton9: TSpeedButton;
    SpeedButton10: TSpeedButton;
    SpeedButton11: TSpeedButton;
    DateTimePicker1: TDateTimePicker;
    ADOQuery1GGUID: TStringField;
    ADOQuery1InsertTimestamp: TDateTimeField;
    ADOQuery1CompNumber: TStringField;
    ADOQuery1FKTO: TStringField;
    ADOQuery1MtaNumber: TStringField;
    ADOQuery1ContractualRelation: TStringField;
    ADOQuery1ServiceVariant: TStringField;
    ADOQuery1CompName: TStringField;
    ADOQuery1CompStreet: TStringField;
    ADOQuery1CompZip: TStringField;
    ADOQuery1CompCountry: TStringField;
    ADOQuery1CompPhone: TStringField;
    ADOQuery1Remote: TStringField;
    ADOQuery1RemoteUser: TStringField;
    ADOQuery1RemotePassword: TStringField;
    ADOQuery1NetPhoneTyp: TStringField;
    ADOQuery1Version: TStringField;
    ADOQuery1StartUpDate: TStringField;
    ADOQuery1Partner: TStringField;
    ADOQuery1Region: TStringField;
    ADOQuery1Additive: TMemoField;
    BitBtn2: TBitBtn;
    ADOQuery2: TADOQuery;
    DataSource2: TDataSource;
    Panel4: TPanel;
    DBGrid2: TDBGrid;
    Panel5: TPanel;
    GroupBox4: TGroupBox;
    Label20: TLabel;
    Label21: TLabel;
    Label22: TLabel;
    DBEdit14: TDBEdit;
    DBEdit15: TDBEdit;
    DBEdit16: TDBEdit;
    GroupBox5: TGroupBox;
    Label23: TLabel;
    Label24: TLabel;
    Label25: TLabel;
    Label26: TLabel;
    Label27: TLabel;
    Label28: TLabel;
    Label29: TLabel;
    DBEdit17: TDBEdit;
    DBEdit18: TDBEdit;
    DBEdit19: TDBEdit;
    DBEdit20: TDBEdit;
    DBEdit21: TDBEdit;
    DBEdit22: TDBEdit;
    DBEdit23: TDBEdit;
    GroupBox6: TGroupBox;
    Label30: TLabel;
    Label31: TLabel;
    DBEdit25: TDBEdit;
    GroupBox7: TGroupBox;
    DBEdit26: TDBEdit;
    BitBtn4: TBitBtn;
    BitBtn5: TBitBtn;
    DBEdit27: TDBEdit;
    BitBtn6: TBitBtn;
    BitBtn7: TBitBtn;
    DateTimePicker2: TDateTimePicker;
    DBEdit24: TDBEdit;
    Label32: TLabel;
    ADOQuery2GGUID: TStringField;
    ADOQuery2InsertTimestamp: TDateTimeField;
    ADOQuery2NetPhoneSoftwareVersion: TStringField;
    ADOQuery2Organisation: TStringField;
    ADOQuery2OrganisationUnit: TStringField;
    ADOQuery2Workstation: TStringField;
    ADOQuery2PowerDeskWorkstation: TStringField;
    ADOQuery2S0Gateways: TStringField;
    ADOQuery2S2Gateways: TStringField;
    ADOQuery2PowerTeamBasic: TStringField;
    ADOQuery2PowerTeamComfort: TStringField;
    ADOQuery2PowerTeamEnterprise: TStringField;
    ADOQuery2ValidTo: TStringField;
    ADOQuery2Email: TStringField;
    ADOQuery2Attachment: TStringField;
    ADOQuery2KGGUID: TStringField;
    ADOQuery2S0Gateways_4: TStringField;
    ADOQuery3: TADOQuery;
    DataSource3: TDataSource;
    SpeedButton12: TSpeedButton;
    function CreateGuid : string;
    procedure Einstellungen1Click(Sender: TObject);
    procedure SpeedButton1Click(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure SpeedButton2Click(Sender: TObject);
    procedure Beenden1Click(Sender: TObject);
    procedure SpeedButton3Click(Sender: TObject);
    procedure BitBtn1Click(Sender: TObject);
    procedure SpeedButton4Click(Sender: TObject);
    procedure SpeedButton5Click(Sender: TObject);
    procedure SpeedButton6Click(Sender: TObject);
    procedure BitBtn2Click(Sender: TObject);
    procedure PageControl1Change(Sender: TObject);
    procedure BitBtn4Click(Sender: TObject);
    procedure SpeedButton8Click(Sender: TObject);
    procedure BitBtn5Click(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure BitBtn6Click(Sender: TObject);
    procedure SpeedButton9Click(Sender: TObject);
    procedure SpeedButton10Click(Sender: TObject);
    procedure SpeedButton11Click(Sender: TObject);
    procedure SpeedButton7Click(Sender: TObject);
    procedure DBGrid1TitleClick(Column: TColumn);
    procedure BitBtn7Click(Sender: TObject);
    procedure Info1Click(Sender: TObject);
    procedure DBGrid2TitleClick(Column: TColumn);
    procedure SpeedButton12Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
Das hatte er aufeinmal nach dem Speichern, kp was das nu soll ^^
Die dfm Datei ist noch da.
  Mit Zitat antworten Zitat
Benutzerbild von fiasko
fiasko

Registriert seit: 10. Dez 2002
Ort: Dresden
506 Beiträge
 
#4

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 13:15
Der ganze Quellcode ist das doch aber nicht?! Mal Delphi neugestartet?
Thomas Liske
Posts comes with ABSOLUTELY NO WARRANTY, to the extent
permitted by applicable law.
  Mit Zitat antworten Zitat
Dax
(Gast)

n/a Beiträge
 
#5

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 13:17
Zeig die dfm auch mal. Bitte
  Mit Zitat antworten Zitat
shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#6

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 13:20
Du hast deine Funktion
function CreateGuid : string;
in den Bereich gestellt, der für die IDE reserviert ist.
Die Funktion sollte nach dem Private-Abschnitt stehen.
Ausserdem muss nach implementation folgende Zeile vorhanden sein:
{$R *.DFM}
Andreas
  Mit Zitat antworten Zitat
Dax
(Gast)

n/a Beiträge
 
#7

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 13:23
Verdammt.

Is mir auch aufgefallen, hab's aber trotzdem nicht bemerkt...

  Mit Zitat antworten Zitat
Budda

Registriert seit: 3. Sep 2003
96 Beiträge
 
Delphi 7 Professional
 
#8

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 14:00
Nein das ist nicht der ganze Quelltext, der geht über mehrere DIN A4 Seiten.
Die dfm Datei ist auch verdammt gross.

Delphi habe ich schon neu gestartet sowei den ganzen Rechner.

Zitat:
Du hast deine Funktion
function CreateGuid : string;
in den Bereich gestellt, der für die IDE reserviert ist.
Die Funktion sollte nach dem Private-Abschnitt stehen.
Ausserdem muss nach implementation folgende Zeile vorhanden sein:
Source:
{$R *.DFM}
Die Zeile ist auch enthalten.
  Mit Zitat antworten Zitat
Benutzerbild von fiasko
fiasko

Registriert seit: 10. Dez 2002
Ort: Dresden
506 Beiträge
 
#9

Re: Fehler im Modul... (beim compilieren)

  Alt 28. Apr 2004, 14:01
Dann zip halt alles zusammen und häng es an den Beitrag rann... ohne Quelltext können wir nur raten :-)
Thomas Liske
Posts comes with ABSOLUTELY NO WARRANTY, to the extent
permitted by applicable law.
  Mit Zitat antworten Zitat
Budda

Registriert seit: 3. Sep 2003
96 Beiträge
 
Delphi 7 Professional
 
#10

Re: Fehler im Modul... (beim compilieren)

  Alt 30. Apr 2004, 10:04
Danke für eure Hilfe, hab den Fehler nu gefunden, die Deklaration eines Buttons fehlte.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:14 Uhr.
Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf