» Программирование>Делфи. Как преоразовать строку в исполняемый код программы?
BSk 09:26 22.11.2010
Привет! Недавно столкнулся с такой проблемкой, нужно преобразовать строку типа String в исполняемый код программы в Делфи. К примеру:
var
i,j : integer;
str : string;
begin
for i := 1 to 9 do
begin
str := 'form1.Edit'+ IntToStr(i)+'.Color';
label1.Caption := str;
str:= clblack;
end;
В конечном итоге Edit'ы с 1 по 9 должны покраситься в черный цвет.
Может кто-то сталкивался с такой проблемой?
SeFuS 10:44 22.11.2010
дельфи - язык компилируемый. пишите реалтайм компилятор )).
BSk 11:58 22.11.2010
По-любому решение данной проблемы возможно и в Делфи, при помощи какой либо библиотеки. А что делфи язык компилируемый это ни о чем еще не говорит. Как говорится "Нельзя, но если очень сильно хочется, то можно" ))
Hopkroft 14:24 22.11.2010
Сообщение от BSk:
По-любому решение данной проблемы возможно и в Делфи, при помощи какой либо библиотеки. А что делфи язык компилируемый это ни о чем еще не говорит. Как говорится "Нельзя, но если очень сильно хочется, то можно" ))
Тебе для чего это нужно?
SmanxX1 14:27 22.11.2010
Бред полный. Это невозможно, особенно относительно данного примера.
И вообще, эта проблема решается гораздо проще:
Код:
var
i: integer;
...
begin
for i:=0 to MForm.ComponentCount-1 do
if MForm.Components[i] is TEdit then
(MForm.Components[i] as TEdit).Color:=clBlack;
...