Цитата
Тогда данный вид оптимизации угробится во всём проекте?
Да. Если это нежелательно - то сделай то, что сам озвучил (можно прямо внутри процедуры Sizing):type P_RECT is access all RECT;
pragma No_Strict_Aliasing (P_RECT);
-- Эту функцию не забудь убрать из WinApi.Conversions
function To_PRECT is new Ada.Unchecked_Conversion(LPARAM, P_RECT);
-- ...
R: constant P_RECT := To_PRECT(lp);
, и убрать -fno-strict-aliasing, если добавлял. Предупреждение уйдет...
Цитата
8. Как сделать программе иконку?
Создаю обычный RC-файл из одной строки:MAINICON ICON "beautifier.ico"
, потом его обрабатываю компилятором ресурсов и конвертором Resource To Object. У меня оба эти файла нашлись в \WINDOWS\Microsoft.NET\Framework\v2.0.50727 (ни в Дельфи, ни в Code::Blocks конвертора не нашлось, только rc). То есть, последовательность такая (я для простоты закинул RC вместе с иконкой в ту самую папку, .NET-овскую):
C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727>rc -r -dWin32 -fo bf.res bf.rc
тут бла-бла-бла, скомпилировал в RES
C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727>cvtres /machine:x86 /out:bf.rbj bf.res
бла-бла-бла, преобразовал в RBJ
, а теперь в любой ADS-файл, который подключается к программе, добавь строку
pragma Linker_Options ("{полный_путь_к_полученному_RBJ_файлу}\bf.rbj");
Обычно это делается в Linker_Options.ads, но я смотрю, этот файл у тебя никуда не подключается, так что туда запихивать бесполезно, иконка не изменится. Добавь строку именно в подключаемый файл. После пересборки у EXE-шника будет иконка...
М | Вопрос об исключениях перенесен: Обработка исключений (Ada) |
Сообщение отредактировано: volvo -