Kikoma

Система новая, источников на родном русском немного, да и на буржуйском тоже дефицит. Этот ресурс очень помогает в изучении и освоении FM. Хоть я сам лично и за монетизацию сайтов (в общем случае), но думаю данный сайт из другого поля, и задачи, стоящие перед ним, совсем другие. А вот пожертвование можно внедрить . Любой труд должен быть оплачен (и мотивирован) А вот качественный курс по ФМ я бы прошел, даже за деньги, т.к. уверен, что сэкономил бы по времени на порядок больше. Но с другой стороны система так бурно развивается-обновляется, что многие вещи быстро теряют актуальность - так что качественный курс по ФМ сделать довольно сложно.

Вопрос актуален!!! Тоже ищу решение, пока не нашел

Задай свой размер, како хочешь. Или тебе принципиально картинку-рамку iPhone6 видеть?

Спасибо. Все прекрасно заработало, но только с обязательной перезаполнением ListBox вот итоговый код: if (count = 0) and (TabControl1.ActiveTab = TabCart) then TThread.Queue(TThread.CurrentThread, procedure begin // Запускаем анимацию TListBoxItem(Item).AnimateFloat('Height', 0, 0.5); TListBoxItem(Item).AnimateFloatWait('Opacity', 0, 0.5); Item.Release; TabCartClick(Sender); // запуск перерисовки ListBox // Timer1.Enabled := True; // запуск TabCartClick(Sender); через 0,3 сек end); В моем случае перезаполнение TListBox обязательно, т.к. в SpinBox.Tag хранятся индексы Итемов.

Да, открыл, тоже нет рамки: причина в стиле изменилось имя: делаем следующее: 3. У формы ставим StyleBook := StyleBook1

Вот мои исходники (только на Delphi XE6 upd2)

в первом случае набираю на клавиатуре mydonetoolbutton, а во втором выбираю из списка.

Проблема решена с использованием UTF8EncodeToShortString Вот код: RESTRequest1.Params.AddItem( UTF8EncodeToShortString(edParam.Text), UTF8EncodeToShortString(edValue.Text), TRESTRequestParameterKind.pkGETorPOST,[poDoNotEncode] ); Всем спасибо.

Как получилось у меня: 1.То что вы открыли в Блокноте я полностью скопировал этот object TLayout StyleName = 'donetoolbutton' ... end Сохранил его в отдельный файл, при этом поменял StyleName = 'mydonetoolbutton' 2. На форму бросил StyleBook1, щелкнул на нем два раза попал в редактор. По кнопке Load... выбрал выше созданный файл и его немного подредактировал: добавил Rectangle (Fill.Kind := None; Stroke (рамка) уже есть) Немного повозился с размерами и выравниванием. После кнопка Apply and Close 3. Бросаю две SpeedButton, у одного набираю в StyleLookUp = mydonetoolbutton, у другого из списка выбираю StyleLookUp = donetoolbutton. Результат достигнут. На непоколебимость данного варианта не претендую, хотелось бы узнать мнение гуру.

Странно, но AnsiToUtf8, UTF8Encode, UTF8Decode, UTF8ToString - не влияют на результат в различном использовании и перед отправкой и после получения. Все их удалил. Изменил строку формирование параметра: RESTRequest1.Params.AddItem(edParam.Text, edValue.Text,TRESTRequestParameterKind.pkGETorPOST,[poDoNotEncode]); Добавил в код сервера кириллицу. Результат получился следующий <?php header("Content-Type: text/html; charset=utf-8"); echo "Проверка русского языка\n"; echo "Your GET request:\n"; var_dump($_GET); ?> в результате вместо русских букв знаки вопроса: Проверка русского языка Your GET request: <br/> array(1) { ["qqDF"]=> string(19) "balalaika-?????????" } Делаю вывод, что принимает и отображает приложение в utf-8 нормально. А вот проблема возникает при отправки запроса

Здравствуйте, помогите настроить кодировки. Ниже дано тестовое приложение, которое отправляет с помощью RESTClient запрос и получает в виде текста то что отправил. Все работает замечательно, кроме русских букв. В приложении задаю параметр и значение. при задании русских букв выводится коды например вместо "Балалайка" выводится "A1C0CBC0CBC0C9CAC0" Help отсутствует, устал быть слепым экспериментирующим котенком можно результат работы сервера увидеть здесь: http://abws.ru/testrest/?qqq=balalaika-Балалайка Исходники приложения (Delphi XE6 update 2) здесь. код сервера: <?php header("Content-Type: text/html; charset=utf-8"); echo "Your GET request: <br/>\n"; var_dump($_GET); ?>

Спасибо, все заработало. И как сам до этого не додумался???

Я вызываю процедуру заполнения ListBox? т.к. там идет проверка или заполняем TListBoxItem-ами, или выводим один один Итем - Корзина пуста. Если не вызывать процедуру заполнения, то придется выполнять проверку - а все ли итемы показываются и выводим итем "Корзина пуста". - Как то сложно и неправильно. В Queen все равно выходит ошибка. Выполняется анимация на закрытие Итема, и когда уже не находимся в процедуре под Итемом, выполняется Таймер и заново заполняется TListBox. Все отлично работает через таймер. Плохо что ли?

Спасибо, AlexG Opacity - работает. Height - не работает. Не уверен, но думаю из-за стилизации (попозже попробую на не стилизованном TlistBoxItem, результат опишу) При удалении вызывается ошибка. Подробности Как правильно программно удалить TListBoxItem из стилевого объекта?