<div dir="ltr"><div dir="ltr"><br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Fri, Jul 5, 2019 at 1:41 PM Ryan Joseph <<a href="mailto:genericptr@gmail.com">genericptr@gmail.com</a>> wrote:</div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
This doesn’t work either.<br>
<br>
{$push}<br>
{$h+}<br>
var lines: ansistring = `<br>
  #version 150<br>
<br>
  uniform sampler2D textures[8];<br>
  in vec2 vertexTexCoord;<br>
  in vec4 vertexColor;<br>
  in float vertexUVMap;<br>
  out vec4 fragColor;<br>
<br>
  void main()<br>
  {<br>
    if (vertexUVMap == 255) {<br>
      fragColor = vertexColor;<br>
    } else {<br>
      fragColor = texture(textures[int(vertexUVMap)], vertexTexCoord.st);<br>
      if (vertexColor.a < fragColor.a) {<br>
        fragColor.a = vertexColor.a;<br>
      }<br>
    }<br>
  }`;<br>
{$pop}<br>
<br>
Regards,<br>
        Ryan Joseph<br></blockquote><div><br></div><div>Doesn't work in what regard? You wouldn't even need {$H+} there, as you're explicitly using an ansistring.</div><div><br></div><div>Does something like the following not work for you:</div><div><br></div>program Example;<br><br>{$push}<br>{$H+}<br>const ReallyLongConstant = `<br>imagine<br>this<br>was<br>really<br>long<br>`;<br>{$pop}<br><br>var Short: String;<br><br>begin<br>  WriteLn(GetTypeKind(ReallyLongConstant));<br>  WriteLn(GetTypeKind(Short));<br><div>end. </div></div></div>