Lacement avec parametre
sebrs1
-
29 oct. 2001 à 16:58
fabsys_s Messages postés 5 Date d'inscription dimanche 7 décembre 2003 Statut Membre Dernière intervention 20 février 2008 - 19 déc. 2005 à 18:27
fabsys_s Messages postés 5 Date d'inscription dimanche 7 décembre 2003 Statut Membre Dernière intervention 20 février 2008 - 19 déc. 2005 à 18:27
1 réponse
fabsys_s
Messages postés
5
Date d'inscription
dimanche 7 décembre 2003
Statut
Membre
Dernière intervention
20 février 2008
1
19 déc. 2005 à 18:27
19 déc. 2005 à 18:27
procedure TForm1.FormCreate(Sender: TObject);
begin
if paramstr(1) <> '' then
messagebox(0,pchar('param: '+paramstr(1)),'Message en fction du param',0);
end;
hihi :)
begin
if paramstr(1) <> '' then
messagebox(0,pchar('param: '+paramstr(1)),'Message en fction du param',0);
end;
hihi :)
