Umstieg aus Delphi.

[Lemmy]

Hallo Fritz,

machen wir mal die Delphi-Tags um die Sourcen:

Delphi-Quellcode:

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

das end; vor var ist falsch. das gehört an die Stelle weiter oben, um die Klassendeklaration des Formulars abzuschließen...

[jaenicke]

Zitat von Lemmy:

das end; vor var ist falsch. das gehört an die Stelle weiter oben, um die Klassendeklaration des Formulars abzuschließen...

Das ist dann aber nur in Lazarus falsch, in Delphi ist das so korrekt. Das Feature nennt sich nested types und gibt es in Delphi seit Version 2006.
Hilft vielleicht das Umschalten in dem Lazarusprojekt auf den Delphi-Modus?

Nebenbei sollten Typdeklarationen wie kontakt immer mit einem T beginnen um dies zu erkennen, also TKontakt. Und der Pointer darauf sollte PKontakt heißen. So ist die Namenskonvention.

[Lemmy]

Zitat von jaenicke:

Zitat von Lemmy:

das end; vor var ist falsch. das gehört an die Stelle weiter oben, um die Klassendeklaration des Formulars abzuschließen...

Das ist dann aber nur in Lazarus falsch, in Delphi ist das so korrekt. Das Feature nennt sich nested types und gibt es in Delphi seit Version 2006.
Hilft vielleicht das Umschalten in dem Lazarusprojekt auf den Delphi-Modus?

ah stimmt.. da war mal was... ist halt so, wenn man immer noch bei Delphi 7 fest hängt

Aber dann eine Frage an dich: Wenn das ein nestet Type sein soll, dann ist die Deklaration von kontakt2 aber falsch bzw. die Fehlermeldung korrekt - denn als nestet Type sollte der dann an der Stelle doch nicht bekannt sein oder?

[sahimba]

Zitat von jaenicke:

Das Feature nennt sich nested types und gibt es in Delphi seit Version 2006.

Er schreibt aber auch, dass seine alte Applikation Delphi 4 basierend ist. Und es hat nicht den Anschein, als wolle er solche (nicht mehr ganz so) neuartigen Features verwenden. Von daher ist der Einwurf sicher berechtigt, dürfte aber in der Folge zu gänzlich neuen Problemen (Scope etc.) beim Ersteller führen.

[haderlump]

Hallo Lemmy
Super, danke, jetzt geht es.
Na das kommt halt davon, wenn man was macht, von dem man nicht allzuviel versteht.
Na ja, irgendwann werd ich vielleicht auch einen einigermaßenen Durchblick bekommen.

Ich hab jetzt mal angefangen, das alte Programm in kleinen Portionen in das neue Projekt zu imoprtieren, und ich muss sgaen es ist fast unheimlich, wie geschmeidig das jetzt geht.

Sahimba und Jaenike.
Danke auch euch für die Hilfe, und Komentare.

Ich werde mich mental ganz von Delphi verabschieden. Lazarus wird mich wahrscheinlich überdauern, (ich bin schon fast 60 Jahre alt) bei Delphi bin ich mir da nicht so sicher.
Im Professionalen Bereich geht doch alles mehr auf C++ hin, und wenn mit Delphi nicht mehr so viel Geld verdient werden kann, könnte es sein, das es irgendwann einmal eingestampft wird. Oder es braucht ja blos die Firma pleite machen.