Newbiefrage(Delphi): Splashscreen & weitere Prozedur...

[Frederik Bührmann]

Hallo Leute,

bin in Delphi noch ein ziemlicher (eigentlich ein blutiger) Anfänger. Nun meine Frage, ich habe einen Splashscreen in delphi erstellt, habe einfach 2 formulare gemacht, aus dem ersten das hauptformular, aus dem zweiten den splashscreen. Dann habe ich die procedure mit dem statusbalken etc. auf dem splashscreen in die mainform.pas geschrieben, direkt unter "implementation mit nem einfach "begin" Klingt wahrscheinlich idiotisch, aber wenn ich jetzt z.b. ein mainmenu einfüge und einen verweis auf ein neues formular gemacht. (so ne art about-formular) wenn ich aber

procedure Tmainform.berGMS1Click(Sender: TObject);
begin
aboutform.Show;
end;

das dort einfüge, kommt die meldung:
Anweisung erwartet, aber procedure gefunden.

Ist wahrscheinlich ein ganz dummer fehler, aber hat einer von euch evtl. kurz zeit mir zu helfen? Vielen Dank im voraus.

MfG

Freddy

[Julia Kuhlmann]

Hallo Frederik,

so ganz wird man aus deinem etwas wirren Text ja nicht schlau, aber die Meldung klingt, als ob da über der procedure ein 'end' fehlt,

Grüße

Juli

[Andreas Kosch]

Hallo,

ohne Sourcecode ist die Suche nach der Ursache in der Tat schwierig. Worin unterscheidet sich die Implementierung von der folgenden Version:
<pre>
<b>unit</b> Unit1;

<b>interface</b>

<b>uses</b>
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

<b>type</b>
TForm1 = <b>class</b>(TForm)
Button1: TButton;
<b>procedure</b> Button1Click(Sender: TObject);
<b>private</b>
<font color="#003399"><i>{ Private-Deklarationen }</i></font>
<b>public</b>
<font color="#003399"><i>{ Public-Deklarationen }</i></font>
<b>end</b>;

<b>var</b>
Form1: TForm1;

<b>implementation</b>

<font color="#003399"><i>{$R *.dfm}</i></font>

<b>uses</b> Unit2;

<b>procedure</b> GlobaleProzedur;
<b>begin</b>
Form2.ShowModal;
<b>end</b>;

<b>procedure</b> TForm1.Button1Click(Sender: TObject);
<b>begin</b>
GlobaleProzedur;
<b>end</b>;

<b>end</b>.
</pre&gt