Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.01.2011, 21:25
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
Сообщение Програмно создать и редактиривать модули (pas)

Можеть программно создать и редактировать pas файл. Пожалуйста, ответите. Мне это шас очен нужные. Заранее Спасибо.
Ответить с цитированием
  #2  
Старый 15.01.2011, 21:34
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

.pas файл - это обычный текстовый файл. И создать его можно:
Код:
var f:text;
...
assignfile(f,'123.pas');
rewrite(f);
И редактировать:
Код:
...
assignfile(f,'123.pas');
append(f);
Но это только для дозаписи. Если надо именно менять имеющийся в файле текст - то лучше так:
Код:
var f:file;
...
assignfile(f,'123.pas');
reset(f,1);
и дальше работать через seek, BlockRead, BlockWrite.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #3  
Старый 15.01.2011, 22:09
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

Допустим, я создал файл. После этово нужен исползавать этот модул в свои проги. А ето как делаеться ?
Ответить с цитированием
  #4  
Старый 15.01.2011, 22:15
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Вручную подключаешь через меню проекта, там AddToProject
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #5  
Старый 15.01.2011, 22:15
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

exe это распаковка. Он распологаются внетри exe файл. Сможеш её подключить во время выполнения программи (как dll ах)
Ответить с цитированием
  #6  
Старый 15.01.2011, 22:18
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

это невозможно. Программа - это машинные коды. Числа. Исходник (pas) - это текст.
Единственное, что можно сделать, это распространять вместе с программой компилятор делфы и заставлять его при запуске компилировать файл в Dll, или написать свой компилятор. Но тогда встает резонный вопрос: зачем это делать, если можно скомпилировать сразу в DLL и не разбрасываться исходниками
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #7  
Старый 15.01.2011, 22:37
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

Программа такая. Ползовател вводить какая то уравнение в виду f(x)=0. Тепер программа нужен решить ето уравнений. Для етого нужен вичислит значение функци f(x).
Ответить с цитированием
  #8  
Старый 15.01.2011, 22:47
Аватар для Моклев
Моклев Моклев вне форума
Новичок
 
Регистрация: 27.02.2009
Адрес: Лен. обл., г. Коммунар
Сообщения: 53
Версия Delphi: 7 и 2010
Репутация: 16
По умолчанию

просто написать процу, которая распознает арифм. выражения, и все. Я такую делал, не очень сложно
Ответить с цитированием
  #9  
Старый 15.01.2011, 22:49
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

см. "польская нотация"
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #10  
Старый 15.01.2011, 22:52
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

Авторы программа Matlab решал ету проблема. В программе уравнение вводиться в обычном Tedita в языке паскал.
Ответить с цитированием
  #11  
Старый 15.01.2011, 22:55
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,035
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

См. в сторону интерпретаторов (FastScript, например).
Ответить с цитированием
  #12  
Старый 15.01.2011, 22:58
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

Представте, уравнение такая.
Exp(x)*sin(x)-cos(x)*x+5=0
Как можеш конвертироват ее в обычном строку на выполняюшим оператору. По моему невозможно готовить универсальная процедура.
Ответить с цитированием
  #13  
Старый 15.01.2011, 22:59
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Польская нотация. Я делал построитель графиков с ее помощью.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
  #14  
Старый 15.01.2011, 23:08
Аватар для Farruhjon
Farruhjon Farruhjon вне форума
Прохожий
 
Регистрация: 15.01.2011
Адрес: р.Узбекистан г.Фергана
Сообщения: 13
Репутация: 12
По умолчанию

Я незнаю што Польская нотация. Што ето какая то новая технология. Сможеш увидет код ваше программу ?
Ответить с цитированием
  #15  
Старый 15.01.2011, 23:09
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Это алгоритм. Гугл даст ответ
то, что у меня, наворочено, переворочено и много лишнего. Лучше гугл спросить.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 19:07.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter