Martifan

UP!!!

ну как перехват звонка это понятно а можно как то сделать чтобы не нижний звонок сбросить, то есть сам программа сбрасывал и не принимать

что тут спорить, кому не нравится на Delphi программировать есть очень много языков где можно писать код некто вас не держит а кому нравится остается на Delphi несмотря на рейтинги и всякое фигни вот и все, не хотите или рейтинг ненравится вас некто не держит

Значит либо подход неправильный либо что то не работает ((((

Martifan.

На данный момент возможность использовать диалог.

 

а возможно такого сделать?

 

а можно сделать так чтобы видео проигрывалось на своем форме ну своем в приложении?

Привет. Поддерживает прямая и m3u видео ссылку.

 

а можно сделать так чтобы видео проигрывалось на своем форме ну своем в приложении?

 

я ещё не тестил, но судя по коду предоставленному Русланом, как то так:

 

procedure TFrmMain.LocationSensorLocationChanged(Sender: TObject;
  const [Ref] OldLocation, NewLocation: TLocationCoord2D);
var
  Lat,Lon:String;
  lSensorType : String;
begin
  lSensorType := GetLocationSensorType(LocationSensor);
  if lSensorType = 'Triangulation' then exit;
  Lat:=Format('%2.6f',[NewLocation.Latitude]);
  Lon:=Format('%2.6f',[NewLocation.Longitude]);
  // выполняем что то там
end;

 

да но верху написали что он все время возвращает GPS

Так благодаря этому можно отсеивать эти координаты от вышек дабы увеличить точность ... я так понял это из за  них появляются левые координаты которые +- до 2 км.

как раз вопрос в том что как этого сделать

Видимо да

Triangulation sensor.

For example, a sensor that calculates the user location based on the proximity of cellular phone towers.

http://docwiki.embarcadero.com/Libraries/XE8/en/System.Sensors.TLocationSensorType

 

Это я тоже нашел но как его использовать?

пробовал дожидался очень долго но без GPS не возвращает координаты а с GPS бывает что неправильно возвращает координат кто нибудь знает как с этим бороться на компоненте TMapView работать нормально

О_о, я и не знал про такой компонент. Видно новый... ZuBy, плюс тебе однозначно

P.s.ушел перечитывать нововведения в XE8 и Seattle

и похоже это единственный компонент который работать под сервис

как редко может я не дожидался так долго?

а еще один вопрос:

можно ли узнать координаты так чтобы не было включен GPS в телефоне а то очень батарейку убивает я помню на Delphi XE5 этого можно было сделать

Спасибо просто TMapView работает стабильно

или можно как то поймать координаты "синего точки" на TMapView?

да но как все это по делу использовать?

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Single);
begin
  Self.Cursor := crSQLWait;
end;
 
end.

работает без проблем

Неплохо в общем очень хорошо

Вот пожалуйста https://yadi.sk/d/X2zfmhAxo9ZF2

Адрес там на свой подправите

Спасибо

 

Как я понял, Ярослав сказал что сервис не поддерживает визуальных компонент. Нет?

 

Martifan, я только что проверил с NetHTTPClient - все работает.

var
  Ss: TStringStream;
  S:String;
begin
    Ss:=TStringStream.Create('', TEncoding.UTF8);
    NetHTTPClient1.Get('http://cbr.ru/',Ss);
    s:=Ss.DataString; // результат
end;

 

 

PS. Проверьте что в uses не осталось ничего от Indy, типа IdBaseComponent, IdComponent, IdTCPConnection,  IdTCPClient, IdHTTP

 

я проверил ничего не получается как я кладу компонент NetHTTPClient на форме то сервис вырубается можете поделиться примером как вы этого делайте?

не NetHTTPClient и не IdHTTP не работает  как Ярослав сказал сервис не поддерживает FMX компонентов

NetHTTPClient это новый компонент? SSL нету проверю и отпишусь

а разве сервисе можно использовать IdHTTP?