Q:  How do I do a TextOut() so that I don't get the white space around the text?

A:

  with canvas do begin
    brush.style := bsClear;
    font.color := clWhite;
    TextOut(25, 25, 'I am the greatest!');
  end;