/////////////////////////////////////
//Open notepad and write something //
/////////////////////////////////////
var
  sh, WScript;
begin
  sh := CreateOleObject('WScript.Shell');
  sh.Run ('%windir%\notepad.exe');
  Sleep (500);
  sh.SendKeys ('Hello from Twistpad!')
end;