Работа с OpenDialog

@EvansProject · Регистрация: 09.02.2013

Author24 — интернет-сервис помощи студентам

Ребят, кому не трудно, подскажите как написать открытие файла через OpenDialog?
Пишу курсовую, кодировка текста, и мне нужно чтобы я мог выбрать текстовый файл.

@ILNAR_93 · 24.04.2013, 17:36

Delphi

1 2	if OpenDialog1.execute then showmessage(OpenDialog1.filename);

@Waddonator · 24.04.2013, 17:37

Delphi

1
2
3

If OpenDialog1.Execute then begin
   <ваши действия>
end;

название выбранного файла хранится в OpenDialog1.FileName

@EvansProject · 24.04.2013, 17:58 **[ТС]**

Спасибо, вспомнил.
Вот как это выглядит.

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
  showmessage (OpenDialog1.FileName);
end;

24.04.2013, 20:32

procedure TForm1.N5Click(Sender: TObject);
begin
OpenDialog1.Title:=’відкрити файл’;
If OpenDialog1.Execute then
begin
assignFile(F,OpenDialog1.FileName);
Reset(F);
n:=1;
end;
end.
папробуй если че пишы где ошибка

Новые блоги и статьи
Как проверить, что файл НЕ существует с помощью Bash bytestream 25.01.2025 В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .	Как проверить, что строка пустая, неопределена или null в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .	Как проверить существование ключа в объекте или массиве в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript программисты постоянно сталкиваются с необходимостью работать с объектами и массивами. Эти структуры данных являются фундаментальными элементами языка и. . .	Как создать ArrayList из массива (array) в Java bytestream 25.01.2025 При разработке программного обеспечения на языке Java программисты часто сталкиваются с необходимостью эффективного управления наборами данных. Массивы и ArrayList являются двумя фундаментальными. . .	Как сгенерировать случайные целые числа (int) в указанном диапазоне в Java bytestream 25.01.2025 В программировании генерация случайных чисел является важнейшим инструментом для решения множества практических задач. От создания игровых механик до реализации алгоритмов машинного обучения, от. . .	Как сделать, чтобы grep выводил строки до и после найденной hw_wired 25.01.2025 Утилита grep стала незаменимым инструментом для поиска и фильтрации информации в Unix-подобных операционных системах. Эта командная утилита позволяет осуществлять поиск строк, соответствующих. . .
Как клонировать определенную ветку в Git bytestream 24.01.2025 Одной из ключевых функций Git является возможность клонирования веток, что позволяет создавать локальные копии удаленных репозиториев и работать с определенными версиями проекта. Этот механизм. . .	Как в цикле обойти строки DataFrame в Pandas Python bytestream 24.01.2025 DataFrame представляет собой одну из основных структур данных в библиотеке Python Pandas, которая организует информацию в виде двумерной таблицы с строками и столбцами. Эта структура данных особенно. . .	Как получить имя текущей ветки в Git bytestream 24.01.2025 При работе с Git часто возникает необходимость определить имя текущей ветки, в которой ведется разработка. Знание текущей ветки является критически важным аспектом для эффективного управления. . .	Как отсортировать массив объектов по значению поля объекта в JavaScript bytestream 24.01.2025 При разработке веб-приложений на JavaScript разработчики часто сталкиваются с необходимостью работать с массивами объектов. Эти структуры данных представляют собой упорядоченные наборы элементов, где. . .	Ошибка "src refspec master does not match any" при пуше коммита в Git bytestream 24.01.2025 При работе с системой контроля версий Git разработчики нередко сталкиваются с различными ошибками, одной из которых является сообщение "src refspec master does not match any". Эта ошибка возникает. . .	Как округлить не более двух цифр после запятой в JavaScript bytestream 24.01.2025 При работе с числами в JavaScript разработчики часто сталкиваются с необходимостью округления десятичных значений до определенного количества знаков после запятой. Это особенно важно при работе с. . .

@EvansProject 4 / 4 / 0 Регистрация: 09.02.2013 Сообщений: 14
		1
	Работа с OpenDialog 24.04.2013, 17:22. Показов 1526. Ответов 4 Метки нет (Все метки) Ребят, кому не трудно, подскажите как написать открытие файла через OpenDialog? Пишу курсовую, кодировка текста, и мне нужно чтобы я мог выбрать текстовый файл. 0

anri11
	24.04.2013, 20:32	5
	procedure TForm1.N5Click(Sender: TObject); begin OpenDialog1.Title:=’відкрити файл’; If OpenDialog1.Execute then begin assignFile(F,OpenDialog1.FileName); Reset(F); n:=1; end; end. папробуй если че пишы где ошибка