cs_Niala
Messages postés12Date d'inscriptionlundi 29 juillet 2002StatutMembreDernière intervention 5 avril 2003
-
29 juil. 2002 à 15:41
cs_bloom1
Messages postés328Date d'inscriptionjeudi 26 août 2004StatutMembreDernière intervention 8 mars 2007
-
10 juil. 2005 à 07:03
Salut, comment je fais pour mettre un boutons vers un site internet explorer.
ex: je cree un boutton je clik decu et quesque jecrit???
merci de me repondre
a+
Guimli
Messages postés1Date d'inscriptionlundi 15 avril 2002StatutMembreDernière intervention29 juillet 2002 29 juil. 2002 à 17:55
//----------------------------------------------------------
// Lancer l'explorateur internet sur un site Internet
//----------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute (handle, 'Open', PChar('http://www.yahoo.fr'), nil, nil, SW_SHOWNORMAL);
end;
//----------------------------------------------------------
cs_Niala
Messages postés12Date d'inscriptionlundi 29 juillet 2002StatutMembreDernière intervention 5 avril 2003 30 juil. 2002 à 16:51
jai po tres bien compris.
on va partir du debut:
imaginon je fait un nouveau prog
jinsert un bouton puis je clik deux fois decu pour taper la comande mai a cette endroit la je met koi (kan ji mi la commande du la premiere reponse il y avai une erreur) mai la le "shellapi" ta voulu dire koi?
Vous n’avez pas trouvé la réponse que vous recherchez ?
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
....
La partie Uses défini toutes les unités utilisées par ta fiche pour qu'elle puisse fonctionner. La fonction ShellExecute que conseillait Guimli est définie dans l'unité ShellApi. Il faut donc ajouter la ShellApi dans la liste des unités utilisées :
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ShellApi;