Tüm Platformlar için Hızlı Uygulama Geliştirme Kitabı... Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
unigui mobil/masaüstü yönlendirme
#1
Question 
Merhaba,

unigui ile bir proje hazırladım diyelim bunu bir internet sitesinde göstereceğim hem masüstünde hemde mobilde ekran tasarımları için iki ayrı projemi yapmam gerekiyor?
iki ayrı proje yaptım diyelim kullanıcı sayfaya girdiğinde masaüstümü mobilmi duruma göre yönlendirmesini nasıl yapabilirim?

“Do. Or do not. There is no try.”
Cevapla
#2
(06-02-2017, Saat: 16:12)masteryoda Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,

unigui ile bir proje hazırladım diyelim bunu bir internet sitesinde göstereceğim hem masüstünde hemde mobilde ekran tasarımları için iki ayrı projemi yapmam gerekiyor?
iki ayrı proje yaptım diyelim kullanıcı sayfaya girdiğinde masaüstümü mobilmi duruma göre yönlendirmesini nasıl yapabilirim?

Merhaba;
S1-unigui ile bir proje hazırladım diyelim bunu bir internet sitesinde göstereceğim hem masüstünde hemde mobilde ekran tasarımları için iki ayrı projemi yapmam gerekiyor?
C1-Evet 2 ayrı proje yapmalısınız.

Unigui tarafında proje olarak;
Application Wizard = Normal Web uygulaması
Mobile Aplication   = Mobil (HTML5) proje oluşturarak yapabilirsiniz.


S2-iki ayrı proje yaptım diyelim kullanıcı sayfaya girdiğinde masaüstümü mobilmi duruma göre yönlendirmesini nasıl yapabilirim?
C2-Aşağıdaki gibi işletim sistemi bilgisinden hareketle ilgili projeye yönlendirme yapabilirsiniz.

var
  C : TUniClientInfoRec;
begin
C:=UniApplication.ClientInfoRec;
UniLabel.Caption:=C.OSType;
end;

Siz projeye başlayın, takıldığınız yerde hemen devreye gireriz.  Wink


İyi çalışmalar.
Cevapla
#3
Demosunda gördüm çalıştırdığımda ki sonuçlar.
Bilgisayardan çalıştırdığımda
MonDn6.jpg
Mobil Mozilla

770DRm.jpg
Mobil Chrome
bkz6nV.jpg
Mobil Dolphine
1VQ6mA.jpg
ubuntu desktop
PnL1od.jpg
Mobil mozilla da işletim sistemini görmedi ayrıca google chromeda ip adresi de diğerlerinden farklı çıktı acaba ekran çözünürlüğü alsak daha mı mantıklı?

“Do. Or do not. There is no try.”
Cevapla
#4
Aşağıdaki script işinizi görecektir.

MainForm=>Script içine kodu eklemeniz yeterli.

<script type="text/javascript"> // <![CDATA[
   if ((navigator.userAgent.match(/iPhone/i)) || (navigator.userAgent.match(/iPod/i)) || (navigator.userAgent.match(/Android/i)) || (navigator.userAgent.match(/android/i)))  {
        location.replace("http://mobilip/m")} 
   else {
        location.replace("http://webip:8077")     
    } // ]]>
</script>
Cevapla
#5
Bu işimi gördü.
var
IsPhone:Boolean;
begin
IsPhone:=(upPhone in UniSession.UniPlatform);
if IsPhone then
 begin
   ShowMessage('Telefon');
   // tel url git
 end
 else
 ShowMessage('PC');
end;

“Do. Or do not. There is no try.”
Cevapla
#6
(06-02-2017, Saat: 22:19)pro_imaj Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
var
  C : TUniClientInfoRec;
begin
C:=UniApplication.ClientInfoRec;
UniLabel.Caption:=C.OSType;
end;

Hocam bu blog bende çalışmıyor bilgiler boş geliyor Sad

Örnek Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

procedure TMainForm.UniFormCreate(Sender: TObject);
var
 C : TUniClientInfoRec;
begin
 C:=UniApplication.ClientInfoRec;
 ip.Caption:='ip: '+UniApplication.RemoteAddress+ '    Browser : '+C.BrowserType+ '(v:'+IntToStr(C.BrowserVersion)+')'+
  '   Os: ' +C.OSType;
end;

(15-02-2017, Saat: 05:27)masteryoda Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlBu işimi gördü.
var
IsPhone:Boolean;
begin
IsPhone:=(upPhone in UniSession.UniPlatform);
if IsPhone then
 begin
   ShowMessage('Telefon');
   // tel url git
 end
 else
 ShowMessage('PC');
end;

mobil url'ye nasıl yönlendirdiniz ?
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#7
(21-04-2017, Saat: 09:27)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
mobil url'ye nasıl yönlendirdiniz ?

 if IsPhone then
  begin
   UniSession.BrowserWindow('http://185...../muygulamam', 0, 0, '_self');
 end

“Do. Or do not. There is no try.”
Cevapla
#8
(21-04-2017, Saat: 10:38)masteryoda Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(21-04-2017, Saat: 09:27)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
mobil url'ye nasıl yönlendirdiniz ?

 if IsPhone then
  begin
   UniSession.BrowserWindow('http://185...../muygulamam', 0, 0, '_self');
 end

Harika teşekkür ederim.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  unigui mobil android 8 loading hatası mdagli2003 0 3 21 dakika önce
Son Yorum: mdagli2003
  unigui mobil ile barkod taranması zxing sdk mdagli2003 0 76 12-10-2018, Saat: 15:31
Son Yorum: mdagli2003
  UniGui DBGrid yazı fontları nasıl küçültülüyor? selchuk 9 377 11-10-2018, Saat: 17:12
Son Yorum: elixir84
Question UniGui mobil aplikasyon (standalone server) dışardan ulaşma nasıl? selchuk 10 404 04-10-2018, Saat: 23:51
Son Yorum: selchuk
Question Unigui UnimDBGrid1 Dinamik Yapı elixir84 8 460 13-09-2018, Saat: 15:05
Son Yorum: selchuk



Konuyu Okuyanlar: 1 Ziyaretçi