Hallo zusammen
Ich bin Lazarusneuling. Ich hatte vor Jahren in Delphi ein Programm zur Steuerung einer Modelleisenbahn geschrieben (Delphi 4)
Ich wollte nun Änderungen vornehmen, und stellte fest, dass mein Delphi nicht mehr läuft. Leider ist meine Instalationsdisc beim Umzug verloren gegangen. Kurzum ich hab kein Delphi mehr.
Nun hab ich mir Lazarus herunter geladen.
Die Konvertierung nach Lazerus scheiterte, an hunderten von Fehlermeldungen. Um Lazarus bzw. FPC kennenzulernen, habe ich begonnen das Programm stufenweide neu aufzubauen. Doch selbst im Anfangsstadium komme ich nicht mehr weiter.
Jetzt mein Problem:
Quelltext:
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs;
type
TForm1 = class(TForm)
private
{ private declarations }
public
{ public declarations }
type
kontakt = record
bezeichnung :string [20];
port,
kontakt :byte;
l_adresse,
// r_adresse : kt;
// signal :daten_element;
// next_kontakt :kontakt_;
typ :byte;
messzeit,auszeit,schrittgeschwindigkeit :integer;
wirkrichtung,scharf: boolean {true = links}
end;
kontakt_ = ^kontakt;
end;
var
Form1: TForm1;
kontakt2 : kontakt_;//////////////////////////////
implementation
{$R *.lfm}
begin
end.
Auf die mit ////////////// markierte Zeile bekomme ich die Fehlermeldung: Error: Identifier not found "kontakt_"
Was zum Teufel mache ich falsch, im Konsolenfenster von Pascal geht es.
Noch kurz zum Zweck des Codes:
Es soll eine Datenstruktur aufgebaut werden, in der Die Anlage beschrieben ist, so dass das "Stellwerksprogramm" entsprechend handeln kann.
PS: In Delphi lief das alte Gesamtprogramm fehlerfrei.
Gruß Fritz