Anatoliy
-
Постов
176 -
Зарегистрирован
-
Посещение
Активность репутации
-
Anatoliy отреагировална Brovin Yaroslav в Delphi не видит мой телефон
Проверить, что SDK профиль корректно заполнен и все поля прописаны и доступны.
-
Anatoliy отреагировална Brovin Yaroslav в Инструкция по установке набора компонентов FGX
Можно, вы можете у себя поправить пути сборки для пакетов fgx и dclfgx. На будущее подумаю, куда лучше складывать собранные файлы.
-
Anatoliy отреагировална Равиль Зарипов (ZuBy) в [TListView] высота итема=0
LV может скрывать айтемы
поищите на форуме про фильтр в LV
но я бы воспользовался советом @wamaco (у меня кстати так в нескольких проетах и сделано, через TDictionary)
-
Anatoliy отреагировална krapotkin в Программа не запускается под Android
во-первых, \ это только у windows разделитель
во-вторых, вы просите прочитать файл 1.jpg из папки /img в корне файловой системы ?
нет у вас никаких прав на это.
прочтите документацию по модулю ioutils
-
Anatoliy отреагировална valdemar в Loop у TMediaPlayer
таймер, а в нём:
if MediaPlayer1.Media.Duration=MediaPlayer1.CurrentTime then
MediaPlayer1.CurrentTime :=0;
Свойств нет.
-
Anatoliy отреагировална Rusland в Программа не запускается под Android
Вообще никаких сообщений не показывается?
Тогда только смотреть через monitor.bat, что там происходит с приложением.
-
Anatoliy отреагировална 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
-
Anatoliy отреагировална #WAMACO в [TListView] высота итема=0
Сделайте структуру вне ListView, с ней работайте, ListView заполняйте по структуре, как надо.
Например, сначала видны категории, выбрали категорию, перезаполнили ListView элементами выбранной категории + категориями,которые свернуты.
-
Anatoliy отреагировална Камышев Александр в Ссылка на "Политика конфиденциальности"
Спасибо за наводку, вот это помогло:
-
Anatoliy отреагировална 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
-
Anatoliy отреагировална Roman V в Программа не запускается под Android
По сути весь основной код уже сверху написан
#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> Ini(new TIniFile(path)); String ip = Ini->ReadString(L"HOST", L"ip", L"127.0.0.1"); } int butId; // номер вопроса Далее идет код, который передает данные с ini на кнопки.
void __fastcall TForm1::FormShow(TObject *Sender) { Form1->Updated(); Form1->Updating(); Button1->Text = Ini->ReadString(butId, "Ответ1", "Def"); Button2->Text = Ini->ReadString(butId, "Ответ2", "Def"); Button3->Text = Ini->ReadString(butId, "Ответ3", "Def"); Button4->Text = Ini->ReadString(butId, "Ответ4", "Def"); right = StrToInt(Ini->ReadString(butId, "right", "0")); Image1->Bitmap->LoadFromFile("img\\" + IntToStr(butId) + ".jpg"); Label1->Text = butId; } Ну и еще там по мелочи. Все писать не буду. Т.к. в остальном ini не фигурирует.
-
Anatoliy отреагировална enatechno в Программа не запускается под Android
Похоже на отсутствие прав чтения /записи в Андроиде.
Проверьте : Project - Options - Uses Permission - Read external storage (Write external storage)
P.S. Когда задаете вопрос, указывайте версию RAD, версию Android и устройство на котором тестируете
-
Anatoliy отреагировална Rusland в Слайд с пролистывание картинок в форме
Если нужен именно слайдер, то посмотрите на этот компонент Ярослава
-
Anatoliy отреагировална Rusland в Слайд с пролистывание картинок в форме
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;
-
Anatoliy отреагировална enatechno в TEdit с автозавершением
Пользуйтесь поиском на сайте.
У TMS есть еще такой вариант TTMSFMXEdit. Но он платный
-
Anatoliy отреагировална enatechno в Не отображается Splash форма на iOS
Цитирую Виталия из этой темы:
Там же есть пример реализации сплеша с прогрессбаром.
-
Anatoliy отреагировална enatechno в Печать на сетевом принтере
У нас тоже печать через базу данных. Отличие от описанного варианта только в том что база удаленная, а служба печати может быть установлена на любом клиентском компе с Windows, с которого и идет печать на любой принтер доступный с этого клиентского компа. При этом на клиенте служба может быть настроена для выбора только определенных заданий печати (например задания только определенного отдела или задания отправленные только с определенных терминалов).
-
Anatoliy отреагировална zairkz в Печать на сетевом принтере
Первое что пришло в голову в виде "бреда", точнее так уже сделали))
Но не знаю насколько вам подойдет такое решение.
У нас есть сервер базы данных, на сервере понятно есть все данные необходимые для печати, принтер настроен на сервере, на сервере есть служба которая мониторит базу (таблицу) в которой если появилась новая команда для печати тогда служба формирует документ из данных базы с использованием FastReport, и кидает на принтер по умолчанию для печати.
Сервер (а точнее комп Pentium DualCore, 2 gb RAM) на котором MySQL, Windows (хотя FastReport есть и для Linux (beta)) работает автономно уже 8-й месяц, и за это время не прикоснулись к нему ни разу (даже если честно очень странно)
-
Anatoliy отреагировална osvirt в Печать с планшета
Вдруг кому-то ещё пригодится...
Для своих нужд, я написал небольшое десктопное приложение-принтсервер. Отправляю данные с планшета на него, а тот уже формирует нужные мне отчёты и отправляет на нужный принтер (для каждого клиента, соответственно можно настроить свой, или для всех один)
-
Anatoliy отреагировална Maximus в Обращение к серверу в потоке (Android)
Прям немедленно остановить нельзя, но можно вызвать метод Cancel
var Task : ITask; ... Task := TTask.Run(...); ... Task.Cancel; //когда нужно остановить А внутри таска сделать проверки, что если выполняется
Task.Status = TTaskStatus.Canceled то не нужно обновлять данные, там где вы их обновляете и досрочно закончить работу кода таска.
-
Anatoliy отреагировална ENERGY в Печать с планшета
Есть еще платная библиотека для печати
http://winsoft.sk/aprinting.htm
-
Anatoliy отреагировална ENERGY в Печать с планшета
А это читали? Google CloudPrint
https://community.embarcadero.com/blogs/entry/printing-from-an-android-device-using-firemonkey-272
-
Anatoliy отреагировална ZverA4 в ListView и доступ к StylesData
Доступ к картинке, чтобы сменить её на другую?
Если да, то так:
item->Data["Image3"] = TValue::From<TBitmap*>(картинка->Bitmap);
-
Anatoliy отреагировална 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
);
-
Anatoliy отреагировална Евгений Корепов в Подскажите про THTTPClient и SSL
Вот здесь, в самом низу вроде все расписано http://docwiki.embarcadero.com/RADStudio/XE8/en/Using_an_HTTP_Client#Handling_Client-side_Certificates
Handling Server-side Certificates
If the server provides an SSL certificate, but this certificate is invalid, the OnValidateServerCertificate event occurs. Provide an event handler for OnValidateServerCertificate so that you can check the server certificate (Certificate) and determine whether or not you accept the server certificate. If you accept the server certificate, change the value of the Accept parameter to True.
Handling Client-side Certificates
If the server requires a client certificate, the OnNeedClientCertificate event occurs. Provide an event handler for OnNeedClientCertificate so that you can check your list of client certificates (ACertificateList), and determine which certificate you want to send to the server. To send a given certificate from the list, change the value of AnIndex to the index of the target certificate in ACertificateList.
Note: If the HTTP method of the first request to a server that requires a client-side certificate is not either HEAD or GET (e.g. it is POST), the status code of the server response is 413. Always send a HEAD or GET request first. Using a HEAD request is usually a better choice, since less data is transferred.
А вообще зачем вам возня с сертификатами? Просто делайте Accept:=True в OnValidateServerCertificate если доверяете серверу и все. Трафик будет шифроваться. Или вы пытаетесь авторизацию сделать и сервер будет требовать клиентский сертификат?