problem mit else nach end

[mkinzler]

Also du solltest dich wirklich mal mit den grundlegesten Grundlagen beschäftigen!

Delphi-Quellcode:

procedure hjsdgfjg;
begin
    jjbjkdfsgjka;
    msdfjhf;
    agtdskgfk;
    exit;
end;

[DeddyH]

Zitat:

Zitat von mkinzler

Also du solltest dich wirklich mal mit den grundlegesten Grundlagen beschäftigen!

Aber gründlich :mrgreen:

[rawsoul]

Zitat:

Zitat von Deltachaos

Zitat:

Zitat von mkinzler

Es wurde dir schon ein paar mal gesagt: Kein begin ohne end
Am Besten na die Tafel und 1000 mal Schreiben!!!!

dan wohl so?

Delphi-Quellcode:

procedure hjsdgfjg;
begin
jjbjkdfsgjka;
msdfjhf;
agtdskgfk;
end;
exit;

Entschuldige - aber das kommt in meine FremdeCodeschnipsel.txt :wink:

[Neutral General]

[OT]
:wall: :wall: :wall: :wall: :wall:
[/OT]

Delphi-Quellcode:

procedure Irgendwas;
begin
  BlaBla;
  if IwantToEndTheProcedure then
    exit; // <-- procedure verlassen
  WirdNurAusgeführtWennNichtExitAufgerufenWurde; // d.h. IWantToEndTheProcedure = false
end;

:!:

Zitat:

Entschuldige - aber das kommt in meine FremdeCodeschnipsel.txt Wink

Da hab ich nochwas

Zitat:

Tim (03:14 PM) :
edit1.Caption := IntToStr(stelle1 +stelle2);
Neutral General (03:14 PM) :
ja
Tim (03:15 PM) :
da ist schienbar ein bug drinne
Neutral General (03:15 PM) :
Edit1.TEXT !!!
Neutral General (03:15 PM) :
-.-
Tim (03:15 PM) :
achso^^
Tim (03:15 PM) :
edit1.text.Caption
???

:mrgreen:

[Deltachaos]

Aso

[DeddyH]

Das exit muss in einem begin-end-Block stehen und nicht irgendwo dahinter :!: