Code "Sortierung"

[flashkid]

Hi.

Wieso ist es in Lazarus so wichtig in welcher Reihenfolge der Code geschrieben wird?
Zb bei diesem Code:

Code: Alles auswählen

procedure TForm1.Button1Click(Sender: TObject);
begin
  GetName;
  ShowMessage(Name);
end;
 
procedure GetName;
begin
  Name := Label1.Caption;
end;

Hier bekomme ich die Meldungen:

Code: Alles auswählen

unit1.pas(34,10) Error: Identifier not found "GetName"
unit1.pas(40,17) Error: Identifier not found "Label1"

Drehe ich nun die beiden procedure um:

Code: Alles auswählen

procedure GetName;
begin
  Name := Label1.Caption;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  GetName;
  ShowMessage(Name);
end;

Hier bekomme ich nur noch:

Code: Alles auswählen

unit1.pas(34,17) Error: Identifier not found "Label1"

Nun ergeben sich zwei Fragen:
1. Wieso muss ich die getName procedure vor den ButtonClick schreiben damit es funktioniert? So kann ich meinen Code nur sehr schwer sortieren
2. Wieso wird in der procedure getName das Label1 nicht gefunden?

Gruß, flashkid

[theo]

Dein GetName ist keine Methode von TForm1. Sie müsste also forward deklariert werden.
Sonst deklarier sie als Methode von TForm1

Code: Alles auswählen

procedure TForm1.GetName;

Dann klappt's auch mit dem Label. Sonst musst du das Label so ansprechen:

Code: Alles auswählen

Form1.Label1.Caption:=

[flashkid]

Danke, so klappen nun beide Varianten, egal wie rum der Code steht
Ich muss allerdings noch im type ändern:

Code: Alles auswählen

TForm1 = class(TForm)
    Button1: TButton;
    Label1: TLabel;
    procedure Button1Click(Sender: TObject);
    [color=#FF0000]procedure GetName;[/color]
  private
    { private declarations }
  public
    { public declarations }
  end;

[pluto]

Währe auch denkbar, dass Lazarus Fehler unterschiedlich Bewertet... und dann abbricht

[af0815]

Währe auch denkbar, dass Lazarus Fehler unterschiedlich Bewertet... und dann abbricht

Hat er aber nicht, einmal war es eine nicht vollständig beschriebenes Objekt und einmal eine falsche Reihenfolge in der Deklaration (Benutzt vor der Deklaration).

[Socke]

Ich muss mich derzeit ein wenig in PHP-Quelltexte einlesen und ich finde es ehrlich gesagt furchtbar, wenn etwas aufgerufen wird, was noch nicht deklariert wurde. Du weißt dann überhaupt nicht, woher diese Funktion kommt, was sie macht und welche Parameter sie hat.

Pascal fördert durch sein Verhalten die Lesbarkeit erheblich. Das was du gemacht hast, war demnach ein reiner Syntaxfehler.