Hilfe mit Textadventure

[Jonas Shinaniganz]

Ich drück mal beide Augen fest zu und antworte möglichst produktiv.
Schau mal hier:

Delphi-Quellcode:

procedure TRaum.setAusgang(n,s,e,w : TRaum) ;
begin
 self.Fnorth := Fnorth;
 self.Fsouth := Fsouth;
 self.Feast := Feast;
 self.Fwest := Fwest;
end;

Untersuche genau, was du hier zuweist.
gruß j

[DeddyH]

Und den Sinn von

Zitat:

image1.canvas.create ;

solltest Du uns vielleicht auch einmal erklären.

[Sir Rufo]

Also den Raum selber würde ich schon anders aufbauen. Warum merkt sich der Raum nicht die Beschreibung selber?

Und wenn ich mich von einem Raum in eine Richtung x bewege, dann kann diese Methode doch einfach eine Raum-Instanz zurückliefern. Gibt es keinen Raum in Richtung x, dann liefert der Raum einfach die eigene Instanz zurück.

Delphi-Quellcode:

Procedure TForm.Move ( ADirection : TDirection );
begin
  FCurrentRoom := FCurrentRoom.MoveTo ( ADirection );
end;

Sieht viel einfacher aus und ist auch leichter zu verstehen.

[MW28]

Zitat von Jonas Shinaniganz:

Untersuche genau, was du hier zuweist.
gruß j

Ich vermute mal das ist total unnötig? Zu meiner Verteidigung muss ich sagen das das nach den etwas dürftigen AB's meines Lehrers entstanden ist.

Zitat von DeddyH:

Und den Sinn von

Zitat:

image1.canvas.create ;

solltest Du uns vielleicht auch einmal erklären.

Das ist lediglich zum Testen bzw. als Platzhalter drin. Wir sollen zu jedem Raum ein Bild anzeigen lassen.

[Sir Rufo]

Zitat von MW28:

Zitat von Jonas Shinaniganz:

Untersuche genau, was du hier zuweist.
gruß j

Ich vermute mal das ist total unnötig? Zu meiner Verteidigung muss ich sagen das das nach den etwas dürftigen AB's meines Lehrers entstanden ist.

Zitat von DeddyH:

Und den Sinn von

Zitat:

image1.canvas.create ;

solltest Du uns vielleicht auch einmal erklären.

Das ist lediglich zum Testen bzw. als Platzhalter drin. Wir sollen zu jedem Raum ein Bild anzeigen lassen.

Das ist nicht unnötig, sondern du weist dem Wert den gleichen Wert zu. Du legst also die 5€ in deine Geldbörse, die da schon drin waren und denkst, jetzt habe ich 10€.

Delphi-Quellcode:

var
  a : Integer;
begin
  a := a; // toll ... aber wozu, in a steht eh schon der Wert von a drin, weil ist ja auch a
end;

Delphi-Quellcode:

procedure TRaum.setAusgang(n,s,e,w : TRaum) ;
begin
 self.Fnorth := n;
 self.Fsouth := s;
 self.Feast := e;
 self.Fwest := w;
end;

Somit ist das nicht der Fehler auf dem AB deines Lehrers, sondern DU hast das nicht verstanden.

image.canvas.create; ruft den constructor der bereits erzeugten Instanz auf. Es wird dadurch keine neue Instanz erzeugt. Ist in diesem Zusammenhang also sinnlos.

[MW28]

[QUOTE=Sir Rufo;1285957][QUOTE=MW28;1285948]

Zitat von Jonas Shinaniganz:

Somit ist das nicht der Fehler auf dem AB deines Lehrers, sondern DU hast das nicht verstanden.

Delphi-Quellcode:

constructor TFruit.Create(name: string);
begin
  // And save the fruit name
  self.name := name;
end;

Auszug aus dem PDF Arbeitsblatt zum Constructor. Wir haben allerdings auch ein Blatt bekommen wo das so wie du das gemacht hast(also mit n,s,e,w) angedeutet wird.Die Möglichkeit die du nennst hatte ich schon einmal ausprobiert, macht aber auch keinen Unterschied. Das Problem bleibt bestehen.

[Sir Rufo]

Also schauen wir uns mal das vom Arbeitsblatt an

Delphi-Quellcode:

constructor TFruit.Create(name: string);
begin
  // And save the fruit name
  self.name := name;
end;

und das was du daraus gemacht hast

Delphi-Quellcode:

constructor TFruit.Create(name: string);
begin
  // And save the fruit name
  self.Fname := Fname;
end;

Was fällt uns auf? Eben, denn richtig wäre

Delphi-Quellcode:

constructor TFruit.Create(name: string);
begin
  // And save the fruit name
  self.Fname := name;
end;

denn

Delphi-Quellcode:

constructor TFruit.Create( {Argument} name: string);
begin
  // And save the fruit name
  self.name := {Argument} name;
end;

Es hat einfach damit zu tun, dass der Compiler sich hier entscheiden muss, worauf sich name denn nun bezieht. Auf ein Element der Klasse oder eben das Argument. Da das Argument der Methode in der Methode aber näher ist als die Klasse, bezieht sich name auf das Argument. Um auf die Klassen-Variable zuzugreifen muss man den Scope mit angeben durch self.name .

[OlafSt]

Es hat schon seinen Grund, warum Borland mal empfohlen hat, Parameter mit einem "A" als Prefix zu versehen, sowie Felder mit einem "F"-Prefix:

Delphi-Quellcode:

constructor TFruit.Create(AName: string);
begin
  // And save the fruit name
  self.FName := AName;
end;

Nochmal hervorgehoben: self.FName := AName;
So gibts auch keine babylonische Sprachverwirrung mit "name" als Parameter und "name" als Feld. Ich glaube, das der TE nämlich diesen Zusammenhang gar nicht erkannt hat. Und Asche auf das Haupt des Lehrers, der das selbst nicht gerafft hat.

[Sir Rufo]

Woraus schliesst du, dass der Lehrer da was nicht gerafft hat? Das kann ich daraus nicht ableiten.