Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
3-1077704772
ПИТОН
2004-02-25 13:26
2004.03.28
MySQL -> Oracle


1-1078965622
Chlavik
2004-03-11 03:40
2004.03.28
При Application.Minimize оставляем одно окно в OnTop


1-1078326766
mOOx_
2004-03-03 18:12
2004.03.28
по поводу FindFirst and FindNext...


14-1078345350
Mox Fulder
2004-03-03 23:22
2004.03.28
Сети и всё такое....


4-1073637118
SAnta
2004-01-09 11:31
2004.03.28
Почта




   Наверх