Interface einer .PAS auswerten

[Sharky]

Hai ihr,

ich möchte gerne den Interfaceabschnitt einer Unit auswerden (source liegt natürlich vor) aber weiss noch nicht so recht wie ich das ganze effektiv angehen soll.
Ich möchte zum Schluss diese Informationen haben:

• Proceduren / Funktionen
• Klassen
  • Public-Methoden
  • Public-Propertys
• Typen
• Constanten
• Variablen

Kann mir einer eine guten Denkanstoss geben wie ich so etwas zum Beispiel auswerte :stupid:

Delphi-Quellcode:

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;
  blubb = integer; blubber = boolean;
const
  hallo = 1;
var
  Form1: TForm1;

type TTest
     =
     class
     (TStringList) private foo
     : boolean; public

     property  anzeige :
     boolean read foo
     write
     foo
     ;
     end;

[Daniel]

Wenn mich meine grauen Zellen nicht im Stich lassen, heißt das, was Du machen möchtest "lexikalische Analyse". Es gibt da speziell für Delphi von Martin Waldenburg eine wirklich feine Unit: http://www.delphi32.com/vcl/3341/.

[edit]

• Es gibt auch noch eine Alternative von Martin: MPasLex. Müsstest Du mal gucken, was für Deine Zwecke besser geeignet ist: http://delphi.icm.edu.pl/authors/a0002690.htm.

[/edit]

[Sharky]

Hai Daniel,

bei der ersten Lösung von Martin Waldenburg muss ich mal schauen wie er es gemacht hat. Seine Demos kann man wohl nicht kompilieren ohne sich erst einige, von ihm verwendete, Komponenten zu installieren.

Der zweite Link geht leider nicht.

[Daniel]

Zitat:

Zitat von Sharky

Der zweite Link geht leider nicht.

:gruebel: Merkwürdig. Vielleicht habe ich dann die letzte Seite vom Server abgerufen und die müssen erst wieder Bits nachfüllen. Im Anhang die zweite Unit, von der ich sprach. Das ist der Tokenizer, mit dem ich selber schon mal Code analysiert habe und danach draus einen rudimentären Profiler erstellt habe. (Dessen Code es leider nicht mehr gibt.)

[Sharky]

Hallo,

die Unit sieht gut aus :-D
Ich denke damit kann ich etwas anfangen und meine "Delphi-Versions-Referenz" aufbauen. Danke.