Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

AfalinaSoft Flat Controls 1.53 и Delphi 2007


Lesnik ©   (2008-07-03 22:06:00) 

Привет всем. Просьба отозваться спецов, которым удалось инсталлировать в Delphi 2007 пакет AfalinaSoft Flat Controls 1.53. Поделитесь опытом.
У меня остался проект который создавал в Delphi 6, и который нужно поддерживать и развивать дальше. Если нет возможности установить этот пакет, то посоветуйте, как можно с наименьшими потерями и затратами перевести проект на использование других компонентов, Вернуться на delphi 6 нет возможности, так как Windows Vista эту версию делфей не поддерживает. В моем проекте используется несколько сот эдитов и бутонов из пакета AfalinaSoft Flat Controls 1.53. Выскажите свое мнение по этому поводу и посоветуйте как действовать, неужели придется переписывать весь проект с начала...


Lesnik   (2008-07-04 00:09:00) [1]

Попробовал в тестовом проекте через блокнот не запуская Делфи в файлах *.dfm и *.pas через Replace... заменить TFlatButton на TButton и вроде получилось, Делфи только ругнулся что не хватает какого то свойства, и после нажати кнопки игнорировать проект открылся, изменил свойства бутонов в соответсвии с нуждами, без проблем откомпилировал и запустил проект. Но это только тестовый проект с одним контролом. Завтра буду пробовать свой.


Lesnik   (2008-07-03 23:35:00) [2]


> Посмотреть на НавороченныйБуттон1. Запомнить. Удалить его.
>
> Поставить на его место ПростойБуттон1.

Ну в принципе я так и предполагал. Только удалять его уже не надо на форме его уже нет. А вот получится ли если на форму положить нужное количество бутонов (обычных) а в файле *.pas в разделе
type
 TfrmAprekins = class(TForm)
   Image1: TImage;
   FlatButton2: TFlatButton;
   FlatButton3: TFlatButton;
   FlatButton4: TFlatButton;
....

изменить на
type
 TfrmAprekins = class(TForm)
   Image1: TImage;
   FlatButton2: TButton;
   FlatButton3: TButton;
   FlatButton4: TButton;
...

а новые ссылки , которые появилиь, на бутоны удалить, чтобы меньше лезть в код


oldman   (2008-07-03 23:20:00) [3]


> Lesnik ©   (03.07.08 23:16) [5]


Сесть. Открыть проект.
Посмотреть на НавороченныйБуттон1. Запомнить. Удалить его.
Поставить на его место ПростойБуттон1. Поменять его свойства в соответствии с запомненным.
Повторить процесс в зависимости от количества НавороченныхБуттонов.


Lesnik   (2008-07-03 23:16:00) [4]


> Что-то мне подсказывает, что если бы Вы пользовались официальными
> компонентами, то у Вас бы таких проблем не возникло

И что?
И Дельфи у меня не лицензмонный, и винда пиратская, и комп ворованный, и дом чужой и сам я дубликат...
Вопрос у меня стоит как перевести проект на другие компоненты?


Dummy   (2008-07-03 22:50:00) [5]

Что-то мне подсказывает, что если бы Вы пользовались официальными компонентами, то у Вас бы таких проблем не возникло. Так как продавались они с исходниками.


oldman   (2008-07-03 22:45:00) [6]


> В моем проекте используется несколько сот эдитов и бутонов
> из пакета AfalinaSoft Flat Controls 1.53.


навороченность - враг хорошего!


Lesnik   (2008-07-03 22:38:00) [7]

Обращался.Ответа не поступило. Это уже последняя версия которая выпущена в ноябре 2002 года, а сейчас они заняты другими проектами. Поэтому наверное лучший вариант будет перевести проект на другие компоненты, но как это можно сделать.


Игорь Шевченко   (2008-07-03 22:24:00) [8]

а почему бы не обратиться на сайт производителя компонентов ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо