Und so?
Delphi-Quellcode:
lParamList := TStringList.Create;
lParamList.Add('{');
lParamList.Add('"message":"test message",');
lParamList.Add('"type":"TEST",');
lParamList.Add('"sender":"self",');
lParamList.Add('"timestamp":"1424950740000"');
lParamList.Add('}');
Wenn das geht, ist der Aufbau des JSON-Objekts schon einmal korrekt, aber das sollte man nicht so machen, sondern besser eine "richtige" Bibliothek dafür nehmen.