Delphi-Quellcode:
type
TRucksack = Class;
Item : Array [1..5] of String;
procedure hinzufuegen (S:String);
function ausgeben : String;
Function voll: boolean;
end;
Das Semikolon nach
Class
gehört da nicht hin. Außerdem kann ich nicht erkennen, wozu das
end;
vor
implementation
gehören soll.
Wie bereits gesagt wurde: Code unbedingt einrücken!