-
Постов
1 204 -
Зарегистрирован
-
Посещение
-
Победитель дней
26
Активность репутации
-
Rusland отреагировална Alex7wrt в Что лучше: TIdHttp или TNetHTTPClient?
Раньше использовал TIdHttp, затем перешёл на THttpClient.
THttpClient и TNetHttpClient - по сути одно и то же, только последний является визуальным компонентом.
Поэтому в вашем случае корректнее сравнивать THttpClient и TIdHttp.
Конкретно для моих целей использование THttpClient предпочтительнее, поскольку он из коробки работает с https на всех платформах, а в случае TIdHttp для этого ещё нужно подключать ssl.
Разницы в скорости работы не замечал.
-
Rusland отреагировална FREEFAR в Ошибка при определении адреса по координатам
У нас при масштабировании одного проекта сталкивались со следующим:
- на устройствах отсутствовали Google Maps Service (или что-то в это духе)
- сервис режима энергосбережения тушил сервис Google Maps Service (или что-то в это духе)
-
Rusland получил реакцию от Anatoliy в Программа не запускается под Android
Вообще никаких сообщений не показывается?
Тогда только смотреть через monitor.bat, что там происходит с приложением.
-
Rusland получил реакцию от Andrey Efimov в Программа не запускается под Android
Судя по скринам ini-файл берется из папки Android\Debug. Зачем так делать? Эту папку создает сама студия. Возможно что Clean очищает все содержимое в этой папке и строка становится неактивной, потому что файла больше нет.
Какую ошибку при этом выдает?
-
Rusland отреагировална valdemar в Как включить/выключить звук у MediaPlayer?
Вообще да, нужно после каждого открытия файла ставить в 0 громкость. Плеер берёт из файла максимальную громкость.
MediaPlayer1.FileName:=file_;
MediaPlayer1.Volume :=0;
MediaPlayer1.Play;
-
Rusland отреагировална enatechno в Покрасить ячейку Stringgrid в зависимости отзначения ячейки
У Вас перепутаны строки и столбцы. Нужно или так:
for i := 0 to n-1 do for j := 0 to m-1 do Или же так:
SG.Cells[i,j]:=inttostr(ImMas[i,j]); TStringGrid: property Cells[const ACol, ARow: Integer]
TestSGDraw.zip
-
Rusland отреагировална mazayhin в Программа не запускается под Android
За это отвечает Deployment.
Добавьте нужные файлы, укажите путь и все.
Подробнее смотрите http://docwiki.embarcadero.com/RADStudio/Berlin/en/Deployment_Manager и http://docwiki.embarcadero.com/RADStudio/Berlin/en/Creating_an_Android_App#Loading_and_Deploying_Files
Так же есть статья в блоге Андрея Ефимова http://delphifmandroid.blogspot.ru/2014/02/deployment-manager.html
-
Rusland получил реакцию от Anatoliy в Слайд с пролистывание картинок в форме
Если нужен именно слайдер, то посмотрите на этот компонент Ярослава
-
Rusland получил реакцию от Anatoliy в Слайд с пролистывание картинок в форме
var Form1: TForm1; ind: integer; implementation {$R *.fmx} procedure TForm1.FormCreate(Sender: TObject); begin ind := 0; end; procedure TForm1.Timer1Timer(Sender: TObject); begin ind := ind + 1; if FileExists(System.IOUtils.TPath.Combine( System.IOUtils.TPath.GetDocumentsPath, 'picture' + ind.ToString + '.png')) then Image1.Bitmap.LoadFromFile(System.IOUtils.TPath.Combine( System.IOUtils.TPath.GetDocumentsPath, 'picture' + ind.ToString + '.png')); end;
-
Rusland получил реакцию от enatechno в Слайд с пролистывание картинок в форме
Если нужен именно слайдер, то посмотрите на этот компонент Ярослава
-
Rusland отреагировална enatechno в Ссылка на "Политика конфиденциальности"
Либо использовать TWebBrowser, либо вызвать внешний браузер:
http://fire-monkey.ru/topic/3236-открыть-ссылку/
-
Rusland отреагировална enatechno в TEdit с автозавершением
Пользуйтесь поиском на сайте.
У TMS есть еще такой вариант TTMSFMXEdit. Но он платный
-
Rusland отреагировална Kitty в Программа не запускается под Android
#include <System.IniFiles.hpp> #include <System.IOUtils.hpp> #include <memory> //**** #ifdef __ANDROID__ String path = System::Ioutils::TPath::Combine(System::Ioutils::TPath::GetSharedDownloadsPath(), L"options.ini"); #elif _Windows String path = System::Ioutils::TPath::Combine(ExtractFilePath(ParamStr(0)), L"options.ini"); #endif if(FileExists(path)) { std::unique_ptr<TIniFile> FileINI(new TIniFile(path)); String ip = FileINI->ReadString(L"HOST", L"ip", L"127.0.0.1"); //**** 1. std::unique_ptr используется чтобы избавиться от delete. std::unique_ptr все делает сам.
2. Файл ini для Андроида надо сохранить в UTF-8.
-
Rusland отреагировална enatechno в Не отображается Splash форма на iOS
Цитирую Виталия из этой темы:
Там же есть пример реализации сплеша с прогрессбаром.
-
Rusland отреагировална Кривяков Виталий в Splash Form не отображается
Добрый день!
Firemonkey имеет много отличий в работе от VCL. Одно из них связано с порядком создания форм. Когда в модуле проекта вы видите код:
Application.CreateForm(TfrmDM, frmDM);
То это не означает, что форма или модуль будут созданы в в момент исполнения этого вызова, вместо этого программа запомнит, что нужно создать такую форму TfrmDM и поместить указатель на нее в frmDM. Реальное создание форм произойдет при выполнении Application.Run. Поэтому, все обращения к "созданным" формам и модулям в модуле проекта приведет к ошибке.
Чем еще FM занимается до реального создания основной формы - одним разработчикам известно, и я бы поостерегся выполнять какие либо действия связанные с отрисовкой форм в модуле приложения.
Набросал пример, посмотрите, возможно такое решение вам подойдет.
SplashDemo.zip
-
Rusland отреагировална haword в [Андроид]не видно картинки
в делфи делается так -
li:= lv.Items.Add;
lii:=li.Objects.FindObjectT<TListItemImage>('Image');
lii.OwnsBitmap:=True;
далее можно грузить картинку, если в потоке то
TThread.Synchronize(TThread.CurrentThread, procedure()
begin
// присваивание битмапу картинки
lii.Bitmap:= TBitmap.Create;
lii.Bitmap.SetSize(ItemBitmap.Width, ItemBitmap.Height);
lii.Bitmap.Clear(TAlphaColors.Null);
lii.Bitmap.CopyFromBitmap(ItemBitmap);
end
);
-
Rusland отреагировална Maximus в Как подавить экранный курсор crSQLWait ?
На самом деле это поведение можно достаточно просто отключить
var Connect : TFDConnection; Query : TFDQuery; ... Connect.ResourceOptions.SilentMode := true; Query.ResourceOptions.SilentMode := true; ...
-
Rusland получил реакцию от Вольдемар в Почему зависает программа под Андроидом с TEdit?
Почитайте эту тему
-
Rusland отреагировална Ilya.Z в Delphi + Firepower wwLayoutGrid + MySQL
День добрый, может кто то сталкивался с такой проблемой - при использовании связки Unidac (пробовал и FireDac) Delphi 10,1 + FirePower 10
Подключаю Grid и в обычном wwDataGrid отрабатывается нормально,
если взять wwLayoutGrid то ,при запуске программы, во всех ячейках отображается первая запись таблицы, при этом в дизайн моде все правильно показывает.
в демосах при использовании MemDataset все норм, все красиво
PS если dataset находится в той же форме что и layoutgrid все работает как надо, стоит перенести в отельный datamodule показывает лишь первую запись во всей таблице
может кто подскажет идею, куда копать ? или сталкивался с похожей ситуацией ?
Спасибо
PS Вопрос закрыт, проблема в моем же дополнительном компоненте ..сорри мдам, буду разбираться от чего )
-
Rusland отреагировална Anasazi в Проблема при активации memo или edit программа зависает и закрывается.
У меня подобная хрень была.
Пришлось совсем отказаться от Tedit и Tmemo. Заменил на Tlabel, при клике открываю диалоговое окно с полем ввода.
-
Rusland отреагировална kami в VCL procedure to FMX
Your code can be replaced with:
var Stream: TStream; begin Stream:=TMemoryStream.Create; try SourceBitmap.SaveToStream(Stream); Stream.Seek(0, soBeginning); NewBitmap.LoadFromStream(Stream); finally Stream.Free; end; end;
-
Rusland отреагировална Вадим Смоленский в Одновременное использование TFloatAnimation и TShadowEffect
Пока эксперты размышляли, нашел решение сам. Эффекты нужно было просто разнести по времени - мне ведь не нужна тень, пока идет анимация, тень можно налепить по ее окончании. Два обработчика событий для TFloatAnimation решили вопрос: по OnProcess свойство Enabled компонента TShadowEffect устанавливается в False; по OnFinish - в True.
-
Rusland отреагировална enatechno в [ListView]пример от embarcadero
По умолчанию в DynamicAppearance есть только один объект - Text. Соответственно, из кода вы должны убрать все упоминания AItem.Objects.TextObject, AItem.Objects.AccessoryObject и изменить заполнение текста в ListViewItem (например так):
for Item in [1..10] do ListView1.Items.Add.Data['Text1']:= Format('Regular item %d.%d', [Group, Item]); Как добавить свои объекты в LIstViewItem читайте Using the DynamicAppearance Value или смотрите видео.
-
Rusland отреагировална kami в Нестандартная клавиатура для своего приложения
Раз уж пошла такая пьянка - выложу сюда то, что по виртуальной клавиатуре есть у меня на текущий момент (в телеграме уже выложил).
Поддерживаются операционные системы: iOS, Windows. Оттестировано на 10.1 (Berlin)
Итак: архив распаковать куда угодно, в проект в uses подключить модули uCommonCustomKeyboard (отвечает за подмену "штатной виртуальной клавиатуры" на свою) и ufrCustomNumpad (отвечает за отображение цифровой клавиатуры).
Алфавитную, e-mail-овскую и тому подобные виды клавиатур оставляю на ваше усмотрение. Они делаются на основе ufrCustomNumpad, там больше заморочек с красивым размещением кнопок, чем с кодом.
CustomKeyboards.7z
-
Rusland отреагировална Alex7wrt в Запуск Google Play из своего приложения
uses ..... FMX.Platform.Android, FMX.Helpers.Android, Androidapi.Helpers, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI.JavaTypes, Androidapi.JNI.App, Androidapi.JNIBridge, Androidapi.JNI.Embarcadero, AndroidApi.JNI.Net, Androidapi.JNI.Util; ... var Intent: JIntent; begin Intent := TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_VIEW); try Intent.setData(StrToJURI('market://details?id=name_of_app')); //если установлен google play except Intent.setData(StrToJURI('http://play.google.com/store/apps/details?id=name_of_app')); //иначе открываем ссылку в браузере end; TAndroidHelper.Context.startActivity(Intent); В uses есть даже лишнее, поскольку взял из проекта, где были и другие функции под Android