Post-Build-Ereignis mit einer Variable

[hzzm]

Kann ich das nicht umgekehrt zu meinem Holzweg machen?

Ich setze eine environment variable die jederzeit in delphi verfuegbar ist und lese die einfach am Anfang in meinen Compat String?

Wenn ich das richtig verstanden hab', kann ich env vars ja schon ganz einfach an den post-build cmd liefern...

[Uwe Raabe]

Zitat von hzzm:

Ich setze eine environment variable die jederzeit in delphi verfuegbar ist und lese die einfach am Anfang in meinen Compat String?

Läuft dein compiliertes Programm denn ausschließlich auf deinem Entwicklungsrechner?

Vielleicht trittst du besser mal einen Schritt zurück und schilderst das eigentliche Ziel dieser ganzen Aktion?

[hzzm]

Zitat von Uwe Raabe:

Läuft dein compiliertes Programm denn ausschließlich auf deinem Entwicklungsrechner?

Vielleicht trittst du besser mal einen Schritt zurück und schilderst das eigentliche Ziel dieser ganzen Aktion?

Ja verdammt, das ist mir spaeter auch aufgefallen. So geht's auch nicht.

Ich brauche den String in meinem Installer-Kompilierer (der ueber .bat post-build startet), weil ich diese Compat nach aussen reflektieren muss (Information) und in meinem delphi-code, weil ich hier tatsaechlich in Abhaengigkeit der Compat unterschiedliche Aktionen reisse.

Dann muss ich den String halt doch an 2 Stellen pflegen. Es fuehrt kein Weg herum.
Es ist kein Weltuntergang; waere halt eleganter gewesen, wenn es gegangen waere.

Oder eben die Version von jaenicke, bei der ich in der .bat noch die Datei im repo auslese, die ich auch im delphi code $I'e.

Danke fuer's mitdenken.

[himitsu]

Irgendwo ins Programm {$INCLUDE 'version.inc'} oder {$I 'version.inc'} und die version.inc const meinstring = '132'; .

oder const {$INCLUDE 'version.inc'} und die version.inc meinstring = '132';
oder const {$INCLUDE 'version.inc'}; und die version.inc meinstring = '132'
oder const meinstring = {$INCLUDE 'version.inc'}; und die version.inc '132' .
Diese Stringkonstante lässt sich auch fast überall anders verwenden var meinstring: string = {$INCLUDE 'version.inc'}; oder MeineProcedure({$INCLUDE 'version.inc'}); .
Und auch mehrere Konstanten/Variablen wären möglich.

Und diese INC lässt sich sehr einfach neu generieren oder bearbeiten.
In unserem Erstellungsscript (FinalBuilder) lass ich eine INC mit mehreren Konstanten im FinaBuilder generieren und speichern.
Einfach aus einem Text mit mehreren FB-Variablen drin, worin die Versionsnummer, die ausgecheckte SVN-Revision und der Repository-Name (der letzte Ordnername aus dem SVN-Verzeichnis) womit man beim Kunden nachsehen kann welche Version bei ihm genau installiert ist, wenn es mal Probleme gibt. (wird im InfoDialog mit ausgegeben)

[Uwe Raabe]

Alternativ bietet sich auch eine String-Resource in einer RC-Datei an. Oder man bindet den String als resourcestring ein und extrahiert diesen dann z.B. mit Angus Johnson's ResourceHacker oder einem ähnlichen Tool.

[himitsu]

resourcestring klingt nett, aber blöd ist eben, dass man ihn suchen muß, er bei jedem Kompilieren einen anderen Index haben kann und man ihn nur über den unbekannten Index oder seinen Inhalt finden kann.

[Uwe Raabe]

Zitat von himitsu:

resourcestring klingt nett, aber blöd ist eben, dass man ihn suchen muß, er bei jedem Kompilieren einen anderen Index haben kann und man ihn nur über den unbekannten Index oder seinen Inhalt finden kann.

Wenn man allerdings dem Compiler ein -GD oder --drc mitgibt, dann findet man den resourcestring in der so erzeugten drc Datei unter dem Namen <unit>_<resourcename> auch im Klartext wieder. Spart den ResourceHacker und lässt sich z.B. über einen simplen Grep-Befehl extrahieren.

[hzzm]

Ich haette gerne

Code:

ARBCompat: String = '{$I ARBCompat.inc}';

weil ich in allem dahinter eigentlich nur den puren String-Inhalt brauche.
In batch regex replace und so wird einfach unnoetig komplex zu warten, ganz zu schweigen vom Drama in meinem Installer-Compiler.

Natuerlich funktionert das so nicht.
Gibt's irgendeinen schmutzigen Trick, durch den ich in der .inc wirklich nur den puren Inhalt _24 aufbewahren kann?

Ich habe es erfolglos so probiert:

Code:

ARBCompat: String = {$I Quote.inc}{$I ARBCompat.inc}{$I Quote.inc};

In Quote.inc ' oder ".
und bekomme mit ': Nicht abgeschlossener String und mit ": Ungueltiges Zeichen in Eingabedatei.