Цитата:
|
не проще ли самому вписать эти несколько строк ...
|
Квалификация не позволяет
Я физик, а не программист...
Вот, нашел компонент (пробую прилепить к сообщению), но что-то у меня не ладиться:
Объявляю его в модуле девайса
Код:
interface
var
pd: TProgressBox;
Потом, в теле самой процедуры инициализации девайса:
Код:
pd := TProgressBox.Create(Application);
with pd do
----задаю свойства, Caption окна, лейбы и т. д... ----
--- собственно сама инициализация девайса ---
И в конце процедуры:
Код:
pd.Close;
pd.Destroy;
Беда вот в чем: не видно на ProgressBoxе кнопки "Cancel" и лейб. Может я чего напутал в строке
Код:
pd := TProgressBox.Create(Application);
В чем разница между Application, nil и self?
Если долго рассказывать, киньте ссылку почитать.
Заранее благодарен!