bonjour a tous :-)
voila je suis débutant et j'ai un petit probleme pour transformer
une demande Opendialog en ouverture diret d'un fichier.

alors en faite j'ai :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
procedure TForm1.SpeedButton1Click(Sender: TObject); 
Var Temp: String;
begin
 
if Exe = '' then ReadExe;    //Ces 2 lignes s'assurent qu'un nouveau dossier ne peut pas
if Exe[3] <> 'P' then Exit;  //être ajouté à un exe mené à bonne fin.
 
OpenDialog1.Execute;
If OpenDialog1.FileName <> '' then
begin
  Add2Exe('YourFileName'+IntToStr(Count),ExtractFileName(OpenDialog1.FileName));
  AddFile2Exe('YourFile'+IntToStr(Count),OpenDialog1.FileName);
  Inc(Count);
end;
end;

mais il me faut juste chercher mon fichier x.ini dans c:\

je tente plusieurs solution mais je pense etre tro NULL pour le moment
pour pouvoir bien comprendre mes erreur