sel proj file diag init val

This commit is contained in:
Basile Burg 2015-09-26 22:00:13 +02:00
parent 2d855e9f4d
commit 54b13358de
1 changed files with 1 additions and 0 deletions

View File

@ -366,6 +366,7 @@ begin
else while List.Selected.SubItems.Count < 3 do else while List.Selected.SubItems.Count < 3 do
List.Selected.SubItems.Add(ini); List.Selected.SubItems.Add(ini);
with TOpenDialog.Create(nil) do try with TOpenDialog.Create(nil) do try
FileName := ini;
if Execute then if Execute then
List.Selected.SubItems[2] := FileName; List.Selected.SubItems[2] := FileName;
finally finally