Классы

WaReZ_MEN · August 2006

1. Я в скрипт добавляю класс из делфи, и хочу создать в скрипте свои класс унаследованный от загруженного. Это возможно если да то как?
2. Как в fsTree1 добавить мои классы(fsScript1.AddClass я делаю но все ражно их не вижу)?
3. Создаю я форму в скрипте и мне нужен ее Handle как его получить?

-=Den=- · August 2006

1. Классы можно только добавлять, создавать их в скрипте нельзя.
2. fsTree1.UpdateItems
3. TForm(Integer(fsScript1.Find('Form1').Value)).Handle

WaReZ_MEN · August 2006

Спасибо

WaReZ_MEN · August 2006

fsTree1.UpdateItems
что то не помогло

-=Den=- · August 2006

У меня работает нормально.
Где и как добавляите классы ?

WaReZ_MEN · August 2006

Пощелкал в своиствах... помогло....
Спасибо еще раз...

WaReZ_MEN · August 2006

TForm(Integer(fsScript1.Find('Form1').Value)).Handle
а можно поподробнее что где писать ....

-=Den=- · August 2006

После того как скрипт создал и показал форму(форма не удалена и скрипт еще отробатывает), в потоке или каком-то событии.

WaReZ_MEN · August 2006

Так мне это в скрипте писать ?

-=Den=- · August 2006

Нет в коде программы.

WaReZ_MEN · August 2006

Мне же в скрипте нужно хендел получить

-=Den=- · August 2006

Я думал что хендл нужно получить из программы

Тогда допавьте новое свойство Handle к классы TForm.
FsScript.FindClass('TForm').AddProperty() и добавьте свойство как описано в доке.

WaReZ_MEN · August 2006

Спасибо

Классы

Комментарии

Оставить комментарий