includes

[Privateer3000]

Hi Leutz,

hab eine Zeilen (Edit-Change und Buttonclicks) in eine include ausgelagert. (hab mich dabei an ein Tut gehalten)
Beim Compilieren allerdings nölt er die Eintragungen und types an.Die dazugehörigen procederes .Wie deklarier ich diese damit der Compiler weiss das die procederes sich in dieser Datei befinden.
{$I input.inc} ist eingebunden.
Oder hab ich da was falsch verstanden.

Grüsse

[Christian Seehase]

Moin Privateer,

könnte hilfreich sein, mal ein wenig vom Sourcecode bzw. der Include Datei zu sehen. ;-)

[Privateer3000]

Hi Chris,

ein ganz normales funktionierendes Prog.
(Hab jetzt den Quell grad nicht zur Hand, ist auf Arbeit ;-)
nur das ich solche Zeilen wie

Code:

procedure TForm1.in7Change(Sender: TObject);
begin
Form2.out7.Caption:=in7.Text;
end;

in eine Textdatei (*.inc) ausgelagert habe
sowie

Code:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Form2.Label1.Visible:= not Form2.Label1.Visible;
end;

beim compilieren sagt der debugger das er mit der timer-komponente nichts anfangen kann.sie steht ja im Hauptform unter types
und die procedure in der inc.Wie macht man das. dass der debugger das sieht??

PS.gibts Spocki noch?? Grüsse an ihn!

[Christian Seehase]

Moin Privateer,

klar Spockie gibt's noch.

Nun zu Deinem Problem:
Das kann ich nicht nachvollziehen. :shock: ;-)

Ich hab' mir einen Timer, und zwei Button (zum ein- bzw. ausschalten des Timers) auf ein Formular gepackt, dann die OnClick Routinen der Button entsprechend gefüllt, sowie die OnTimer Routine mit Leben gefüllt.

Dann hab' ich mir eine INC Datei erstellt und da hinein die gesamte OnTimer Routine ausgelagert. (TIMER.INC, im gleichen Verzeichnis )

Dann eine Include Zeile unter Implementation eingebunden (testeshalber mal an verschiedenen Stellen), und hatte keine Probleme das Programm zu starten.

[Privateer3000]

Moin Chris,

genau diese Wege bin ich auch gegangen.
Was damit geklärt ist, das es richtig war.Nun muss der Fehler woanders liegen.Ich werde mal gucken. Ähh die unter type eingetragene
procedure Timer1Timer(Sender: TObject);
hast du unberührt gelassen?!
Ich werd es schon finden
und wenn es bis Weihnachten dauert ;)


Grüsse

Die Fehlermeldung heisst übrigens:
Ungenügende Forward- oder Externaldeklaration:'TForm1.Timer1.Timer'
vielleicht sagt das was

[Luckie]

Hast du die Include-Datei an der richtigen Stelle reingehangen? Also nach der Deklaration in der Unit?

[Privateer3000]

Hi luckie,
die includes kommen nach den deklarationen.
warte mal... die inc's müssen aber nicht noch in die uses oder sonstwo aufgenommen werden oder?
Ich weiss es auch nicht...

[Luckie]

Nein, nicht in den Uses, dazu sind es ja Includes.

[MrSpock]

Zitat:

Zitat von Privateer3000 hat gefragt

PS.gibts Spocki noch?? Grüsse an ihn!

Klar, der ist einfach nicht kaputt zu kriegen...

Sorry, schnipp.(*)

:mrgreen:

Schönen Gruß auch von mir.

(*) So schön das Bild von Leonard Nemoy in seinem blauen Schlafanzug auch ist, es gehört nun gar nicht hier her (zu dem ist es etwas groß). Findet bitte wieder zu Thema zurück. Für private Sachen und Scherze gibt es die privaten Nachrichte. Danke - Luckie

[Hansa]

Hi,

das ist jetzt zwar wirklich unwahrscheinlich, aber wer weiß? In Standard-Pascal sind Input und Output vordefinierte Identifier. An denen sollte Delphi eigentlich nicht einfach so vorbei kommen. Benenne die Include-Datei mal um. Wenn das tatsächlich die Ursache war, wirst Du dies ja hoffentlich hier bekannt geben. Das wäre dann ein Bug in Delphi auf den so schnell keiner kommt. :angle:

Gruß
Hansa