Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.28;
Скачать: CL | DM;

Вниз

Команды   Найти похожие ветки 

 
Серёга   (2004-03-10 18:12) [0]

Здравствуйте! Хотел узнать вот такую вещь: есть у меня например Memo1 и Edit1. Если пользователь вводит в Edit "Memo1.lines.clear"-memo очищается, "memo1.lines.loadfromfile("1.txt")" - происходит загрузка в Memo файла ? Происходит как бы выполнение команд.


 
M@D ©   (2004-03-10 18:17) [1]

Введи константы
Memo1.lines.clear
memo1.lines.loadfromfile("1.txt")
и при нажатии на кнопку, обработай соостетствующим образом.
Типа
for i := 0 to High(const) do
 if const[0] then
   Memo1.lines.clear


и тд


 
M@D ©   (2004-03-10 18:20) [2]

соостетствующим
Сам удивился...


 
Серёга   (2004-03-10 18:54) [3]


> Введи константы
> Memo1.lines.clear
> memo1.lines.loadfromfile("1.txt")
> и при нажатии на кнопку, обработай соостетствующим образом.
> Типа
> for i := 0 to High(const) do
>  if const[0] then
>    Memo1.lines.clear
>
> и тд

Всё дело в том, что я заранее не знаю какие команды будет вводить пользователь (их много). И ввод констант будет добавлять лишний размер программе.


 
Гаврила   (2004-03-10 19:01) [4]

>>Серёга   (10.03.04 18:54) [3]
Встроенной в сам pascal такой возможности нет

Команды - только для операций с TMemo ?
В таком случае констант будет ограниченное количество, и увеличение размера программы за их счет будет намного меньше, чем увеличение размера программы за счет прикомпиляции паскалевского интерпретатора, которые, кстати, еще и в основном платные.
Для сравнения введенного текста с константой хорошо подойдет функция MatchesMask, для извлечения параметра (типа FileName при loadfromfile) придется немного пропарсить



Страницы: 1 вся ветка

Текущий архив: 2004.03.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
14-1078222874
Zergling
2004-03-02 13:21
2004.03.28
Чудило-продавцы :)


14-1077862572
syte_ser78
2004-02-27 09:16
2004.03.28
Замыкание на себя


14-1077629736
kaif
2004-02-24 16:35
2004.03.28
Отставка правительства?


14-1078390662
wHammer
2004-03-04 11:57
2004.03.28
RAlib


9-1063077549
Интересующийся
2003-09-09 07:19
2004.03.28
Мазайка на Delphi or Pascal 7.0