Syntax:
function Implode(const cSeparator: String; const cArray: Array of String): String;
Beschreibung:
Implode wandelt einen Array von Strings in eine Zeichenkette um.
Dabei werden die Werte im Array durch das im cSeparator angegeben Zeichen getrennt
Diese Funktion kann man dazu verwenden um einen String zusammenzubauen und diesen an
einen anderen Dialog oder Bericht zu übergeben. Dies ist ein guter Ersatz da ja die
Dialog Parameter keine Arrays unterstüzen.
Beispiel:
procedure netButton2_OnClick(Sender: Integer);
var
aArray : Array of String;
Str: string;
begin;
setLength(aArray, 2);
aArray0 := 'Mustermann';
aArray1 := 'Max';
Str := Implode(';', aArray);
message_dlg(Str); //Die Message liefert den String "Mustermann;Max" zurück
end;