13-02-2020, Saat: 16:42
(13-02-2020, Saat: 16:14)guverdik Adlı Kullanıcıdan Alıntı:(12-02-2020, Saat: 13:39)pro_imaj Adlı Kullanıcıdan Alıntı: Hocam cevabınız için çok teşekkür ederim, anlattıklarınız çok heyecan verici.
Çok basitçe düşünürsek şöyle bir örneği öğrenmek yapma konusunu tüm rüyalarımızı gerçekleştirebilir.
Örnek olarak;
Geliştirdiğiniz USCO 02 Gömülü sistemine bağlı 5 tane farklı renkte led olduğunu düşünüyorum. Bu ledl'erden 3 tanesinin yandığını 2 tanesinin yanmadığını varsayıyorum.
1-Delphi ile internet üzerinden bu ledlerin hangilerinin yandığı bilgisini nasıl isteriz. (Gelen bilgiye göre Delphi ekranında 5 Buton olduğunu düşünürsek yananları ilgili renk ile göstermek yanmayanları pasif göstermek için)
2-Delphi ekranındaki 5 buton aracılığıyla; Yanmayan Led'e karşılık gelen 5. Butona tıkladığımızda USCO 02 gömülü sistemine led yanıyorsa söndürmek, yanmıyorsa yakma işlemi nasıl yapılır.
*Kısacası butonlar ile ledlerin durumunu öğrenip onları açıp kapama işlemi.
Teşekkürler.
Bu sorulara denk gelen uygulama USCO 02 ile oldukça kolay bir şekilde yapılır. Bununla birlikte benim takip ettiğim konu bütünlüğünü bozmaktadır. Ama @pro_imaj ın isteğini kıramayıp diğer arkadaşlara da ÖN İZLEME olması adına bu ÖRNEĞİ uygulayarak anlatmak isterim.
İşlem Basamakları.
1-) TIVA ARM Cortex M4 TM4C1294 120 MHz mikro denetleyici ve altlık kartına sahip olmamız gereklidir.
20 Adet ADC, 35 Adet Digital Output, 15 Adet Digital Input, 5 Adet PWM, 1 Adet Encoder, 1 Adet DHT11 Sıcaklık ve Nem Sensörü
2-) USCO 02 Yerli Gömülü Sistem LM Flash Programmer ile yüklenir.
3-) USCO 02 ethernet kablosu ile veya DARK MINI repeater ile WiFi vasıtası ile mevcut kablosuz ağınıza "SSID" bağlanır. USCO 02 otomatik olarak (STATIK IP) 192.168.1.22 IP adresini alır. Özel projelerde dinamik IP de yapılır. Normal (default) PORT = 80 dir. Modeminizden NAT ayarları ile 192.168.1.22:80 portuna yönlendirme yaparsanız aşağıdaki anlatılan tüm uygulamalar DIŞ dünyadan da çalışır.
4-) Aynı SSID ağ grubuna bağlı olan laptop unuzun veya cep telefonunuzun browser (internet tarayıcısı, chrome veya explore gibi) açılır ve adres kutusuna http://192.168.1.22 yazdığınızda otomatik olarak MANUEL i oluşturan USCO 02 protokolü karşınıza gelir.
5-) Altlığın klamens vidalarını SSR rölelerin +3V ve GND uçlarına vadaladığınızda 220 V lamba ları çalıştırabilirsiniz. Hangi PIN'e bağlayacağınız MANUEL de (PIN HARITASINDA) belirtilmiştir.
6-) Şimdi yazılım kısmını yazacağımız DELPHI kısmına geldik. Delphi ile boş VCL veya FMX projesini oluşturup BOŞ halini belirli bir klasöre kaydedip BOŞ halini derleyip çalıştırınız. Her şey yolunda mı :=)
7-) IPWorks bileşenlerinden ipwHttp1, Timer1, 5 adet Button1, 5 adet shape, 1 Edit1, 1 Memo1 form'a getirilir. Kaydedilir. Butonların HINT özelliklerine sırasıyla 00, 01, 02, 03, 04, ve 05 bilgisi ile CAPTION başlık bilgisine AÇ yazılır. Hangi butona basılırsa o butonun başlık (CAPTION) bilgisi KAPA bilgisine dönüştürülür. IPWORKS bileşeninin OnTransfer olayında yakalanan Text değişkenindeki bilgi bizim tanımladığımız GELEN_BILGI değişkenine atanır. 151 ve sonrası gelen KARAKTERLER USCO 02 üzerinde bulunan 35 adet DIGITAL_OUTPUT ların DURUMU nu gösteren karakterlerin başıdır. Aşağıdaki ekran görüntüleri projenin aşamalarını ve SONUÇ görüntülerini vermektedir. Eğer IPwORKS bileşenlerini kullanmak istemiyorsanız (ki ben kesinlikle kullanmanızı şiddetle tavsiye ederim), aynı işlemi yapan HTTP nin GET özelliğini kullanan KODLAMA veya başka bir bileşende kullanabilirsiniz.
İŞLEM TAMAM.
Hocam elinize sağlık çok teşekkür ederim. Çok mahçup oldum.
Öyle güzel anlatmışsınız ki, uygulamaya geçmek için sabırsızlanıyorum. Tüm DelphiCan'lar için mükemmel bir kaynak.
