Klassen mit Pascal-Script in der Script-Engine (paxCompiler) auslesen

[hubert17]

Hallo Zusammen,

ich bin kein Software-Entwickler, sondern nur Anwender. Meine Frage bezieht sich eher auf die Anwendung von Pascal-Script.

Das Softwareprogramm wurde wohl in Delphi geschrieben und enthält als Script-Engine den paxCompiler. Hier kann ich Pascal-Scripte zur Ausgabe und Auswertung von Daten schreiben und anzeigen lassen.
Als Units sind hier DB, Classes, SysUtils, Variants, Dialogs und DateUtils, sowie vom Programm bereitgestellte Units eingebunden. Auch das Einbinden eigener Units ist möglich. Alle Units müssen im Deklarationsteil (Uses) aufgeführt werden.

Meine Frage bezieht sich nun auf die vom Programm bereitgestellten Units.

Ist es möglich die Klassen, Methoden, Eigenschaften, Funktionen usw. dieser Units in der Pascal-Script-Anwendung auszulesen und aufzulisten? Weiterhin werden durch das Programm auch Variablen bereitgestellt. Ist hier die Auflistung auch möglich?

Ich hatte beim Softwarehersteller angefragt, ob es für die Erstellung eigener PascaL-Scripte eine Dokumentation / Auflistung gibt. Dies wurde verneint, mit dem Hinweis, das Scripte kostenpflichtig erstellt werden können.

Da ich diese gerne selber schreibe deshalb hier mein Beitrag. Vom Prinzip komme ich schon an die gewünschten Daten, geht aber etwas komplizierte nur per jeweiliger Datenbankabfrage.

Wäre für Antworten dankbar.

Gruß Hubert

[himitsu]

Direkt helfen kann ich nicht,

aber falls sich hier sonst niemand findet,
dann könnest du dich an https://apexdatasolutions.com wenden. (ist zumindestens der letzte bekannte Besitzer)

Sie hatten damals den paxCompiler vom originalen Entwickler gekauft. (www.paxcompiler.com)
Allerdings sah ich jetzt auf die Schnelle nichts dazu, auf deren Webseite.
k.A. was aus diesem Produkt geworden ist.

Zitat:

Ich hatte beim Softwarehersteller angefragt

Dem Entwickler eurer Software, oder bei dem jener Komponente?

[Delphi.Narium]

Habe einen in Delphi 7 geschriebenen Editor, der als Scriptengine "RemObjects Pascal Script" nutzt.

Im Quelltext werden zu exportierende Prozeduren in der Form Sender.AddFunction(@MyAbout, 'procedure About;'); aus dem Programm heraus nach Pascalscript exportiert. In Pascalscript kann in diesem Beispiel die Prozedur About aufgerufen werden. Sie zeigt den entsprechenden Dialog des Editors.

Die Zeichenfolge 'procedure About;' kann ich auch in der Exe finden.

Daraus entstand dann die Idee es mal über die Kommandozeile zu versuchen:

Code:

find /i "procedure " name_der.exe > Prozeduren.txt
find /i "function " name_der.exe > Funktionen.txt

Es wird jeweils eine ziemlich lange Liste ausgegeben, die, wenn ich das recht überblicke, u. a. alle in Pascalscript nutzbaren Prozeduren / Funktionen enthält, aber leider auch ziemlich viele andere Fundstellen.

Aber eine manuelle "Nacharbeit" sollte da weiterhelfen können.

