Problem mit eigenem Textadventure in Delphi

[Bummi]

Tips hast Du doch bis zum Abwinken, fang doch mal mit dem Umbau an, als erstes
den Deklarationsblock z.B. so umbauen

Delphi-Quellcode:

type
TRaum = class
Beschreibung : string;
FotoReferenz : String;
Gegenstand : String;
Norden, Sueden, Westen, Osten : TRaum;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
procedure setAusgaenge (norden, sueden, westen, osten, hoch, runter : TRaum);
end;

TRucksack = Class 
Item : Array [1..5] of String; 
procedure hinzufuegen (S:String); 
function ausgeben : String; 
Function voll: boolean; 
end; 

TForm2 = class(TForm)
Edit1: TEdit; 
Button1: TButton; 
Memo1: TMemo; 
Image1: TImage; 
procedure Button1Click(Sender: TObject); 
procedure FormCreate(Sender: TObject); 
procedure Button2Click(Sender: TObject); 
procedure Button5Click(Sender: TObject); 
procedure Button4Click(Sender: TObject); 
procedure Button3Click(Sender: TObject); 
private 
{ Private-Deklarationen } 
public 
{ Public-Deklarationen } 
end;

[Gragas]

so, habe nun nochmal alles ein wenig ordentlicher angeordnet und versucht endlich alle unwichtigen ends etc wegzulassen.
Aber es klappt immer noch nicht.

[Bummi]

Pack das ganze doch mal in ein Zip und lad es hoch...

[DeddyH]

Irgendwie macht das echt keinen Spaß. Wie soll man denn helfen, wenn man den aktuellen Stand nicht kennt? Ich rufe ja auch nicht in der Werkstatt an und sage, dass mein Auto nicht läuft und mache dann aber keinerlei Angaben zu Marke/Modell/Baujahr.

[Deep-Sea]

Sry wenn das jetzt fies klingt, aber ich denke, dass es sinnlos ist zu versuchen den Code zu retten.
Man sollte das Projekt komplett neu anfangen.
Und diesmal dann Stück für Stück und nicht erst 1000 Fehler in 100 Zeilen Code machen und dann versuchen sie zu beheben :stupid:
Außerdem würde es sicher nicht schaden, wenn du dir ein paar Tutorials durchliest.

[Gragas]

Das Problem ist ja, dass ich schon mehrmals neu angefangen habe und das Ergebnis immer das selbe war und ich jetzt aber nur noch heute und morgen habe bis ich das ganze abgeben muss ... -.-

[Deep-Sea]

Erst krabbeln, dann laufen lernen :roll:
Tja, das sieht dann nicht so rosig aus, was dein Ultimatum betrifft. Es ist also ein Schulprojekt? Sry, aber sollte man nicht vorher in der Schule etwas lernen, bevor man solche Projekte aufgebrummt bekommt? (Oder handelt euer Lehrer nach meinem Motto? (siehe Signatur))
Du musst eben erst einmal ein paar Grundlagen beherrschen, bevor du dich an so ein Projekt wagst ...

[DeddyH]

Im DF ist man ja schon etwas weiter.

[Jens01]

Also gibt es noch 2 Nächte, die man durcharbeiten kann!
Da dann ran!:thumb:

[Deep-Sea]

delphi10 vom DF:

Zitat:

Gefühlte Fehleranzahl korrigiert = Zeilenzahl. Zieh dir Grundlagen rein und tippe sorgfältiger [...]

Sag ich ja :-D

Aber ob es so lehrreich ist, ihm einfach eine fehlerbereinigte Unit hinzuwerfen, ohne das er versteht, was und wieso alles falsch und schlecht war/ist? :?