Pascal Project Manager & Editor

[Harry Stahl]

Der Pascal Project Manager & Editor dient dazu, seine eigenen Delphi- oder Lazarus-Programme zu verwalten, zu analysieren, Informationen und Source-Code zu finden und auch zu bearbeiten.

Es existiert eine Projekt-, Dokumentations- und Internetlink-Liste, wo man alle relevante Informationen zum Projekt oder zur Entwicklung von Pascal-Projekten insgesamt bündeln kann.

Von der Projekt-Seite aus kann das Projekt in der entsprechenden "richtigen" Delphi-Version geöffnet werden oder auch im eigenen Editor-Programm-Teil, wo man ähnliche Möglichkeiten wie in Delphi hat, um zu entsprechenden Units zu springen und relevante Informationen zu ermitteln, die man vielleicht bei der Entwicklung in einem anderen Projekt gerade braucht.

Dabei geht das viel schneller, als in Delphi das andere Projekt zu öffnen und wieder zurück zu kehren. Auch benötigt das Programm nur einen Bruchteil an Arbeitsspeicher im Vergleich zu Delphi (je nach Version nur 10%), um das entsprechende Projekt zu öffnen und zu durchsuchen.

Das Programm erkennt automatisch die für das Projekt verwendete Delphi-Version. Vom Editor aus kann die kompilierte Exe-Datei direkt gestartet werden bzw. in einigen Fällen bei Bedarf sogar direkt eine Kompilation über die DCC32.exe angestoßen werden.

Wozu ist das ganze gut:

• Projekte, die oft über verschiedene Orte im System verstreut sind, können zentral und in einer durchdachten Gliederung erfasst werden.

• Auch die Dokumentation zum den Projekten oder zu verwendeten Dritt-Komponenten kann logisch strukturiert erfasst werden, so dass man mit wenigen Klicks die benötigte Information hat.

• Sehr hilfreich ist dabei auch, dass in allen Listen durch die Textfilterung es i.d.R. reicht nur wenige Buchstaben einzutippen und man sofort die gewünschte Information erhält (das gesuchte Projekt oder ein Dokument).

• Man kann schnell in einem anderen Delphi-Projekt was nachsehen, ohne das aktuelle Projekt im geöffneten Delphi verlassen zu müssen

• Anwender können Projektdateien und Formulare der neuesten Delphi-Version betrachten, auch wenn sie noch nicht die aktuellste Delphi-Version haben (nützlich für alle Forenmitglieder, die sich mal ein hochgeladenes aktuelles Beispielprojekt ansehen wollen!!!)

• Anwender können sich Delphi-Projekte auch ansehen, wenn Sie gar kein Delphi auf dem gerade verwendeten PC/Notebook haben

• Von den einzelnen Formularen können ganz einfach Screenshots erstellt werden

• Programm erkennt automatisch, mit welcher Delphi-Version ein Projekt erstellt wurde

• Projekte können somit nicht mit einer "falschen" Delphi-Version geöffnet werden, was ansonsten zu einer Reihe von Fehlermeldungen oder unterwünschten Veränderungen des Projekts führen könnte

• Es können VCL- und FMX Projekte geöffnet werden

• In vielen Fällen können VCL,FMX und LCL-Formulare angezeigt werden (bezogen auf Standard-Komponenten - Erweiterungen für die Anzeige von Drittkomponenten-Herstellern sind aber auch möglich über Plug-in-DLLs)

• Bei FMX-Formularen können auch MAC, IOS oder Android-Stile der Formulare betrachtet werden (soweit der Entwickler solche erstellt hat)

• der Text-Editor ist ein brauchbarer Source-Code-Editor, der Code-Folding, Auswahl von Sprungzielen über Prozedur-Dropdownlisten (ähnlich wie in Delphi selber), etc. verfügt

Vielleicht hat ja jemand mal Lust da rein zu schauen, wäre an einer Rückmeldung interessiert auch hinsichtlich Euren persönlichen Einschätzung hinsichtlich der Nützlichkeit eines solchen Programms (das ich je nach Zuspruch und Wünschen dann gerne auch erweitern würde).

Hier kann das Programm (uneingeschränkte Demo-Version) geladen werden:

