var
basepart,basepart2 : string
begin
basepart := '{"name":"'+ gamename +'","extra":"","password":"'+ gamepass +'","report":"'+ report +'"}';
basepart2 := '{"name":"'+ gamename +'","extra":"'+ id +'","password":"'+ gamepass +'","report":"'+ report +'"}';

bu şekilde. Vb dilinde QuotedStr olmadığından tırnaklar karışmış birbirine