mailto: mit Variable im Body

[michael.funcke]

Hi,

so, mein erster Beitrag. Ich hoffe, ihr könnt mir helfen:
Ich will gerne eine mailto: Funktion in mein Programm einbauen. Das an sich ist ja kein Problem:

Code:

procedure TForm1.btFoundBugClick(Sender: TObject);
begin
  ShellExecute(0,'open','mailto:<MailAdresse>?subject=I found a bug&body=Version: <HierDieVersion>%0D%0AThat´s what happened:',
               NIL, NIL, SW_SHOWNORMAL);
end;

Aber jetzt würde ich gerne die Versionsnummer, die ich in einem String habe auch noch in den Mailtext packen. Delphi will für das ShellExecute aber einen PWideChar haben. Was tun?