http://www.hastasoft.de/Setup_PPME.exe

Nach dem Motto: "Ein Bild sagt mehr als tausend Worte" anliegend einige Screenshots und ein weiterer Link zu einem kurzen Video:

https://youtu.be/4Uhe5Nm65JE

[Harry Stahl]

Oh, sorry, in den falschen Ordner hochgeladen. Jetzt findest Du auch die Beta 8 wie angegeben.

Ja, Du kannst einfach eigene Styles (.vsf - Dateien) in das Programmverzeichnis legen und dann im Optionen-Dialog unter "Oberfächendesign" auswählen.

[ringli]

Zitat von ringli:

Was mir aber grade noch bei der IDE-Liste aufgefallen ist: Nach dem Start wird als Anzahl der Projekte bei der jeweilgen IDE immer 0 (null) angezeigt. Erst wenn ich im IDE-Kombinationsfeld etwas auswähle (z.B. von "Alle IDE" auf "Alle verwendeten") wird die Anzahl der Projekte angezeigt. Scheinbar hängt die IDE-Liste am OnChange-Event des Kombinationsfeldes.

Auch das dem Hinzufügen/Löschen eines Projektes scheint die IDE-Liste nicht mitzubekommen.

Kannst du das bei dir nachstellen?

Hast du dir diesen Punkt mal angesehen?


Kleine Auffälligkeit bei der Verwendung eines Styles:In den Spaltenüberschriften bei "Bugs" und "ToDo" wird die Hintergrundfarbe nicht richtig gesetzt. Bei den anderen Spaltenüberschriften jedoch schon.


Schalte ich von den Styles (z.B Carbon) auf das Oberflächendesgn "Windows" zurück erscheint erst alles normal zu sein. Verlasse ich jedoch die Einstellungen mit "Ok", erhalte ich diese Fehlermeldung:

---------------------------
Pascal Project Manager
---------------------------
Zugriffsverletzung bei Adresse 0053AD74 in Modul 'PPM.EXE'. Lesen von Adresse 34808E8C.
---------------------------
OK
---------------------------

Wechsel ich zwischen anderen Styles, tritt dieser Fehler nicht auf.

[Harry Stahl]

Warum diese Auffälligkeit bei der Zeichnung des Headers ist, ist mir ein Rätselt:

Sieht doch eigentlich alles korrekt aus, oder ? :

Delphi-Quellcode:

procedure TMainForm.hProjsDrawSection(HeaderControl: THeaderControl; Section: THeaderSection; const Rect: TRect; Pressed: Boolean);
begin
  if Section.Text = 'BAL' then
    Headercontrol.canvas.brush.color := $00C4C4FF;

  if Section.Text = 'PRG' then
    Headercontrol.canvas.brush.color := $00A6D2FF;

  if Section.Text = 'REV' then
    Headercontrol.canvas.brush.color := $00C4FFFF;

  if Section.Text = 'DON' then
    Headercontrol.canvas.brush.color := $00E1FFE1;

  if (Section.Text = 'ToDo')
  or (Section.Text = 'Bugs')
  or (Section.Text = 'Feat.')
  then begin
    Headercontrol.canvas.brush.color := clWebDarkSeaGreen;
  end;

  HeaderControl.canvas.fillrect (rect);

  var ar := rect;
  DrawText (HeaderControl.Canvas.handle, pchar (section.text), -1, ar, DT_VCENTER+DT_CENTER + DT_SINGLELINE);
end;

[ringli]

Ist vielleicht beim Setzen des Textes ein Leerzeichen mit reingerutscht? Hast du die entsprechende Abfrage mal einzeln getestet?

[Harry Stahl]

Da gibt es wohl ein Problem mit den Styles. Habe ich nun so gelöst, indem ich die option Client für stylessettings deaktiviere und alle sections nun selber male.

Aber ein anderes Problem: Wie macht man es, dass in ein RTF-Feld eingegebener Text, z.B. bei Nutzung des Windows-Styles dann auch später, wenn man in einen Style umschaltet, richtig angezeigt wird.

Ich habe es mit clWindowText und clDefault (also "RTF.SelAttributes.color := clDefault;") versucht, aber wenn ich dann in den Style wechsle, ist der Text nicht weiß (wie bei Carbon erwartet) sondern, leicht gräulich.

