3 réponses
Tiens, voici le code a insérer. Ca marche aussi pour les site web :
var URL : string;
begin
URL:='http://www.aciafr.com';
ShellExecute(0,'open',PChar(URL),Nil,Nil,SW_Show_Normal);
end;
var URL : string;
begin
URL:='mailto:Zangdar@fr.st?subject=Met Ton Objet ici;
ShellExecute(0,'open',PChar(URL),Nil,Nil,SW_Show_Normal);
end;
Biensur, n'oublie pas de mettre "ShellAPI" dans tes uses, sinon ca ne fonctionnera pas !!
www.zangdar.fr.st
var URL : string;
begin
URL:='http://www.aciafr.com';
ShellExecute(0,'open',PChar(URL),Nil,Nil,SW_Show_Normal);
end;
var URL : string;
begin
URL:='mailto:Zangdar@fr.st?subject=Met Ton Objet ici;
ShellExecute(0,'open',PChar(URL),Nil,Nil,SW_Show_Normal);
end;
Biensur, n'oublie pas de mettre "ShellAPI" dans tes uses, sinon ca ne fonctionnera pas !!
www.zangdar.fr.st