Die exportierten Variabeln sind ebenfalls in der Exe zu finden, allerdings finde ich keine Möglichkeit sie auf der Kommandozeile mit Find zu finden In der Hexadezimalansicht der Exe (mit 'nem entsprechenden Viewer) sind (vermutlich) alle Prozeduren, Funktionen und exportierten Variabeln, zwischen ÿÿÿÿ und jeweils zweimal Hex 00 und einem weiteren hexadezimalen Wert, zu finden.

Bei dieser Art der Auswertung solltes Du wissen was Du tust, aber für einen groben Überblick könnte es eventuell reichen.

Quelltextauszug zum Editor:

Delphi-Quellcode:

  // Registrierung der in dieser Unit implementierten Funktionen für PascalScript.
{tkEditor}  Sender.AddFunction(@MyAdoxCreate,' function AdoxCreate(sConnectionString : String) : Boolean;');
{tkEditor}  Sender.AddFunction(@MyCloseEditor, 'procedure CloseEditor;');
{tkEditor}  Sender.AddFunction(@MyCopyStringToClipboard,' procedure CopyStringToClipboard(inText : TStrings);');
{tkEditor}  Sender.AddFunction(@MyCopyToHTML,' procedure CopyToHTML(sLanguage : String);');
{tkEditor}  Sender.AddFunction(@MyExportToHTML,' procedure ExportToHTML(sFileName : String);');
{tkEditor}  Sender.AddFunction(@MyConvertSourceToHTML,' procedure ConvertSourceToHTML(sLanguage : String; sl : TStrings);');
{tkEditor}  Sender.AddFunction(@MyGetDBStatus,'function GetDBStatus : String;');

In der Ausgabe von Find dazu gefunden:

Code:

function AdoxCreate(sConnectionString : String) : Boolean;
procedure CloseEditor;
procedure CopyStringToClipboard(inText : TStrings);
procedure CopyToHTML(sLanguage : String);
procedure ExportToHTML(sFileName : String);
procedure ConvertSourceToHTML(sLanguage : String; sl : TStrings);
function GetDBStatus : String;

Und natürlich hab' ich keine Ahnung, ob das bei Deinem Programm auch so gehen könnte und das für Dich einen gangbaren Weg darstellt.

[jaenicke]

Vorweg:
Ich hatte Apex damals angefragt, nachdem sie den paxCompiler übernommen hatte. Von dort kamen sehr hohe Preise, nicht gehaltene Releasetermine und dann gar nichts mehr. Das ist extrem schade, denn paxCompiler war der beste Scriptcompiler, den es für Delphi je gab und gibt. Dass der dann durch die Übernahme einfach so vom Markt verschwunden ist...

Man konnte den paxCompiler auf verschiedene Arten verwenden. Entweder man liefert die Quelltexte mit und kompiliert on-the-fly oder man liefert nur die kompilierte Version mit. In letzterem Fall kommt man an die Klassendefinitionen nur schlecht heran, wenn es keine IDE mit Syntaxergänzung gibt. Theoretisch kann man die selbst bauen, aber das ist ein größerer Aufwand und eine Lizenz für den paxCompiler gibt es auch nicht mehr.

Ich persönlich habe den paxCompiler damals richtig schön eingebaut. Ich habe voll auf Interfaces gesetzt und genau die gleichen Units in das Hostprogramm mit Delphi einkompiliert und als API für den paxCompiler zur Verfügung gestellt. Das Programm hat also auch genau die gleichen Interfaces verwendet, so dass dort auch nichts fehlte (eat your own dog food...). Leider war der paxCompiler auch der einzige Script Compiler für Delphi, der das so kann.

[hubert17]

Erstmal vielen Dank für Beiträge.

Ich hatte hier im Forum schon nach dem paxCompiler gesucht und auch eure früheren Beiträge hierzu gelesen.

Ich denke die Vorgehensweise mit dem paxCompiler wird der Softwarehersteller schon ungefähr so gemacht haben, wie Sebastian es beschrieben hat.
Hier mal eine Downloadmöglichkeit zum paxCompiler, die ich gefunden habe: https://torry.net/components/tools/s...iler#downloads
Da ich die Software aber nicht beeinflussen kann, hilft mir das nicht weiter.

Auf eine ähnliche Idee wie Delphi.Narium bin ich auch gekommen, mit suchen und finden.

Code:

find /i "procedure " name_der.exe > Prozeduren.txt
find /i "function " name_der.exe > Funktionen.txt

hat leider bei mir kein brauchbares Ergebnis ergeben.

Meine vorgehensweise, ich habe mir den http://www.pe-explorer.com/ runtergeladen und die exe-Datei dort eingelesen. Die Liste für die VCL Objects ist nun 20.415 Zeilen lang. Natürlich werden nicht alle Objekte für Pascal-Scrript gebraucht, aber welche es nun sind, deswegen meine Frage hier.

Nun gut, wenn es keine Möglichkeit gibt, werde ich weiterhin die über die Datenbankabfrage gehen bzw. einige bereitgestellt Scripte nutzen.

Danke nochmal, für eure Mühe.

[Jens01]

Zitat:

Dass der dann durch die Übernahme einfach so vom Markt verschwunden ist...

Hatte ich im Forum schon erwähnt: Der Entwickler hatte seinen Sitz in der Ostukraine. 2014 gab es da einen Bruch und der Compiler wurde so nicht mehr weiterentwickelt.
Ich meine den Entwickler in Russland gesehen (im Web) zu haben. Das sollte viel erklären.