umkes

Не подходит мне веб браузер. Это програмка которая будет находиться на СD диске. Запускаться автораном, и открывать пдф файлы. На компьютере который этот диск будет запускать может не быть никакого ридера или даже браузера. Пока что нашел удобный способ с открытием пдфок через SumatraPDF. И того. Я вибираю в программе нужный мне фаил. Делаю ShellExcecute SumatraPDF.exe который лежит рядом с Екзешкой моей программы на диске и передаю ему параметром путь к пдф файлу. Открывается ридер, но в новом окне. Вот и интересно можно ли на FMX этот ридер отобразить в этой же программе. Если вы считаете, что всетаки это можно сделать через TWebBrowser, то буду весьма благодарен, если скажете как именно:) Спасибо за внимание.

Добрый день, есть ли возможность на Firemonkey открыть другое приложение на моей форме? Сейчас с помощью ShellExecute открывается программа, и хотелось бы это окно отобразить в панельке на форме. ОС Windows, открывается PDF reader. На VCL как я понял, ловится окно, и присваевает ему парента панельку.

хэх, проблема оказалась в том, что не было программ для просмотра этих пдф, хром по дефолту не открывал почему-то. Скачал ридер, теперь его открывает в моём TWebBrouser.

Попробовал этот скриншот с рабочего стола загрузить в веб браузер, изменив путь к файлу, все получилось, а вот пдф не открывает и все...

WebBrowser1.Navigate('file:///C:/Users/umkes/Desktop/example.pdf');

Может я чет делаю не так, но вместо показа этого самого пдф начинается его закачка. Точнее появляется диалог (сохранить или нет).

Всем привет. Подскажите пожалуйста, чем можно отобразить PDF документ в программе? Это будет виндовс аппликация, в которой нужно будет открывать Pdf файлы.

Distinct?

А может это веб сервер рушится, от большого количества запросов?

Привет, а где находится БД, не в твоей сети случайно, а ты по локальному адресу пытаешься конектиться? =))

Эта проблема на виндовсе проявляется. У меня были операции на DoubleClick и на ListViewItemClick. При дабл клике происходило такое : Click -> DblClick -> Click. Проблему решил запуском треда в конце DblClick в котором делал слип пару милисекунд и переставлял фокус куда надо.

Здраствуйте, подскажите как обойти такую проблему: У меня есть заполненый ListView. При даблклике по айтему я добавляю его в избранное(Поднимаю его вверх, и отображаю на нем звездочку.) Все крутится хорошо, но фокус на этом айтеме не держится, потому, что после дабл клика сразу проходит простой клик по айтему который находится под мышкой. Может кто-то сталкивался с подобным?

Логика такая, кидаете кастомный интент сервису, ловите его и делаете что-то типа такого stopSelf(); return START_NOT_STICKY;

Что ваш сервис делает?

Решил проблему тем, что выполнил эту процедурку два раза подряд. Почему оно так работает, так и не понял...

В моем понимании, если нет проблем с AndroidSDK, то проблема в драйверах на телефон. Сейчас вы поставили берлин на чистый комп, драйвера на телефон точно не забыли поставить? По поводу версий SKD, проблем не должно быть, скачайте самую последнюю, и почистите ненужное, и хватит.

Опытным путем было выяснено что что-то не так с ImageList или самой картинкой. Если тоже самое сделать для первых трех картинок то все хорошо, а с последней теперь отображается пазл из обрезков первой картинки. Пробовал даже тянуть битмап из отдельного TImage, а не из TImageList, эффект тот же. Может студия глючит... В среду буду копать дальше.

