SPECIAL OFFER        Order and save right now!
20% off with the 729824315 dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming!

⤷ Set other file mode

Use FileMode variable for setting some of the valid modes for file.
0 - ReadOnly
1 - WriteOnly
2 - ReadWrite are valid modes.

procedure TForm1.Button2Click(Sender: TObject);
var
  MyFile: TextFile;
begin
  AssignFile(MyFile,Edit1.Text);
  Reset(MyFile);
  FileMode:=ComboBox1.ItemIndex;
  CloseFile(MyFile);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
    Edit1.Text:=OpenDialog1.FileName;
end;
Related components
TFileSearch
TFolderMonitor
TFileVersion
More for developers
Databases for Amazon Associates
Amazon Categories
Amazon Nodes