Para crear un QRImage en tiempo de ejecución tendrias que escribir el siguiente código:
Código:
var
Image: TQRImage;
begin
Image := TQRImage.Create(Self);
Image.Top := 0;
Image.Left := 0;
Image.Show;
Y en realción a la funcion addslashes de PHP puedes usar en delphi StringReplace por ejemplo.