Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
8 / 8 / 4
Регистрация: 09.04.2010
Сообщений: 58
1

Результат работы программы

03.10.2010, 19:29. Показов 1492. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Результатом работы моей программы является текстовый файл (расширение отличное от txt) как привязать данное расширение к моей программе ну чтоб по двойному шелчку по этому файлу запускалась моя программа. Если можно исходник пожайлуста.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
03.10.2010, 19:29
Ответы с готовыми решениями:

Можно ли сохранить последний результат работы программы непосредственно в коде программы
Можно ли сохранить последний результат работы программы непосредственно в коде программы, а потом...

Каков результат работы программы?
Добрый день, подскажите пожалуйста, что делает данная программа. database dplayer (symbol,...

Определить результат работы программы
16)Баллов: 1 Результат работы фрагмента программы char a, b, c; a='b'; b='c'; c=a; cout << a...

Поясните результат работы программы
Поясните, пожалуйста, результат следующей программы: #include <iostream> struct A { char a; int...

1
 Аватар для Mawrat
13107 / 5888 / 1707
Регистрация: 19.09.2009
Сообщений: 8,808
04.10.2010, 16:44 2
Лучший ответ Сообщение было отмечено a_etot_nik как решение

Решение

Привязку можно сделать так:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
uses
  Registry;
 
procedure TForm1.Button1Click(Sender: TObject);
const
  //Расширение, которое надо связать со своей программой.
  MyExt = '.mytxt';
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
 
  Reg.RootKey := HKEY_CLASSES_ROOT;
  //Открываем ключ, задающий действие "Open" для расширения MyExt.
  //Если такого ключа пока нет, создаём его - это действие задаёт
  //второй параметр = True.
  Reg.OpenKey(MyExt + '\shell\open\command', True);
  //Указываем, что при запуске, программе в качестве параметра
  //должно быть передано имя открываемого файла.
  Reg.WriteString('', Application.ExeName + ' "%1"');
  Reg.CloseKey;
 
  //Задаём иконку для файлов с раширением MyExt.
  //Для этого указываем первую иконку (под номером ноль),
  //имеющуюся в исполняемом файле программы.
  Reg.OpenKey(MyExt + '\DefaultIcon', True);
  Reg.WriteString('', Application.ExeName + ',0');
  Reg.CloseKey;
 
  Reg.Free;
end;
Прочитать в программе переданное через параметр имя файла можно так:
Delphi
1
2
3
  if ParamCount > 1 then
    FileName := ParamStr(1)
  ;
ParamCount > 1, т. к. в качестве первого параметра (с индексом ноль) ParamStr(0) всегда передаётся полное имя исполняемого файла.
1
04.10.2010, 16:44
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
04.10.2010, 16:44
Помогаю со студенческими работами здесь

Объяснить результат работы программы
public class Solution { public static void main(String args) { ...

Не выводится результат работы программы
Не выводит результат 30 строка кода class Lab3 { public static void main(String args) { int...

Каков результат работы программы?
Добрый день, подскажите пожалуйста, что делает данная программа. predicates nondeterm relation...

Определить результат работы программы
Что выводит данная программа и что программист должен вводить с клавиатуры? (приведите пример...

Неверный результат работы программы
Дано первоначальное число. Изменяем его путем прибавления других чисел и умножения на другие числа....

Вывести результат работы программы на консоль
Подскажите как результат вывести на консоль ?  Свойство типа Paper (...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
КуМир, исполнитель Чертежник: Решение задач
bytestream 28.01.2025
КуМир — это образовательная среда для обучения программированию. Она предлагает пользователям разнообразные инструменты для разработки и отладки программ, что особенно ценно для студентов и. . .
Rust или Go? А может C++?
hw_wired 28.01.2025
С каждой новой технологией или методологией появляются новые языки программирования, призванные решать конкретные задачи либо улучшать аспекты производительности и безопасности. Среди множества. . .
Fortran и WinAPI: как создать приложение с графическим интерфейсом
hw_wired 28.01.2025
Fortran — это один из старейших высокоуровневых языков программирования, широко используемый в науке и инженерии уже несколько десятилетий. Его название происходит от "Formula Translation" (перевод. . .
Списки в Haskell
hw_wired 28.01.2025
Haskell является функциональным языком программирования, который отличается лаконичностью синтаксиса и мощными абстракциями. Важным концептом в Haskell являются списки — упорядоченные коллекции. . .
Функции высшего порядка в Haskell
hw_wired 28.01.2025
Haskell – это современный функциональный язык программирования, который получил широкое распространение благодаря своей выразительности и мощным абстракциям. Одной из ключевых особенностей Haskell. . .
Как в цикле обойти все поля объекта в JavaScript
bytestream 28.01.2025
Объекты в JavaScript представляют собой фундаментальные структуры данных, которые позволяют хранить и организовывать связанную информацию в виде пар ключ-значение. Каждый объект можно представить как. . .
Как выбрать строки в DataFrame по значению столбца в Pandas
bytestream 28.01.2025
В области анализа данных библиотека Pandas стала незаменимым инструментом для работы с табличными данными в Python. Эта мощная библиотека предоставляет множество функций для эффективной обработки и. . .
Как сделать перенос строки в Bash
bytestream 28.01.2025
При работе с командной оболочкой Bash разработчики часто сталкиваются с необходимостью форматирования текстового вывода, где ключевую роль играет правильное управление переносами строк. Умение. . .
Поиск подстроки в строке с помощью Bash
bytestream 28.01.2025
Поиск подстроки в строке является одной из важных задач в программировании и обработке текстов. Применение такого поиска можно найти в самых разных областях, от анализа данных до разработки. . .
[golang] 169. Majority Element
alhaos 28.01.2025
Тут надо вернуть "мажористый" элемент который встречается в слайсе больше чем в половине случаев. По условиям задачи во входных данных такой элемент обязан присутствовать. / / . . .
Когда лучше использовать LinkedList вместо ArrayList в Java
bytestream 28.01.2025
При разработке Java-приложений выбор правильной структуры данных играет ключевую роль в обеспечении эффективности и производительности программы. ArrayList и LinkedList являются двумя. . .
Какой ответ HTTP лучше использовать: 403 Forbidden или 401 Unauthorized, когда недостаточно прав
bytestream 28.01.2025
В современной веб-разработке правильная обработка ошибок и точное информирование клиентов о статусе их запросов играют критическую роль в создании надежных и безопасных приложений. Особое внимание. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru