Bonjour à tous

J'ai ce message-là :

et l'erreur, en pas-à-pas, ici :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
procedure TStrings.Error(const Msg: string; Data: Integer);
 
  function ReturnAddr: Pointer;
  asm
          MOV     EAX,[EBP+4]
  end;
 
begin
  raise EStringListError.CreateFmt(Msg, [Data]) at ReturnAddr;
end;
La Form vient juste de s'ouvrir, et la TStringList n'est pas même encore utilisée ! Pas de Lst := TStringLIst.Create : rien !

D'où ça peut provenir ?

Merci !