procedure Form1Create(Sender : TObject); begin Button1.Visible := FileExists('c:\folder\file1.exe'); Button2.Visible := FileExists('c:\folder\file2.exe'); ... end;