аналог #define

Вопросы программирования на Free Pascal, использования компилятора и утилит.

Модератор: Модераторы

Vadim
долгожитель
Сообщения: 4112
Зарегистрирован: 05.10.2006 08:52:59
Откуда: Красноярск

Re: аналог #define

Сообщение Vadim »

sunjob писал(а):а система у вас какая?

Система у нас Ubuntu 21.
Аватара пользователя
sunjob
постоялец
Сообщения: 176
Зарегистрирован: 12.01.2011 14:19:54

Re: аналог #define

Сообщение sunjob »

ну и славно, трам пайраммм!!!
Vadim
долгожитель
Сообщения: 4112
Зарегистрирован: 05.10.2006 08:52:59
Откуда: Красноярск

Re: аналог #define

Сообщение Vadim »

sunjob
1. При смене ширины подпанели какое-нибудь сообщение об ошибке есть или просто ничего не происходит?
2. На подпанелях предварительно какой-нибудь текст записан, чтобы визуально посмотреть последствия изменения ширины подпанели?
3. На этапе компиляции есть ли какие-нибудь предупреждения (не ошибки!!)?
Аватара пользователя
sunjob
постоялец
Сообщения: 176
Зарегистрирован: 12.01.2011 14:19:54

Re: аналог #define

Сообщение sunjob »

разобрался уже :oops: (индексы развернул и изменял ширину 2й панели а не 1й)
Последний раз редактировалось sunjob 22.01.2022 14:47:44, всего редактировалось 1 раз.
Vadim
долгожитель
Сообщения: 4112
Зарегистрирован: 05.10.2006 08:52:59
Откуда: Красноярск

Re: аналог #define

Сообщение Vadim »

sunjob писал(а):разобрался уже

И в чём была проблема?
Аватара пользователя
sunjob
постоялец
Сообщения: 176
Зарегистрирован: 12.01.2011 14:19:54

Re: аналог #define

Сообщение sunjob »

тыць

Код: Выделить всё

StatusBar1.Panels.Items[ID_NOT].Width := size;
StatusBar1.Panels.Items[ID_DEV].Width := size;


индексы развернул и изменял ширину 2й панели а не 1й
Ответить