Поиск

Добрый день. Существует одна проблема, с которой уже несколько недель не могу справиться. Есть старый код под WinAPI, его нужно переделать под Android через firemonkey. И главная проблема - есть код, который из собственного формата делает HBITMAP из WinAPI. Фактически это структура, где последнее поле - указатели на биты. Это переделать легко, создав собственную копию такой структуры. Но теперь мне нужно перевести ее в TBitmap, и я не очень понимаю как это сделать.

Добрый день! Обращаюсь к Вам с проблемой работы в FireMonkey с динамическими массивами. Ситуация такая, в ходе работы приложения под Android мне необходимо задавать в определенный момент времени размер массива. Функция SetLength почему-то не работает. Например, если делать так: procedure TForm1.Button1Click(Sender: TObject); var Number123 : Array Of Integer; i : integer; begin SetLength(Number123, 5); for I := 0 to 4 do begin Number123[i] := i; end; end; то можно наблюдать следующую ситуацию, что до работы SetLength массив пустой http://joxi.ru/DmBXxLLclDM6AP и это нормально, а после задания длины с массивом происходят странные вещи - вместо ячеек массива какое-то шестнадцатиричное значение http://joxi.ru/823O5xxSYdxl2O, элементы массива по циклу не заполняются. Если то же самое делать под Windows, то все красиво - http://joxi.ru/gmvR7vvHD3lyma и http://joxi.ru/Vm6ydxxhYPLXrZ Если под Android сделать так: procedure TForm1.Button1Click(Sender: TObject); var Number123 : Array [0..4] Of Integer; i : integer; begin for I := 0 to 4 do begin Number123[i] := i; end; end; То все работает как надо: http://joxi.ru/KAgKWooTDB84Al Помогите пожалуйста разобраться. Гугл не помогает совсем. Я думаю, что тут должно быть все просто, просто не хватает мне немного знаний и понимания что не так. Надеюсь на помощь. Спасибо!.