petyaas

var Intent: JIntent; begin Intent := TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_VIEW); Intent.setDataAndType(StrToJURI('file:' + TPath.Combine(TPath.GetSharedDownloadsPath, 'picture.png')), StringToJString('image/png')); SharedActivity.startActivity(Intent); end; так один файл открывает!

Добрый день . При попытке что-то напечатать в едит мемо и т.д выводит кнопку вставить(buffer) каким образом можно ее убрать

Нашел takephotofromlibraryaction.maxheight, maxwidth

Добрый день. Используя takephotofromlibrary получаю картинку из галереи но качество картинки очен плохая как можно узнать путь к файлу или хорошее качество? Заранее благодарю.

Благодарю!!!!

procedure TForm2.Button1Click(Sender: TObject); var frec:trectangle; begin frec:=trectangle.Create(self); frec.Parent:=rectangle1; frec.Name:='frec_1'; frec.Align:=talignlayout.Top; end; procedure TForm2.Button2Click(Sender: TObject); var dfrec:trectangle; begin dfrec:=form2.FindComponent('frec_1') as trectangle; dfrec.Free; end; в виндовсе удаляет в андроиде не удаляет как удалить компонент в андроиде?

https://93.170.186.123/thread-260-1-1.html

после ClientDataSet1.ApplyUpdates; В delphi 10 работал. как исправить!!! есть http://cc.embarcadero.com/item/30530

Проблема – не могу передать изображение с клиента на сервер DataSnap и сохранить в СУБД MySQL procedure TForm2.Button1Click(Sender: TObject); var bmp:tbitmap; twic:twicimage; begin bmp:=tbitmap.Create; twic:=twicimage.Create; opendialog1.Execute; twic.LoadFromFile(opendialog1.FileName); bmp.Assign(twic); clientdataset1.append; clientdataset1.FieldByName('name').Asstring:='Hello'; clientdataset1.FieldByName('Picture').Assign(bmp); clientdataset1.Post; clientdataset1.ApplyUpdates(0); //clientdataset1.Refresh; clientdataset1.Close; clientdataset1.Open; end;

Надо сохранять service и саму прогу в отдельные папки!!

У МЕНЯ ТОЖЕ САМОЕ [Exec Error] The command "PATH C:\Program Files\Java\jdk1.7.0_71\bin;C:\Users\Public\Documents\Embarcadero\InterBase\redist\InterBaseXE7\IDE_spoof;C:\Program Files (x86)\Embarcadero\Studio\17.0\bin;C:\Users\Public\Documents\Embarcadero\Studio\17.0\Bpl;C:\Program Files (x86)\Embarcadero\Studio\17.0\bin64;C:\Users\Public\Documents\Embarcadero\Studio\17.0\Bpl\Win64;C:\Windows\system32;C:\Windows;C:\Windows\System32\Wbem;C:\Windows\System32\WindowsPowerShell\v1.0\;C:\Program Files (x86)\MySQL\MySQL Fabric 1.5 & MySQL Utilities 1.5\;C:\Program Files (x86)\MySQL\MySQL Fabric 1.5 & MyS...

работа в фоновом режиме! может кто знает?