Altes Programm kompilieren

[himitsu]

Und bezüglich Delphi-Code im Lazarus.

Erstmal arbeitet Lazarus, bzw. FreePascal, standardmäßig mit einer etwas anderen Syntax, aber das läßt sich umstellen.
https://wiki.freepascal.org/Mode_Delphi

Und natürlich sind auch nicht alle Funktionen und Komponenten 100% identisch, sowie Manches liegt auch in anderen Units,
so dass es schon passieren kann, dass man hier und da bissl was anpassen muß (mindestens).


Ich weiß garnichts, ob man Delphi-Forms auch noch konvertieren muß, denn die .DFM heißen in Lazarus ja standardmäßig .LFM

[Runningdog]

Zitat von himitsu:

Und bezüglich Delphi-Code im Lazarus.

Und natürlich sind auch nicht alle Funktionen und Komponenten 100% identisch, sowie Manches liegt auch in anderen Units,
so dass es schon passieren kann, dass man hier und da bissl was anpassen muß (mindestens).

Ja, das merke ich gerade
Habe gerade nochmal versucht, mein Programm in ein Lazarus-Projekt zu konvertieren. Der Kompiler meckert schon im interface-Teil , daß er CmAdmCtl, Mask, HTTPApp, HTTPProd nicht finden kann. Hab ich einfach mal zum Testen ausgeklammert, aber die nächste Fehlermeldung folgt schon gleich wenige Zeilen danach, wo er mit TDateTimePicker nichts anfangen kann.

Neee, das wird wohl nichts...

Habe auch schon viel zu viele Jahre nicht mehr programmiert, daß ich da jetzt auch noch eine Konvertierung hinbekommen soll. Meine nächste Idee wäre, auf einem Rechner nochmal Windows 7 zu installeieren, damit ich das alte Turbo-Delphi irgendwie zum laufen bringe. Aber der Aufwand?

[Runningdog]

Nachbemerkung: Bei einem ganz einfachen Programm von damals hat die Konvertierung von Turb-Delphi nach Lazarus ohne Probleme funktioniert, aber dieses kleine Programm hat auch nur ein paar dutzend Zeilen Code im Gegensatz zu dem Programm, um das es hier geht. Bin für jeden Tipp dankbar.

[himitsu]

Prinzipiell ist die aktuelle "Community Edition" das, was früher mal die "Starter" war und davor das kostenlose "Turbo Delphi Explorer".

Turbo Delphi war Delphi 2006 (vielleicht auch die zweite Version noch 2007)
Für 2006 gibt es bei Embarcadero nicht mehr das Setup und die ISO zum Download (nur alles ab 2007 und zusätzlich noch D7).

Unterschied ist aber, dass diese Lizenz jetzt nur noch ein Jahr läuft. Danach muß sie verlängert werden, sonst startet Delphi nicht mehr. Und gibt es eine neue CE-Version, muß sie installiert werden, da man immer nur für's Aktuelle eine Lizenz bekommt.
Ansonsten fehlt, wie schon bei den Turbos, der Commandline-Compiler und die meisten Quellcodes (PAS von RTL/VCL/FMX/usw.).

[milo]

Ob sich der Aufwand mit Windows 7 für Dich lohnt, können wir schlecht von hier aus beurteilen. Wenn Du den Aufwand einer Lazarus und/oder einer Community Edition nicht scheust, dann würde ich es an Deiner Stelle mit einer Virtuellen Windows 7 Installation in einer VirtualBox probieren. Das hätte den Vorteil, dass Du jederzeit wieder damit arbeiten könntest um es neu zu kompilieren.

Just my 2 Cents ...

[Runningdog]

So, ich habe jetzt das kostenlose Delphi installiert. Das alte Programm zu öffnen war kein Problem, aber laufen tut es nicht. Die Datensätze haben folgende Struktur:

Delphi-Quellcode:

type
      Daten = packed Record
      Datum : String[10];
       Text : String[50];
     Betrag : Double;
      Wert1 : String[1];
        Typ : String[1];
              End;

Und genau so werden sie auch auf dem Datenträger abgespeichert, d.h. ich kann das nicht einfach ändern, weil sonst die Daten nicht mehr gelesen werden können. Wie schon gesagt wurde, meckert der Copmpiler jetzt wegen der inkompatibilität von Char und AnsiChar:

Form1.BArt.Caption:= Decode(AktZeiger^.Satz.Typ[1]);

Fehlermeldung:
[dcc32 Fehler] Unit1.pas(563): E2010 Inkompatible Typen: 'Char' und 'AnsiChar'

Würde ich das Programm nur für mich einsetzen, könnte ich ein kleines Tool machen, um die Datensätze zu konvertieren, aber leider geht das nicht. Wie könnte ich das Problem lösen? Bitte um Entschuldigung, ist wahrscheinlich banal, aber ich habe beinahe 20 Jahre nicht mehr programmiert. Also schon mal vielen Dank.

[himitsu]

Der LongString-Typ "String" war bis D2006/D2007 ein AnsiString (in D1 noch ein ShortString)
und jetzt ist es seit D2009 ein UnicodeString.

Ausnahme sind ShortStrings, welche als String-mit-Länge deklariert sind ... diese waren und bleiben ShortString.

Wie ist Decode deklariert?
Ich vermute mal mit Char als Parameter, was früher ein AnsiChar war und nun ein WideChar ist.

Bei Zuweisungen zwischen Ansi und Unicode wird Delphi standardmäßig eine (deaktivierbare) "Warnung". (dass eventuell Informationen verloren gehen)
Ist aber z.B. der Parameter "explizit" Char/WideChar (z.B. VAR-Parameter), dann gibt es keine automatische Konvertierung.
-> Wntweder den Parameter als AnsiChar deklarieren oder vor Übergabe manuell nach Char oder WideChar casten.

[Runningdog]

Delphi-Quellcode:

Function DeCode(Wort:Char):String;

Begin
  Case Wort Of
  '1','A' : DeCode:= 'Bar';
  '2','B' : DeCode:= 'Einzug';
  '3','C' : DeCode:= 'Scheck';
  '4','D' : DeCode:= 'Kartenzahlung';
  '5','E' : DeCode:= 'Überweisung';
  '6','F' : DeCode:= 'Dauerauftrag'
  Else DeCode:= 'Unbekannt';
  End;
End;