Konum servisi

var
konumZamanlayici: TclTimer;
gecenSure: Integer;

void konumuKontrolEt;
var
enlem, boylam: String;
konumListesi: TclStringList;
konumDegeri: String;
{
gecenSure = gecenSure + 1;
konumDegeri = Clomosy.LocationValue;
if ((konumDegeri <> '0|0') && (konumDegeri <> ''))
{
  konumZamanlayici.Enabled = False;
  konumZamanlayici.Free;
  enlem = clGetStringTo(konumDegeri, '|'); 
  boylam = clGetStringAfter(konumDegeri, '|'); 
  konumListesi = Clomosy.StringListNew;
  konumListesi.Add(enlem);
  konumListesi.Add(boylam);
  Clomosy.GlobalVariableStringList = konumListesi; 
  TclProLabel(CallerForm.clFindComponent('sonucLabel')).Caption = 'Konum Bulundu: ' + enlem + ', ' + boylam;

}
else if (gecenSure > 30)
{
  konumZamanlayici.Enabled = False;
  konumZamanlayici.Free;
  TclProLabel(CallerForm.clFindComponent('sonucLabel')).Caption = 'Konum alınamadı (zaman aşımı).';
}
else
{
  TclProLabel(CallerForm.clFindComponent('sonucLabel')).Caption = 'GPS sinyali aranıyor... (' + IntToStr(gecenSure) + 'sn)';
}
}
{
gecenSure = 0;
TclProLabel(CallerForm.clFindComponent('sonucLabel')).Caption = 'GPS sinyali aranıyor...';
Clomosy.GetCurrentLocation; 
konumZamanlayici = CallerForm.AddNewTimer(CallerForm, 'konumZamanlayici', 1000);
konumZamanlayici.Enabled = True; 
CallerForm.AddNewEvent(konumZamanlayici, tbeOnTimer, 'konumuKontrolEt');
}
kodumda 30 saniye süre içinde konum çekmek istiyorum fakat hem mobilde hem pc de konum verileri gelmiyor.