Tool zum Visualisieren gesucht

[Memo]

Für Dbase und Foxplus gab es mal ein Tool, mit dem man sich(wie das Quelltextbsp. zeigt) graphisch den Ablauf, bzw. die Verschachtelung in Programmen anzeigen lassen konnte.

Delphi-Quellcode:

  
  664    ║  │  │  │    z=1
  665    ║  │  │  │  ╔═do while .T.
  666    ║  │  │  │  ║    rnr="rnr"+trim(ltrim(str(z)))
  667    ║  │  │  │  ║    goto &rnr
  668    ║  │  │  │  ║    b1="N"
  669    ║  │  │  │  ║    @ z+9,53 get b1
  670    ║  │  │  │  ║    j=0
  671    ║  │  │  │  ║  ╔═do while j=0
  672    ║  │  │  │  ║  ║    J=INKEY()
  673    ║  │  │  │  ║  ║  ┌─if j>0
  674    ║  │  │  │  ║  v═══════exit
  675    ║  │  │  │  ║  ║  └─endif
  676    ║  │  │  │  ║  ╚═enddo
  677    ║  │  │  │  ║  ┌─if j=13
  678    ║  │  │  │  v═══════exit
  679    ║  │  │  │  ║  └─endif
  680    ║  │  │  │  ║  ┌─if chr(j)$"Zz"
  681    ║  │  │  │  v═══════exit
  682    ║  │  │  │  ║  └─endif
  683    ║  │  │  │  ║  ┌─if chr(J)$"JjNn"
  684    ║  │  │  │  ║  │    b1=chr(j)
  685    ║  │  │  │  ║  │  ┌─if chr(j)$"Jj"
  686    ║  │  │  │  ║  │  │    b2=.T.
  687    ║  │  │  │  ║  │  ├─else
  688    ║  │  │  │  ║  │  │    b2=.F.
  689    ║  │  │  │  ║  │  └─endif
  690    ║  │  │  │  ║  │    repla B with b2,BEL_DAT with date()
  691    ║  │  │  │  v═══════exit
  692    ║  │  │  │  ║  └─endif
  693    ║  │  │  │  ║  ┌─if j=5 .and. z>1
  694    ║  │  │  │  ║  │    @ z+9,53 say b1
  695    ║  │  │  │  ║  │    z=z-1
  696    ║  │  │  │  ^═══════loop
  697    ║  │  │  │  ║  └─endif
  698    &#9553;  &#9474;  &#9474;  &#9474;  &#9553;  &#9484;&#9472;if j=24 .and. z<zmax
  699    &#9553;  &#9474;  &#9474;  &#9474;  &#9553;  &#9474;    @ z+9,53 say b1
  700    &#9553;  &#9474;  &#9474;  &#9474;  &#9553;  &#9474;    z=z+1
  701    &#9553;  &#9474;  &#9474;  &#9474;  ^&#9552;&#9552;&#9552;&#9552;&#9552;&#9552;&#9552;loop
  702    &#9553;  &#9474;  &#9474;  &#9474;  &#9553;  &#9492;&#9472;endif
  703    &#9553;  &#9474;  &#9474;  &#9474;  &#9562;&#9552;enddo

Hat sowas schon einmal jemand für Delphi gesehen?

[Kedariodakon]

Alo wenn ich das oben so sehe,...
Öhm warum will man den normalen Quelltext noch grafisch darstellen? :gruebel:
Den schau ich mir an und schon is alles klar... :cyclops:

Bei ASM is das ja verständlich, aber bei delphi Quellcode :gruebel:
Solang man einen guten ProgrammierStyle hat, ist sowas vollkommen unnötig...


Also ich keinn so ein Programm nicht...

Bye

[Interceptor]

Ein sog. Struktogramm sollte genau das machen was du suchst.

Google einfach mal nach "MyFriend" 2.0 (oder so), damit war ich immer ganz zufrieden

[Kedariodakon]

Zitat:

Zitat von Interceptor

Ein sog. Struktogramm sollte genau das machen was du suchst.

Google einfach mal nach "MyFriend" 2.0 (oder so), damit war ich immer ganz zufrieden

Hmm aber das da obern schaut rein gar nicht nach einem Struktogramm aus...


Bye

[Memo]

Zitat:

Zitat von Interceptor

Ein sog. Struktogramm sollte genau das machen was du suchst.

Google einfach mal nach "MyFriend" 2.0 (oder so), damit war ich immer ganz zufrieden

Das scheint nur etwas für C/C++ zu sein? Sonst wäre es schon ziemlich das was ich suche.

[sakura]

Zitat:

Zitat von Memo

Das scheint nur etwas für C/C++ zu sein? Sonst wäre es schon ziemlich das was ich suche.

Es hat auch ein Pascal-Plugin auf der Downloadseite. Wie geht es mit Delphi geht musst Du halt mal testen ;)

...:cat:...

[Interceptor]

Nö, nicht nur für C/C++...

Ein Struktogramm hat ja nur die Aufgabe die Programmlogik zu visualisieren, die Syntax is da eher nebensächlich.

[Memo]

Zitat:

Zitat von Interceptor

Nö, nicht nur für C/C++...

Na gut wenn du es sagst. Ich hatte es nur auf der Seite so gelesen.

Zitat:

Es hat auch ein Pascal-Plugin auf der Downloadseite.

Axo, dann guck ich nochmal.

Danke einstweilen.

[sakura]

Zitat:

Zitat von Interceptor

Ein Struktogramm hat ja nur die Aufgabe die Programmlogik zu visualisieren, die Syntax is da eher nebensächlich.

Falsch, um die Logik aus vorhandenem Code heraus darstellen zu können, muss das Strukturprogramm durchaus wissen, woran es Code-Blöcke, Prozeduren, Klassen, Records etc. erkennt.

...:cat:...

[Mephistopheles]

Ich bin schockiert. Die Screenshots voll im Windows 3.1x-er Stil und die Bonusaktion lief bis 2001. Könnte es sein daß der Inhaber der Domain da etwas verschlafen hat?