Irgendwie muss mein Pascal über die letzten Jahre arg eingerostet sein.
Ich baue gerade ein InnoSetup-Script, und habe ein Problem beim Formatieren von CustomMessages mit Platzhaltern.
Folgendes funktioniert:
Delphi-Quellcode:
var
message: string;
begin
message := CustomMessage('MyCustomMessageName'); // Die Message sei: 'Das %1 ist %2 ein %3 Test'
result := FmtMessage(message, [IntToStr(1), 'Some text', IntToStr(3)]); // Array mit den Argumenten wird direkt übergeben
end;
Am Ende habe ich "Das 1 ist Some text ein 3 Test".
Folgendes funktioniert leider nicht:
Delphi-Quellcode:
var
message: string;
args: Array of String;
begin
message := CustomMessage('MyCustomMessageName'); // Die Message sei: 'Das %1 ist %2 ein %3 Test'
args := [IntToStr(1), 'Some text', IntToStr(3)]; // Array wird hier vorbereitet...
result := FmtMessage(message, args); // ... und als variable übergeben.
end;
Hier wirft mir InnoSetup zur Laufzeit einen "Type Mismatch"-Fehler beim Aufruf von FmtMessage.
FmtMessage ist laut InnoSteup Doku folgendermassen definiert:
function FmtMessage(const S: String; const Args: array of String): String;
Eigentlich will ich folgende Hilfsfunktion realisieren:
Delphi-Quellcode:
function FormatCustomMessage(const messageId: String; const arguments: Array of String): String;
begin
result := FmtMessage(CustomMessage(messageId), arguments); // array soll aus den Parametern kommen
end;
Und dann so aufrufen:
Log(FormatCustomMessage('CreatedCustomWizardPage', [IntToStr(result.Id), caption, IntToStr(previousPageId)]));
Die Frage lautet also, wie kann ich in Inno / PascalScript das Array of String mit den Argumenten von einem Funktionsaufruf auf den anderen durchschleifen?
Irgendwie komm ich mir grad etwas doof vor, weil das doch recht easy sein müsste, oder?
Vielen lieben Dank,
Sebastian