Edit: Habe zwar das gefunden: RTF.DefAttributes.Color := TStyleManager.ActiveStyle.GetStyleFontColor(sfEdit BoxTextNormal);

Aber dann ist der ganze Font weiß und farbliche Text-Markierungen werden ignoriert. Das ist also auch keine Lösung.

Werde daher notgedrungen bei den Stylesettings sefont und seclient rausnehmen, d.h. bei jedem Style ist der Hintergrund dann weiß und Text schwarz oder farbig...

[Harry Stahl]

So, Beta 9 hochgeladen:

- Mini-Anzeigeproblem im Header der Liste behoben
- Der Projekt-Dialog ist nun in der Größer änderbar, Programm merkt sich die Einstellungen.
- Anzeige der RTF-Komponente bei Verwendung eines styles: Kompromiss: In der Hauptmaske wird die Komponente gestylt angezeigt, in dem Bearbeiten-Dialog ohne styles, so dass dort auch farbliche Hervorhebungen vorgenommen werden können (in der Style-Ansicht ist allerdings z.B. bei Carbon aller Text weiß)
- RTF-Editor mit moderneren Icons versehen

[Harry Stahl]

So, bin jetzt schon recht weit.

Muss noch die englischen Hilfe-Texte anpassen und prüfen, ob bei SchowMessage-Meldungen auch überall Übersetzungen stattfinden (falls das Programm englisch-sprachig genutzt wird).

Aber hier schon mal ein kleiner Teaser, ich hoffe Morgen oder Übermorgen die endgültige Version hochladen zu können:

https://youtu.be/-trIpYcsYdI

Das Programm bleibt auch in der Version 5 weiterhin als freie Community Edition verfügbar.

[Harry Stahl]

Uff, jetzt ist es vollbracht, die Version 5 ist raus.

Hier nun ein kurzes Übersichtsvideo (weitere Details-Videos werden folgen):

https://youtu.be/MzZH37hCQew

Hinweis: Die Seite "Delphi DB" muss noch für ältere Delphi-Versionen mit Texten ergänzt werden, das hole ich im Rahmen der nächsten Updates nach.

Viel Spaß damit!

P.S: Die Homepage ( https://www.hastasoft.de/PPME.htm) habe ich auch überarbeitet (falls zuvor schon mal gesehen, bitte F5 für eine Aktualisierung drücken). Da habe ich auch noch mal beschrieben, was eigentlich der Unterschied zwischen der freien Community Edition und der kommerziellen Version ist.

[omnibrain]

Ich hab mir dein Tool neulich mal angeschaut, vor allem weil unsere Software aus sehr vielen einzelnen Projekten besteht. Ich muss zugeben, ich habe mir nicht viel Zeit genommen, aber ich ahabe initial gleich eine Funktion vermisst alle Projekte aus einem Verzeichnis (oder einer ganzen Verzeichnisstruktur) hinzuzufügen. Aber vielleicht habe ich die auch nur auf die Schnelle nicht gefunden. Wenn es die gäbe, dann wäre das Tool vielleicht interessant für mich.

[Harry Stahl]

Zitat von omnibrain:

Ich hab mir dein Tool neulich mal angeschaut, vor allem weil unsere Software aus sehr vielen einzelnen Projekten besteht. Ich muss zugeben, ich habe mir nicht viel Zeit genommen, aber ich ahabe initial gleich eine Funktion vermisst alle Projekte aus einem Verzeichnis (oder einer ganzen Verzeichnisstruktur) hinzuzufügen. Aber vielleicht habe ich die auch nur auf die Schnelle nicht gefunden. Wenn es die gäbe, dann wäre das Tool vielleicht interessant für mich.

Ja, das ist ganz einfach möglich. Suche einfach mit dem Dateimanager nach .dproj (oder .dpr für Delphis <= 2007) und kopiere diese in die Zwischenablage. Dann verwendest Du den Schalter "Einfügen von Zwischenablage" in der Projektlistenübersicht. Dann geht ein Dialog auf, wo Du entweder alle auf einmal übernehmen kannst oder eines nach dem anderen...