procedure TForm1.UnPas21OtherTryToRun(StopSiDejaLance: Boolean; ParamCount: Integer; ParamArray: TParamArray; StringUser: ShortString); begin Showmessage(paramarray[1]); end; procedure TForm1.UnPas21DejaLance(Sender: TObject); begin close; end;
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question