Subversion Repositories userdetect2

Rev

Rev 83 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 83 Rev 93
Line 117... Line 117...
117 
  finally
 117 
  finally
118 
    x.Free;
 118 
    x.Free;
119 
  end;
 119 
  end;
120 
{$ELSE}
 120 
{$ELSE}
121 
begin
 121 
begin
122 
  result := OpenDialog.Execute;
 122 
  result := SaveDialog.Execute;
123 
{$IFEND}
 123 
{$IFEND}
124 
end;
 124 
end;
125 
 
 125 
 
126 
// --- AddTransparentIconToImageList
 126 
// --- AddTransparentIconToImageList
127 
 
 127