Fehlerbeseitigung ohne original Quellcode?

[Anfänger33]

Arbeite mich gerade durch das Toutorial "Softwareentwicklung Lazarus, Freepascal und MariaDB10" durch. Es geht um das Softwareprojekt "Hausverwalter360". Leider kann ich den Quelltext zum Vergleichen nirgends im Internet finden. Ich erhalte nach dem Compilieren mit Stand Toutorial 07:56 folgende Fehler:

Projekt kompilieren, Ziel: C:\XXX\Projekte\Lazarus-Projekte\0200 Hausverwalter\01-Software\startprogramm.exe: Exit code 1, Fehler: 2
startprogrammu1.pas(48,15) Error: Identifier not found "TMainFrom1"
startprogrammu1.pas(48,25) Error: Error in type definition

Leider komme ich hier nicht weiter.

Anbei mein Quellcode von startprogrammu1.pas.

unit startprogrammu1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls, ComCtrls,
Buttons, Menus, stammdaten;

type

{ TMainForm1 }

TMainForm1 = class(TForm)
Image1: TImage;
ImageList1: TImageList;
MainMenu1: TMainMenu;
MenuItem1: TMenuItem;
MenuItem10: TMenuItem;
MenuItem2: TMenuItem;
MenuItem3: TMenuItem;
MenuItem4: TMenuItem;
MenuItem5: TMenuItem;
MenuItem6: TMenuItem;
MenuItem7: TMenuItem;
MenuItem8: TMenuItem;
MenuItem9: TMenuItem;
PCMainformNavigation: TPageControl;
PMainformLogo: TPanel;
PMainFormContent: TPanel;
Objekte: TTabSheet;
Faktura: TTabSheet;
Handwerker: TTabSheet;
Auftraege: TTabSheet;
SpeedButton1: TSpeedButton;
SpeedButton2: TSpeedButton;
SpeedButton3: TSpeedButton;
procedure MenuItem2Click(Sender: TObject);

private

public
procedure giveFrameFree;
end;

var
MainFrom1 : TMainFrom1;

implementation

{$R *.lfm}

{ TMainFrom1 }


procedure TMainFrom1.MenuItem2Click(Sender: TObject);
var
FrmStammdaten : TFrame;
begin
// Alle Frames freigeben,

// Frame aufrufen.
FrmStammdaten := TFrame1.Create(Self);
FrmStammdaten.Parent := PMainFormContent;
FrmStammdaten.Top := 0;
FrmStammdaten.left := 0;
FrmStammdaten.name := 'Stammdaten';
end;

procedure TMainFrom1.giveFrameFree;
begin
TFrame1(FindComponent('Stammdaten')).Free;
end;

end.

Ab hier stammdaten.pas
unit stammdaten;

{$mode ObjFPC}{$H+}

interface

uses
Classes, SysUtils, Forms, Controls, ComCtrls, DividerBevel;

type

{ TFrame1 }

TFrame1 = class(TFrame)
DividerBevel1: TDividerBevel;
DividerBevel2: TDividerBevel;
PageControl1: TPageControl;
TabSheet1: TTabSheet;
private

public

end;

implementation

{$R *.lfm}

end.

Die Links zu Hr. Winkelmann laufen ins leere.
Das Toutorial gefällt mir sehr gut. Die einzelnen Bearbeitungsschritte konnte ich bisher gut nachvollziehen.
Nur jetzt komme ich nicht weiter.

[theo]

Typo:
TMainFrom1 <> TMainForm1

[af0815]

Ich kenne das Tutorial. Die HP und die Downloadserver vom Winkelmann sind tot und auch nicht bei WayBack zu finden. Somit wirst du nicht weiterkommen. Hängst du schon beim ersten Tutorial ? Weil soweit ich mich erinnere wird es immer komplexer durch die Quelltext - Sprünge in den Videos.

An und für sich gibt es den Hersteller https://winkelmann.software/ vielleicht kannst du ihn per Impressum anschreiben und mal höflich um den Quellcode bitten. Mehr als nein kann er auch nicht sagen.

BTW: Hausverwalter360 ist jetzt HausverwalterOS

[Anfänger33]

Das Computerproblem sitzt vor dem Monitor.
Danke das wars. Ein simpler Schreibfehler.

Das Leben kann so einfach sein.

Nochmals Danke.

[Stevie]

... André Winkelmann hatte auf seiner Homepage angekündigt, dass er das Thema Pascal ad acta legen wollte. Da wird also nichts mehr kommen. Schade eigentlich, da dies meines Wissens die einzige Tutorial-Reihe im deutschsprachigen Raum war, die sich mit einer komplexeren Anwendung beschäftigte.

[kralle]

Vielleicht sollte der Verein ihn mal fragen, ob er uns den Kurs und die Quellcodes überlässt und wir es dann als Paket zum Download anbieten?

Gruß Kralle

[af0815]

Vielleicht sollte der Verein ihn mal fragen, ob er uns den Kurs und die Quellcodes überlässt und wir es dann als Paket zum Download anbieten?

Youtube Videos sind ja aktiv, nur die Links zu den Downloads sind ungültig. Es würde schon reichen, wenn die Codes in einem dauerhaften Archiv wären.

[greye]

Das Computerproblem sitzt vor dem Monitor.
Danke das wars. Ein simpler Schreibfehler.

Wobei der Urheber des Videos selbst diesen Schreibfehler macht. Also ich kann durchaus verstehen, daß man da irgendwie verwirrt ist

<ot>Und ganz ehrlich, mich macht es wahnsinnig, daß er nicht nur nicht auf die Benennung seiner Elemente sondern auch nicht auf Groß- und Kleinschreibung achtet.
Ja, FPC/Lazarus ist es erst mal vielleicht recht egal, ob es MainForm oder Mainform heißt oder sogar Mainfrom … aber ich kann mich bei so was nicht konzentrieren, wenn alle dreißig Sekunden ein neues Benennungsschema eingeführt wird oder es einfach egal ist, was man da in die Tastatur klopft.

Das Tutorial mag genial und extrem hilfreich sein, aber ich bekomme da erst mal Kopfweh … tut mir leid.</ot>
42m