Delphi 3 Programm kompilieren

Stell diese Frage doch besser im Embarcadero forum : embarcadero. 
public.delphi. ...

Vlad Tepesch schrieb:
> warum denkst du, dass dir ein simples neuübersetzen mit einem 15 Jahre
> alten Compiler dir da hilft?

schon mal alles gelesen?

> ich möchte den Quellcode eines in Delphi 3 geschriebenen Programms gerne
> kompilieren (und später auf eine neuere Version updaten).

Ja - in einem Forum zu Delphi werde ich auch fragen. Bisher habe ich 
hier eben sehr kompetente Personen gefunden und deshalb auch hier 
nachgefragt.

Nur neu kompilieren hilft hier natürlich nicht. Ich würde es aber gerne 
zunächst in der Entwicklungsumgebung kompilieren, in der es auch 
programmiert wurde. Wenn das klappt und ich alle Abhängigkeiten dafür 
zur Verfügung stehen habe, kann ich mir überlegen, wie ich es in eine 
Version von Delphi bekomme und dort kompiliert und vorher ggf. angepasst 
bekomme.

Das Programm stammt nicht von mir, sondern wurde von einem Programmierer 
vor ca. 15 Jahren geschrieben. Da es in der Vergangenheit auch immer 
zufriedenstellend lief, wurde hieran nichts geändert. Jetzt hakt es aber 
an der Maßgabe, dass Verzeichnisse nur aus acht Buchstaben bestehen 
dürfen und eben unter Win x64 keine Funktion mehr möglich ist. Der 
Programmierer steht nicht mehr zur Verfügung, so dass ich jetzt selbst 
den Quellcode ausgepackt habe und mich daran versuche.

> Ich frage mich, ob es daran liegen könnte, dass "Windows" nicht
> definiert ist. Eigentlich sollte er "Dos" ja gar nicht einbinden.

Versuchs mal mit:

{$DEFINE Windows}

Ok - das habe ich jetzt mal eingefügt. Dann verlangt er nach einer 
"WinDos.dcu", die ich im Internet finden konnte (ebenso wie eine hiervon 
benötigte String.dcu).

Hierbei handelt es sich allerings wohl um Dateien für 16 bit Delphi 
(Titel der Seite: teravue-16bits-delphi).

Beim Versuch zu kompilieren kommt nun folgende Fehlermeldung:
Operandengröße stimmt nicht überein

function StrLen(Str: PChar): Word; assembler;
asm
  CLD
  LES  DI,Str
  MOV  CX,0FFFFH
  XOR  AL,AL
  REPNE  SCASB
  MOV  AX,0FFFEH
  SUB  AX,CX
end;

In der Zeile "LES DI, Str" tritt der Fehler auf.

Ich bin langsam am Zweifeln, ob das Programm wirklich mit Delphi 3 
geschrieben wurde, oder ob die Probleme nicht daher kommen, dass es ein 
Delphi 2 oder sogar Delphi 1 Programm ist. Das würde auch den obigen 
Fehler erklären und ggf. auch, weshalb die ganzen Abhängigkeiten fehlen.

Delphi 1 war wohl auch 16 bit.

Hat jemand eine Idee, wie ich an die 1. oder 2. Version von Delphi komme 
(auf der Delphi 3 CD ist sie aus irgendeinem Grund nicht drauf. Wenn ich 
bei der Installationsroutine Delphi 1 anklicke, kommt "Datei nicht 
gefunden").

Kann ich irgendwie rausfinden, in welcher Version der Quellcode 
geschrieben ist?

Bei mir (Delphi7) gibt es eine .dof Datei mit folgendem Eintrag:

[FileVersion]
Version=7.0

Schau doch mal in die "verdächtigen" Dateien.

Eine *.dof Datei gibt es leider nicht. In den verdächtigen Dateien (alle 
Dateien mit dem Projektnamen) finde ich leider nichts äquivalentes.

Ich habe evtl. grade in einem alten Schrank Delphi 1 aufgetrieben. Mal 
schauen, was da passiert.

Robert L. schrieb:
> fehlende .dfm files würden darauf hindeuten..

*.dfm Dateien gibt es für jedes Formular. Heißt - es ist wohl doch 
Delphi?

Robert L. schrieb:
> ohne (zumindest) etwas grundwissen wird das "neukompilieren als 32
> software" eher schwierig ...

Ich arbeite seit Jahren mit C/C++, C# und VB. Ich denke schon, dass 
Grundwissen vorhanden ist - Delphi habe ich mal ein Jahr etwas gemacht, 
ist aber schon länger her.

Ich gehe davon aus, dass ich mich hier ausreichend einarbeiten kann.

Robert L. schrieb:
> ja, weil DI ein 16 bit register ist
> dein PChar aber 32 bit
So habe ich mir das gedacht.

Vielen Dank und gute Nacht.