What's Wrong With My DTM Strings?

[Fidget]

program Install_Deauther_64Bit;

var DTM,
Install, bmp,c, v, m, n, x, y: Integer

begin
  if (FindColor(x, y,211426,60,72,1128,690) and (x>150)) then
  begin
    MoveMouse(x,y);
    sleep(2000);
    clickmouse(x,y,1);
    clickmouse(x,y,1);
    Writeln('Icon Found');
    Writeln('X = ',x);
    Writeln('Y = ',y);
    sleep(1000);
    FindColor(c, v,32768,60,72,1128,690);
    Writeln('Great found the guide icon!');
    sleep(3000);
    MoveMouse(c,v);
    sleep(2000);
    PressKey(37);
    ClickMouse(c,v,1);
    ClickMouse(c,v,1);
    sleep(3000);
    sleep(2000);
    Showmessage('Great! Lets get these installed for you, just press ok');
    findcolor(m, n, 8388608, 63,59,823,667);
    sleep(1000);
    Clickmouse(m, n,1);
    sleep(2000);
    Clickmouse(m, n,1);
    PressKey(13);
    sleep(2000);

    DTM := DTMFromString('m1gAAAHic42JgYPgJxNGMDAz1QMwAxBVAXAnEJUD8AygkB6TrgHgTEG8F4p1AvBeIdwDxYSh/HxQfAuIPHz7A8f///1H4YHyuHUwTCxiJxAgAABxFKAQ=');



  end;
  if(not (FindColor(x, y,211426,60,72,1128,690) and (x>150))) then
  begin
    ShowMessage('Could not find icons');
  end;
end.

[Fidget]

Never mind, figured it out. Forgot to add a DTM Var.

[mars01]

Make sure to free your DTM's too. Maybe you did that later on.