Bonjour tout le monde,

Me voilà sur D2009... mdr...

J'utilise cette fonction qui se trouve sur ce fofo :

http://delphi.developpez.com/faq/?pa...#lireinfosprog

D'ailleur j'ai modifié la ligne :
liste.add(VersionInfo[i]+' : '+strPas(InfoData));
par
liste.add(VersionInfo[i]+' : '+strPas(PChar(InfoData)));


Dans cette procédure
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.Caption := 'Mon programme ' + GetFileInfo(ParamStr(0),Memo1.Lines);
end;
J'ai cette erreur
[DCC Erreur] PagePrincipal.pas(33): E2010 Types incompatibles : 'string' et 'procedure, untyped pointer or untyped parameter'

Et là euh... je voit pas du tout.

Quelqu'un connait ?