Всеравно ничего с андроидом не происходит. Пробую еще вот так: //============================================================================== procedure TMainForm.DrawRing; //------------------------------------------------------------------------------ var bmp1, bmp2 : TBitmap; i : integer; begin bmp2 := TBitmap.Create; bmp2.Assign(ImageList.Source.Items[3].MultiResBitmap.Bitmaps[1]); bmp1 := TBitmap.Create; bmp1.Assign(bmp2); bmp1.Width := ClientWidth + bmp2.Width * 10; i := 0; bmp1.Canvas.BeginScene(); while (i * bmp2.Width) < bmp1.Width do begin bmp1.Canvas.DrawBitmap(bmp2, RectF(0, 0, bmp2.Width, bmp2.Height), RectF(i * bmp2.Width, 0, (i + 1) * bmp2.Width, bmp2.Height), 1 ); inc(i); end{ while }; bmp1.Canvas.EndScene; imgRing.Bitmap.Assign(bmp1); bmp1.Free; bmp2.Free; end{ procedure TMainForm.DrawRings };

Там 4 картинки и мне нужна именно 3-я :) Еще раз напомню, что на винде все работает.

Добрый день, возникла проблема при работе с TImage; У меня компонент TImage - imgRing и есть в TImageList. Я динамически формирую Bitmap из копий картинки из TImageList и асайню его в TImage. На Windows все работает прекрасно, а на андроиде картинка все время пустая... Может кто-то подскажет, где я не прав //============================================================================== procedure TMainForm.DrawRing; //------------------------------------------------------------------------------ var bmp1, bmp2 : TBitmap; i : integer; str : TMemoryStream; begin bmp2 := TBitmap.Create; bmp2.Assign(ImageList.Source.Items[3].MultiResBitmap.Items[0].Bitmap); bmp1 := TBitmap.Create; bmp1.Assign(bmp2); bmp1.Width := ClientWidth + bmp2.Width * 10; i := 0; bmp1.Canvas.BeginScene(); while (i * bmp2.Width) < bmp1.Width do begin bmp1.Canvas.DrawBitmap(bmp2, RectF(0, 0, bmp2.Width, bmp2.Height), RectF(i * bmp2.Width, 0, (i + 1) * bmp2.Width, bmp2.Height), 1 ); inc(i); end{ while }; bmp1.Canvas.EndScene; str := TMemoryStream.Create; bmp1.SaveToStream(str); str.Position := 0; imgRing.BeginUpdate; imgRing.Bitmap.CreateFromStream(str); imgRing.EndUpdate; end{ procedure TMainForm.DrawRings }; Делаю такое потому-что TImage.WrapMode.Tile не подходит для моей задачи.

Я такое использую для вычисления высоты текста. Может пригодится) function CalculateTextHeight(aText: String; aWidth: Single; aMinHeight: Single; aMaxHeight: Integer; aFont: TFont) : Single; begin if not Assigned(FTextLayout) then FTextLayout := TTextLayoutManager.DefaultTextLayout.Create; FTextLayout.BeginUpdate; try FTextLayout.Text := aText; FTextLayout.MaxSize := TPointF.Create(aWidth, 1000); FTextLayout.WordWrap := True; FTextLayout.Font.Assign(aFont); FTextLayout.HorizontalAlign := FMX.Types.TTextAlign.Leading; FTextLayout.VerticalAlign := FMX.Types.TTextAlign.Leading; finally FTextLayout.EndUpdate; end; Result := FTextLayout.Height; if aMinHeight>0 then if Result < aMinHeight then Result := aMinHeight; if aMaxHeight>0 then if Result > aMaxHeight then Result := aMaxHeight; end{ function CalculateTextHeight }; FTextLayout : TTextLayout - глобальная приватная переменная.

Я попробовал открыть вторую форму прозрачной и на ней поместить панельку. Мап вью с первой формы не видно теперь... Но тулбар с кнопкой с первой формы видно

А обязательно именно MySQL БД использовать? SQLite для мобильных приложений нужен.

XML layouts: Native way to design UI/UX in Android Studio. Java class subclassing: TurboCocoa allows subscall java classes like Activity or View. Multy-activity: You can create applciation with multi-activity. Thread: TurboCocoa applications work in the Java thread. Вот и весь смысл. Как по мне то, иногда может и пригодится. Надо бы разобраться мне какраз что-то подобное и нужно...

Тоесть вполне возможно что и получится, буду что-то думать.