Anonymní profil Borisek – Programujte.com

Zdravím. Poradite?
Když zadam do prohližeše  http://192.168.1.30/info, zobrazi se jen stav 4 GPIO 
0110

Jak to načtu do nějakeho řetězce?
A pak do dalšiho řetězce uližim třeba jen 2 hodnotu?

Děkují.

Jde mi o toto.
https://http-shortcuts.rmy.ch/


 

Kluci, děkují moooc, ale už fungujeme.
Ja to pod win vždy řešil přes soubor - otevřit.
Netušim proč, ale v linuxu se mu to nelibilo a same chyby.
Pak jsem to zkusil přes projekt - otevřit projekt a funguje.
Ja myslel, že to je uplně to same.

 

Dobrý den. Najde se dobra duše, která poradí, pomůže? Už jsem v prdeli.
Mam 2 raspberry a na každém lazarus.
Na jednom je můj prográmek, který normálně přeložím a spustím.
Nedaří se mi ho zprovoznit na druhem raspi když adresář jen překopírují.

Už při otevření projektu mi nyskoči toto.
https://ibb.co/DVL0t75

Děkijí mooooc..

Zdravím.
Jen dotaz.
Bude to vše na ESP8266
Potřebují z ESP8266 načítat data na web.
Jsem googlil a už mám vyřešené. Jen mně zajímá, když chci takto aktualizovat třeba 30 hodnot.
Je lepši po každou vytvořit zvlášť funkci, nebo toho mužů nasmolit do jedné funkce více?
Dik za info.

setInterval(function() 
{
  getData();
}, 2000); 
function getData() {
  var xhttp = new XMLHttpRequest();
  xhttp.onreadystatechange = function() {
    if (this.readyState == 4 && this.status == 200) {
      document.getElementById("adc_val").innerHTML =
      this.responseText;
    }
  };
  xhttp.open("GET", "adcread", true);
  xhttp.send();
}

Je tu na programujte.com ještě někdo kdo používá lazarus?

Jen tak  pro zabavu a hlavně že mi jede i na raspi pod linuxem.

#3 JerryM
Je tam Lazarus Windows 64 bit a Lazarus Windows 32 bit.
Tu je možnost nainstalovat každou verzí do jine složky, ne?
Jsem to už kdysi instaloval podle toho wiki.
První Install the win64.exe a pak cross-i386-win32-win64.exe
Pak to šlo ve vlastnostech projektu přepinat.

Zdravím. Nějak se nedaři.
https://wiki.lazarus.freepascal.org/Cross_compiling#…

Chci 64 bit jako vychozi, ale abych moh zkompilovati na 32bit

To install Lazarus 64-bit, and cross-compile a Windows 32-bit exe:

Install the win64.exe
Install the cross-i386-win32-win64.exe in the same folder.

Jsem nainstaloval Windows (64 Bits) a na to Windows (32 and 64 Bits) Direct download.

Co dělam špatně?
Děkují.

Zdravím. Poradite ?
Kdysi nám jeden pan napsal programek, a data se ukladají do databaze SDF.
Databaze jde otevřit přes SDF Viewer.
https://sdf-viewer.software.informer.com/download/?…

Pujde tato databaze krmit přes lazarus?
Děkují
 

Pochopil jsem to spravně, že na tom servru, kde mám PHP musí byt nainstalovaný poštovní servr?

Klidně se spokojím s nějakým návedem, jak odeslat email přes muj email.
 

#1 Borisek
https://www.tvorba-webu.cz/php/mail.php

Nic nepřijde. Pro?
 

<form action="" method="post">
<?php

error_reporting(E_ALL);
ini_set("display_errors", 1);
mail("mujemail@seznam.cz", "nejaký předmět", "nějaký obsah");  
?>

Zdravím. Pomůže někdo. Úplná lama.
Potřebují přes arduino s ethernetem odesílat email.
Same arduino to asi neumí, tak by asi šlo vytvořit nějaký free hostng a do něho PHP skript, který by ten email odeslal.
Nepotřebují to odesílat přes nějaký free emal.
Klidně vytvořit svůj přes seznam, centrum, gmail a přes něj so odesílat
Děkují.

Tak to je jasne, ale kde je chyby?
Pokud ten soubor smažu přes průzkumníka jako přihlašený users, má problem AS.
 

No netušim proč, ale pokud pustím AS jako správce, tak je to ok   
Dik.

https://i.postimg.cc/C1Jdy6wQ/test-java1.png

Co mám chapat pod slovem blbě?
Emulator to sežere, ale když to chci strčit do telefonnu, tak to vyhodi chybu.
https://i.postimg.cc/…est-java.png
 

Zdravím Vás.
Upná lama a jen učim.
Mám problem s komentařemi - poznamky v MainActivity.java.
Na netu pišou že se strkají takto /* toto je test */
Nějak mi to ale nesežere.
Poradite kde dělam kopanec?
Děkují.
 

Zdravím Vás.
Když zadam do google delphi temperature component, je tam spousta budiku.

https://www.google.cz/search?q=delphi%20temperature%20component&tbm=isch&tbs=rimg:CWmI0rMDz1VXYQvqgGvetved8AEAsgIMCgIIABAAOgQIABAA&hl=cs&sa=X&ved=0CAIQrnZqFwoTCLifr6iRk_gCFQAAAAAdAAAAABAM&biw=2048&bih=964#imgrc=QGNPOJ71xJtUNM

Když zadam lazarus temperature component, je to bída.
Nevite o něčem?
Děkují.

Dobrý den všem.

Když sí chcí nějake data při ukončení aplikace uložit a při spouštění znovu načist, jak na to?
Nasměrujte mně někam?

Děkují.

#4 Kit
Taka kokotina a ja se trapil   
A kdybych chtěl aby jelo furt?
Nekonečnou smyčku nebo po ukončení ho volat furt dokola?

Děkují.Co je špatně?
https://pastebin.com/fb8WvvHj
Je tam 2X  textView.setText("#" + i);
Ten první je ok.
Ten druhý ne  Cannot resolve symbol 'textView'.
On ten  textView s toho vlakna nevidí.
 

Zdravim.Těžke začatky. Uplna lama  
Jak udělat v AS timer?
Třeba aby se nějaka metoda VOID spustila při spuštění programu a jela furt dokola třeba co 5 sekund?

Děkují moooc.

v uses  clocale mám.

Zdravím.
Lazarus na linuxu - raspberry.
V timeru mám
myDate := now;
Form1.Caption :=  formatdatetime('h:nn:s    dddd d. m. yyyy', myDate);

Když se měníl čas, tak v systemu vpravo dole na liště se normalně sam opravil.
Ale v mém projektu mám furt starý čas.
Proč a jak to pořešit?
Děkují.
 

#7 JerryM
https://www.androidauthority.com/converting-speech-to-text-voice-dictation-app-976732/

Měl jsem to udělane že ESP odesilala data.
Už jsem to cele překopal a Lazarus si data taha a použil jsem Synapse.
Ale přesto moc děkují a na tu knihovnu kouknu.

@ JerryM - kdybys uměl v AS v javě a byl ochotný pomoct   
 

#2 JerryM
ESP = ESP8266 - je uvedeno v názvu vlakna.
https://periscopes.ru/…ie-dlya.html

Dobrý den.
Potřebují každou minutu odeslat přes ESP nějaký řetězec a přes lazarus ho odchytit.
Nějake nej řešení?
Děkují

Děkují.  

Zdravím Vás.
Uplny začatečník a snažim se o jednu apku.
Co dělam špatně a jak to vyřešt?

https://pastebin.com/9mgwUjat

Když to pustim přes Debug APP a necham zastavit na Label1.setText(temp), hned při prvním kliknuti na button vidim že je teplota v temp načtena.
Když však spustim normalně. musim několikrat kliknout na button, než se teplota zobrazi.

Mi to připada tak, že když při kliknutí volam String temp = executeRemoteCommand, tak to nečeka až se teplota načte do temp, ale jsem jen lama, takže bych rad znal nazor těch zkušenějšich.

Zdravím Vás.
Netušim co hledat, tak prosim nasměrovat na nějaký návod.
Jak na to když v prohližeči přidam mou www do založek, abych měl u odkazu nějakou ikonu (obrazek).

Nebo to je zaležitost web servru?

Děkuji.

Jsem spiše udělal kopanec někde při instalaci te komponenty SpeechRecognition.

Vytvořim nový projekt new multi device application a přepnu na android.
Hodim na Form tu komponentu SpeechRecognition a F9 a vyhodi to tu chybu.

Zajimave je, že když to přepnu na windows 32 bit, tak je to ok.
Je to moje první koponenta pro android co instalují,takže určitě jsem něco posral   

Zdravím.

Netuši někdo co dělam špatně?
https://github.com/…ndroid-Voice

Delphi 10.3
Tools->Options->Language->Delphi Options->Library
Přepl na android
Do Libray patch přidal cesty
C:\Users\Borisek\Documents\Embarcadero\FireMonkey-Android-Voice-master
C:\Users\Borisek\Documents\Embarcadero\FireMonkey-Android-Voice-master\Components
Otevřel AndoridVoiceComponents.dproj a dal instal.
Komponentu mam naintalovanou a vidim ji mezi komponentama.
Když načtu Demos - SpeechRecognizer

[DCC Fatal Error] SpeechRecognition.pas(54): F2613 Unit 'android.speech.SpeechRecognizer' not found.

Unita SpeechRecognition.pas je v adresaři Components a v Libray patch mam zadanou cestu.

Dobrý den.
Shaním nějakou spolehlivou komponentu pro komunikaci přes MQTT protokol.

#1 Borisek
Děkují za vysvětlení.
Koukam že se mám ještě hodně učit.

Nemate zkušeností s API od google?
Jsem zkoušeli toto a funguje to.
https://www.androidauthority.com/…-app-976732/
Pujde přes AS docilit toho, aby se mi to spouštělo misto přer button tak přikazem Ok Google , Hey Google.
Jsme nedavno zkoušeli app inventor.
Jde nám o toto.
https://i.postimg.cc/…inventor.jpg
Funguje to, zmačknu tlačitko, řeknu třeba ahoj raspi, převede se to na text a odešle a na raspi si to přes php odchytim.
Jen přes ten app inventor. nejde docilit toho Ok Google , Hey Google.
Jen proto jsme se pustili do toho přes AS.Ale kamoš to už vzdal.


 

#7 MilanL
Tak diakritika funguje  
Dik. 

IdMessage1.ContentType:='text/plain';
IdMessage1.CharSet:='UTF-8';

Už jsem to nedavno zkoušel, ale měl jsem přehozene poředi.

http://www.ararat.cz/synapse/doku.php/public:howto:smtpsend
Nemohu přijit na to, co tam schazi.
E2003 Undeclared identifier: 'AddToLog'

Zatim nejsem doma, tak nemohu zkusit ale indy jsem zkoušel a funguje ale nějak nemohu pořešit češtinu v odeslane zpravě.

#3 MilanL

Je tam if SMTP.login, takže jsem přidal else.
Jak v něm přes ShowMessage vypišu tu chybu?
Jsem našel  ShowMessage(smtp.EnhCodeString);

Připojen obrázek.

Připojen obrázek.

Zdravím Vás.
Mám internet od providera který má i poštovní server a toto mi funguje.

function SendMail(
      User, Password,
      MailFrom, MailTo,
      SMTPHost, SMTPPort: string;
      MailData: string): Boolean;
    var
      SMTP: TSMTPSend;
      sl:TStringList;
    begin
      Result:=False;
      SMTP:=TSMTPSend.Create;
      sl:=TStringList.Create;
      try
        sl.text:=Maildata;
        SMTP.UserName:=User;
        SMTP.Password:=Password;
        SMTP.TargetHost:=SMTPHost;

        SMTP.TargetPort:=SMTPPort;
        SMTP.AutoTLS:=true;
        if SMTP.Login then
        begin
          result:=SMTP.MailFrom(MailFrom, Length(MailData)) and
             SMTP.MailTo(MailTo) and
             SMTP.MailData(sl);
          SMTP.Logout;
        end;
      finally
        SMTP.Free;
        sl.Free;
      end;
    end;


procedure TForm1.Button1Click(Sender: TObject);
begin
SendMail('borisek', 'heslo',
  'muj email', 'muj email',
  'smtp server providera','25',
  'Test');
end;

Bych to ale chtěl posilat přimo přes smtp.seznam.cz
Jsem si zkoušel nastavit v mém poštovním klientovi port 25 bez šifrovaní a funguje.
Přes synapse to nefunguje.
Když nastavim smtp server providera tak ok.
Když nastavim smtp.seznam.cz nefunkční.
Asi tady bude problem a nevim jak zapnout.

https://napoveda.seznam.cz/cz/email/imap-pop3-smtp/
Dále je u tohoto serveru nutné zapnout funkci "SMTP autentifikace" (ověřování uživatelského jména a hesla na SMTP serveru).

 

Zdravím, bych měl dotaz.
http://programujte.com/…or-js-dotaz/#…

Jak na to, kdybych to nechtěl vykreslovat na canvas, ale ukladat na disk jako obrazek?

Take použivají MediaPlayer a funguje jim to

https://www.svethardware.cz/forum/showthread.php/56654-Jak-na-stream-videa-z-IP-kamery-na-webovou-stranku

Děkují moc   

Už mi s toho tak hrabe že aní kopirovat  neumím.   

Jedině co mně napadlo co s tým, tak 

$cmd = "C_ALL=cs_CZ.UTF-8 rrdtool graph - \
        --start -1d \
        --watermark \"xxx\" \
        --width 800 \
        --height 240 \
        DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
        AREA:venku\"#FFE999\":\"Teplota venku\\t\\t\"";

Je to furt EN

To moc nechapu. Pokud to generuje program v linuxu, win, tak vystup v obrazku lze ovlivnit parametrem

<?php
$cmd = "rrdtool graph $DIR1/graf_deni.png \
        --start -1d \
        --watermark \"xxx\" \
        --width 800 \
        --height 240 \
        DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
        AREA:venku\"#FFE999\":\"Teplota venku\t\t\"";
passthru($cmd);
?>

https://postimg.cc/Jtz7FKvM

<?php
$cmd = "rrdtool graph - \
        --start -1d \
        --watermark \"xxx\" \
        --width 800 \
        --height 240 \
        DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
        AREA:venku\"#FFE999\":\"Teplota venku\t\t\"";
passthru($cmd);
?>

https://postimg.cc/DmL6tdXp

Jediný rozdil je že ten první spouštim přes terminal sudo php -f /var/www/test1/index.php  a raspberry je nastavene na češtinu, tedy i terminal komunikuje český

Ten druhý spoušti ta stranka přes IMG
 

Takto.  $cmd = "rrdtool graph - \  
Ja to tam cpal v uvozovkach "-"

Ještě poslední dotaz.
U obou těch funkčních co jsem tu dal je jeden problem.
Když to uložim na disk, mam názvy dní a měsicu v češtině.
Když to pošlu do toho HTML, <img src="rrd.php" />, tak to mam v angličtině.

Proč a jak to vyřešit?

 

Tak mi to neda a ještě zkoušim to co jste ru dali.

Funguje mi i to co tu dal peter. 

<?php
$DIR="/media/FlashDisk";
$DIR1="/home/pi";

$cmd = "rrdtool graph $DIR1/graf_deni.png \
        --start -1d \
        --watermark \"xxx\" \
        --width 800 \
        --height 240 \
        DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
        AREA:venku\"#FFE999\":\"Teplota venku\\t\\t\"";
//echo $cmd; exit(); 
passthru($cmd);
?>

Ale furt mi to  vytvaři ten graf_deni.png na disku.
Toto pujde nějak pořešit?

No ale je tu už toho tolik, že jsem s toho něako zmateny.
Furt se řešilo, proč mi to nefunguje, a problem byl, že jsem neměl nainstalovane rozšíření v PHP pro rrdtool.
Ted už mám jistotu, že to funghje.

Takže toto funguje.

<?php
$opts = array(
    "--start", "-1d",
    "--title=xxx",
    "--width=800",
    "--height=240",
    "DEF:venku=/media/FlashDisk/databaze_teplota.rrd:venku:AVERAGE",
    "DEF:voda=/media/FlashDisk/databaze_teplota.rrd:voda:AVERAGE",
    "DEF:kotel=/media/FlashDisk/databaze_teplota.rrd:kotel:AVERAGE",
    "AREA:venku#FFE999:Venku",
    "LINE1:voda#0000FF:Voda", 
    "LINE1:kotel#E81123:Kotel"   
	);

$result = rrd_graph('/home/pi/graf.png', $opts);
if ($result === false) {
	echo 'There was an error: ';
	echo rrd_error();
}
else {
	echo 'File successfully created.';
}
?>

Potřeboval bych však misto toho uložení to načist do proměnne a v tom else odeslat do toho IMG.

Jsem zkoušel misto te cesty kam to ma uložit dat proměnnou $data ale Undefined variable: data.
Poradite?

sudo apt-get install -y php-rrd

Tak s tohoto jsem už úplný debil.

Je tam 
$cmd = "rrdtool graph $DIR1/graf_deni.png
Proč?
Celou dobu tu řeším, aby se graf načítal přímo do IMG.

Ony se ty teploty ukládají do databáze co 5 minut a také se vždy hned vytvoří ten graf jako PNG.
Připadá mi blbost, aby se graf vytvářel co 5 minut, když se na něj divám třeba jen jednou denně.

Tak kvuli raspi jsem začal s lazarem, zkoušel jsem python i bash, ale u žadneho jsem se tak nenatrapil, ale nějak se mi nechce to vzdat.

https://stackoverflow.com/questions/20406429/realtime-image-from-rrd-file-in-php

Uplně ořezaný bash ale funkční
 

#!/bin/bash
DIR="/media/FlashDisk"
DIR1="/home/pi"
 
#deni
rrdtool graph $DIR1/graf_deni.png --start -1d \
--watermark "xxx" \
--width 800 \
--height 240 \
DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
AREA:venku"#FFE999":"Teplota venku\t\t"

<?php
  $options = array(
    "--start", "-1d",
    "--title=xxx",
    "--lower-limit=0",
    "--width=800",
    "--height=240",
    "DEF:venku=/media/FlashDisk/databaze_teplota.rrd:venku:AVERAGE",
    "LINE:tvenku#00FF00:US venku"
      );
  $graphObj = new RRDGraph('-');
  $graphObj->setOptions($options);
  $res = $graphObj->saveVerbose();

  header("Content-type: image/png");
  echo $res['image'];
?>

Tak proč nefunguje sakra toto?
https://i.postimg.cc/…raspiphp.png
Bych řek, že jedíný problem je, že neví kam ten ty data odeslat.

Děkují moc, ale i když nerad, ale už jsem to odpískal.
S programováním www stránek znám jen úplně základy a toto je úplně mimo mé znalosti.
První problém, o kterém vím, je v tom rrdgen.php
Jede to na linuxu, takže když ho spustím přes terminal.

https://i.postimg.cc/dQGYgWkC/xx1.png

Připojen obrázek.

Ono jak jste nahoře napsal.

Vždyť je to tam popsané. Jen to tahá obrázky ze serveru.Takže do img dáš místo graphA třeba rrdgen.php:
Tak ja po posral a myslel že tam mam dat tu databazi.

Tak pak už fakt netušim proč mi to nefunguje.

Jedině ještě že mam něco mlbě tady.

<?php
error_reporting(E_ALL);
ini_set("display_errors", 1);
$args = ['start', 'end', 'width', 'height', 'zoom'];
$args = array_map(function($arg) {
    return isset($_GET[$arg]) ? "--$arg " . escapeshellarg($_GET[$arg]) : '';
}, $args);

$command = 'rrdtool graph - ' . join(' ', $args)      
          . 'DEF:venku= /media/FlashDisk/databaze_teplota.rrd:AVERAGE'
          . 'DEF:voda= /media/FlashDisk/databaze_teplota.rrd:voda:AVERAGE' 
          . 'DEF:kotel= /media/FlashDisk/databaze_teplota.rrd:kotel:AVERAGE';
passthru($command);
?>

Mužu ještě dotaz?

Furt zkoušim nějak zprovoznit ten puvodní.
Je tam.

<div><img
        style="width:695px;height:238px" class="graph"
        data-src-template="databaze_teplota.rrd?width={{width}}&amp;height={{height}}&amp;start={{start}}&amp;end={{end}}&amp;zoom={{zoom}}&amp;rand={{random}}"
    /></div>

Když spustím ten index.html a 2x kliknu levým na tem img, vyskočí mi okno pro stažení té databáze databaze_teplota.rrd.
Když ji dam stáhnout a pak kopírovat stahovaný odkaz, je tam.

http://192.168.1.5:8888/rrdgraph_test/databaze_teplota.rrd?width=695&height=238&start=1574233706&end=1574237306&zoom=1&rand=5sacsi

Nemůže byt tam nějaký kopanec?
I když o tom neuvažují, ale kdybych to náhodou zprovozníl a zpřístupníl zvenčí, je kravina, aby si mohl každý stáhnout tu databázi, ne?

To mi je jasne.

<div><img
        style="width:695px;height:238px" class="graph"
        data-src-template="databaze_teplota.rrd?width={{width}}&amp;height={{height}}&amp;start={{start}}&amp;end={{end}}&amp;zoom={{zoom}}&amp;rand={{random}}"
    /></div>

Ale ja zapasím s tým zbytkem.co jste tu dál..
Jak mu bysvětlit, že v te databazi mam uložen vice dat.

DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \ DEF:voda=$DIR/databaze_teplota.rrd:voda:AVERAGE \ DEF:kotel=$DIR/databaze_teplota.rrd:kotel:AVERAGE \

Když to spoušti rrdtool, tak by to mělo jit do funkce, kterou vola ten buttom, ale to jsem zkušel a nic.

Vzdavam to, toto fakt nedavam.
Ale i tak moc dik za ochotu.

Tak čučim na to jak pero z gauče a vubec netušim kam s tým.

$args = ['start', 'end', 'width', 'height', 'zoom'];
$args = array_map(function($arg) {
    return isset($_GET[$arg]) ? "--$arg " . escapeshellarg($_GET[$arg]) : '';
}, $args);

$command = 'rrdtool graph - ' . join(' ', $args)
         . ' DEF:blabla a dalsi'
         . ' parametry jak chces';
passthru($command);

Tročku menší výpadek  

Kde zadat ten nazev mé databaze je jasne.
Nějak ale nechapu kam s tým druhým.
A dotaz.Napsal jste tu.
"Jen to tahá obrázky ze serveru."
To si jako první ty obrazky někam uklada, a pak teprve je vykreslue?

Zdravím Vás.
Mohl bych poprosit nějaké info k tomuto.
https://github.com/…r/RrdGraphJS

Zda bych mněl nějakou šanci, jako lama to rozjet?
Jedná se o RRDtool grafy, které už používám par let, ale přes bash skript je co 5 minut ukládám na disk a pak na své stránce vykresluji.

Mám databazi databaze_teploty.rrd a do ni ukládám 3 naměřené hodnoty.

#!/bin/bash
DIR="/media/FlashDisk"
DIR1="/dev/shm"
#set to C if using Celsius
TEMP_SCALE="F"
 
#Barva grafu
VODA_COLOR="#0000FF"
KOTEL_COLOR="#E81123"
VENKU_COLOR="#FFE999"

#deni
rrdtool graph $DIR1/graf_deni.png --start -1d \
--watermark "Borisek" \
--width 800 \
--height 240 \
COMMENT:"\\t\\t\\t\\tAktuální\\t\\t Minimum \\t\\t Maximum\\t\\t Průměr\\n" \
DEF:venku=$DIR/databaze_teplota.rrd:venku:AVERAGE \
DEF:voda=$DIR/databaze_teplota.rrd:voda:AVERAGE \
DEF:kotel=$DIR/databaze_teplota.rrd:kotel:AVERAGE \
AREA:venku$VENKU_COLOR:"Teplota venku\\t\\t" \
GPRINT:venku:LAST:"%4.1lf C\\t\\t" \
GPRINT:venku:MIN:"%4.1lf C\\t\\t" \
GPRINT:venku:MAX:" %4.1lf C\\t\\t" \
GPRINT:venku:AVERAGE:"  %4.1lf C\\n" \
LINE1:voda$VODA_COLOR:"Teplota voda\\t\\t" \
GPRINT:voda:LAST:"%4.1lf C\\t\\t" \
GPRINT:voda:MIN:"%4.1lf C\\t\\t" \
GPRINT:voda:MAX:" %4.1lf C\\t\\t" \
GPRINT:voda:AVERAGE:"  %4.1lf C\\n" \
LINE1:kotel$KOTEL_COLOR:"Teplota kotel\\t\\t" \
GPRINT:kotel:LAST:"%4.1lf C\\t\\t" \
GPRINT:kotel:MIN:"%4.1lf C\\t\\t" \
GPRINT:kotel:MAX:" %4.1lf C\\t\\t" \
GPRINT:kotel:AVERAGE:"  %4.1lf C\\n" 

Mužů ještě poprosit o radu.

Už mam 5 teploměru a funguji.

Mám však ve všech pokojích čidlo SHT31-D, které mi posila jak teplotu, tak vlhkost.
Bych chtěl do toho okna canvas pomoci funkce ctx.fillText nebo ctx.strokeText vykreslit třeba "Obývací pokoj" a pod něj vykreslit dva teploměry titleString: "Thermometer" a titleString: "Humidity".
Nějak mi však u těch teploměru schází nastavení hodnot left a top.
Jsem koukal do toho steelseries.js na tu funkci lineár a neni tam nic.

Bylo by složité tam ty 2 parametry přidat?

Jsem zkoušel vytvořit canvas, do něj vykreslit "Obývací pokoj"  a pod něj 2 canvasy - ty teploměry a nevypadá to moc pěkně.

A vytvořit cavas a do něj vložit 2 canvasy asi také nepujde.

Nebo nějaka rada, jak by jste to vyřešili Vý?

#24 MilanL

To nevadí, ještě mam jeden projekt po kterém už dlouho toužím, ale bude lepši Vás nechat trochu odpočinout 

Uvědomují si, že jste úplně vše udělali za mně a moc za to děkují.
Jsem prostě elektrikář, slaboproudař co si hraje s raspi.
Než jsem tu poprosil o pomoc tak jsem si par věci o canvasu přečet a také zkoušel na něj kreslit, ale toto už je úplně jinde, než obyčejné základy.

Tak jsem zkusil 0 - 10 a žadna změna   

Jsem se v praci trochu nudil, tak jsem brouzdal.
https://harmoniccode.blogspot.com/…edition.html
https://harmoniccode.blogspot.com/…s-steel.html

No to asi jo, ale ktere?
V tom kodu, co tu dal gna je
var teplota = parseInt(this.responseText);
Tam už se stahuje teplota s jedním desetiným čislem  21.2,25,6,42.5, atd

Tak proč si to přidava tu nulu?

#14 Kit
Tam je napsane.
Funkce Math.round() vrací hodnotu čísla zaokrouhleno na nejbližší celé číslo.
Nevim, zda jsem to dobře vysvětlil, co bych chtěl.

Připojen obráze
Z toho souboru shm/teplota_kotel si to taha  teplotu na jedno desetine čislo 32.7 ale
vykresluje to na 2 desetiná čisla 32.70

Děkují moc   

Je tam ale nějaký problem.

Ten orginal, co jsem tu dal ukazuje na 2 desetina čisla, třeba  54.45.

V souboru teplota_kotel mám jedno 54.4 a zkoučel jsem i vytvořit nový subor teplota_kotel1 a dal do toho 54.45

Když se spustí to vykreslovaní, je to ok.

Ale když se zastaví, zustane hodnota zaokrouhlena 54.00

To se řekne nastav   

O to se už snažim dlouho,  lama.

To že by do toho stačilo přidat tu moji funkci function nactiKotel() vim ale nějak to nzvladam.

I ten spodní skript mi psal kamoš

Ja to našel tady  https://github.com/…eries-Canvas

Nepomohl by jste lamě   

<!DOCTYPE html>
<html manifest="demo.manifest"><head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
    <meta charset="utf-8">
    <title>Canvas Steel</title>
</head>
<body onload="init()" style="background-color:#84a5ed">
    <table>
        <tbody><tr>
            
              
              <canvas id="canvasLinear7" width="140" height="320"></canvas>  
                
                
            </td>
        </tr>
        
        </tbody>
    </table>
    
	<script>
   
   

    function init() {
        

        

        // Define value gradient for bargraph
        var valGrad = new steelseries.gradientWrapper(  0,
                                                        100,
                                                        [ 0, 0.33, 0.66, 0.85, 1],
                                                        [ new steelseries.rgbaColor(0, 0, 200, 1),
                                                          new steelseries.rgbaColor(0, 200, 0, 1),
                                                          new steelseries.rgbaColor(200, 200, 0, 1),
                                                          new steelseries.rgbaColor(200, 0, 0, 1),
                                                          new steelseries.rgbaColor(200, 0, 0, 1) ]);      
     
        linear7 = new steelseries.Linear('canvasLinear7', {
                            width: 140,
                            height: 320,
                            gaugeType: steelseries.GaugeType.TYPE2,
                            titleString: "Thermometer",
                            unitString: "Unit",
                            threshold: 21,
                            lcdVisible: true
                            });
       

        // Start the random update
        
        setInterval(function(){ setRandomValue(linear7, 100); }, 9999);
     
    }

    function setRandomValue(gauge, range) {
        gauge.setValueAnimated(Math.random() * range);
    }
 
</script>
<script src="tween-min.js"></script>
<script src="steelseries-min.js"></script>
</body></html>

Je tam funkce setInterval, ktera vola funkci setRandomValue a ta gneruje hodnotu 0- 100 a podle ni se pohybuje teplota na budiku.

Potřeboval bych uplně odstranit tu funkci setRandomValue a misto ní načitat tu hodnotu ze souboru.

Ted si vypisuji teplotu jen jako hodnotu

<!DOCTYPE html>
<html>
<body>

<div id="demo">Žádná data :(</div>

<script>
function nactiKotel() {
  var xhttp = new XMLHttpRequest();
  xhttp.onreadystatechange = function() {
    if (this.readyState == 4 && this.status == 200) {
      document.getElementById("demo").innerHTML =
      this.responseText;
      
    }
  };
  xhttp.open("GET", "shm/teplota_kotel", true);
  xhttp.send();
}

nactiKotel();

setInterval(function () {
  nactiKotel();
}, 10000);
</script>

</body>
</html>

Takže žadný editor mi to nesformatuje?

Zdar.

Nějaký jednoduchý PHP a JS jsem si už občas napsal, ale toto je pro mně uplně něco noveho.

Muže mi někdo vysvětlit, proč, když to otevřu, je to jen na jednom řadku?

http://leteckaposta.cz/553284432
http://leteckaposta.cz/881529329

PS: Nepomohl by někdo?

@ MilanL ses asi netrefil do spravneho topiku, ne?

Zdravím.

Někak nemohu přijit jak na to.
Hups na plochu  a nastavit Height a Width na 24.
Dam přidat a vložim obrazek 24x24.
Pak nove rozlišení a dam 45.
Pak jsem zkoušel  přidat i  přidat vice rozlišení.a vložil obrazek 45 x 45

ImageList.GetBitmap ( 0 , Image1.Picture . Bitmap ) ;

Mužu do image vložit jakykoliv a ma rozlišení 24x24

https://postimg.cc/G9PDJPTt

Co dělam špatně?

Tu to řeši taky
https://forum.lazarus.freepascal.org/index.php?…
OK so I had to make the swap file 1024 MB.
Nepomohlo.

Zdravím.
Na nove raspi jsem nainstaloval lazarus 2.0.0.

sudo apt-get install fpc
sudo apt-get install lazarus

Fungovat funguje a zdrojak mi i zkompiluje a spusti.
Když však chci doinstalovat par baličku tak mi to vyhodi.lazarus.pp(1,1) Fatal: Nelze najít fpdebug.

install/uninstall packages a není nainstalovan, ale je tam v nabidce.
Když ho přesunu vlevo a pak uložit a znovu sestavit IDE, vyskoči to same.
lazarus.pp(1,1) Fatal: Nelze najít fpdebug

Jak tedy nainstalovat ten baliček, když potřebuje k instalaci sam sebe?

Jsem k tomu heblu našel i dokumentaci a je tam popsana i komunikace.

6. COMMUNICATION STRINGS
7. COMMUNICATION CONTROLS

https://www.vetek.se/Dynamics/Documents/543cef61-c61d-4fdb-b350-f7d6b7fdb100/TECH_MAN_ENG_DFW_v4.pdf

mimrod007@seznam.cz

Se omliuvám, zařizení je v prací a ja jsem poctívý zaměstnanec a dodržují pracovní dobu   

Mně ještě napadlo zkusit ten lazarus.
Připijít k portu tu komponentu LazSerial, odeslat ty data,odpojít, připojit se jen přes synapse a zkusit načist data.

Pokud to tak pujde, měl bych zjistít, zda je problem v odesilaní, nebo ve čtení

#10 MilanL
Ne, problem je u mně.

Přes lazarus použivám komponentu LazSerial, která použivá unity od synapse.
https://github.com/zbyna/LazSerial

LazSerial1.WriteData(#$52#$0d#$0a);
A normalně to je funkční a i přichozí data přijimám.

A takto to mám nastavene
http://img24.cz/…58700582.png

Děkují moc.

Řeším komunikací s digitální váhou pro nákladní automobily, která je u kámoše na firmě.
Jezdím tam 2X týdně, takže až tam pojedu, vyzkouším (pondělí).

Muže mi někdo vysvětlit toto.

Toto je funkční

<!DOCTYPE html>
<html>
<body>
   
<div id="shm/teplota_kotel" class="data">Žádná data :(</div>

<script>
function nactiData() {
  var data = document.getElementsByClassName("data");

  for (var i = 0; i < data.length; i++) {
    var soubor = data[i].getAttribute("id")
   
    var xhttp = new XMLHttpRequest();
    xhttp.onreadystatechange = function() {
      if (this.readyState == 4 && this.status == 200) {
        document.getElementById(soubor).innerHTML =
        this.responseText;
      }
    };
    xhttp.open("GET", soubor, true);
    xhttp.send();
  }
}

nactiData();

setInterval(function () {
  nactiData();
}, 10000);
</script>

</body>
</html>

Když tam však přidam další tak funkčví vždý ten poslední.

<div id="shm/teplota_koupelna" class="data">Žádná data :(</div>
<div id="shm/teplota_kotel" class="data">Žádná data :(</div>
<div id="shm/teplota_voda" class="data">Žádná data :(</div>
<div id="shm/teplota_pokoj" class="data">Žádná data :(</div>

Samostatně je funkční každy

#10 peter
Tam níc nevidím.

#7 gna
Už jsem psal, že JS nemůže ten soubor číst přímo.

To jsem pochopil, já chci použit ten AJAX.
Bych chtěl použít ten přiklad, co jste tu dál.
Ten však volá php stránku   url:'teplota.php',
Bych chtěl volat přímo ten txt soubor přes ten AJAX "/dev/shm/teplota_kotel.txt" a s něho tu hodnotu číst.
https://www.w3schools.com/…ttp_send.asp

Tedy misto toho url:'teplota.php' použít
xhttp.open("GET", "/dev/shm/teplota_kotel.txt", true);

Zkouším ale nějak se nedaří

Tak to je pro mě jednodušší ten první přiklad.
Ještě prosba k tomu prvnímu přikladu.
Když vytvořím soubor teplota.php a vněm dam vypisovat tu teplotu přes echo, tak to funguje, jelikož ten ajax si ho s něho načitá.
 url:'teplota.php',
 
Mohl by jste mi ho upravit tak, aby tu hodnotu načítal přímo s toho textaku?
Tak jak je to v tom druhem přiklad 
xhttp.open("GET", "ajax_info.txt", true);
 
Tedy
xhttp.open("GET", "/dev/shm/teplota_kotel.txt", true);
 
Děkjí.

Dobrý den, bych chtěl poprosit o pomoc ty zkušenější.
Když mám na raspi text soubory, a v každém je jen jeden řádek s teplotou, třeba 68.8
/dev/shm/teplota_kotel

Bych tu teplotu chtěl vypisovat na mém webu.
Web server běží také na raspi.
Přes PHP jsem to už zvládl.
Bych ale chtěl, aby se teplota sama třeba co 10 vteřin aktualizoval.
Jsem našel na netu info že se to děla přes java script.
Nepomohl by někdo, nebo alespoň nasměrovat na nějaký jednoduchý přiklad.
Děkují.

Zdravím.
Nemohu přijít na to jak povolit čísla s desetinou čárkou.
Poradí někdo?

12,2
12,44
123,12
http://helpcentral.componentone.com/…ty.htm123,12

Klucí, co dělam špatně?

procedure TForm1.Button2Click(Sender: TObject);
var
Row: Integer;
begin
  if StringGrid1.RowCount = 1  then
                begin
                  StringGrid1.Cells[1, 0]:='test';
                end
                else
                  Row := StringGrid1.RowCount;
                  StringGrid1.RowCount := Row + 1;
                  StringGrid1.Cells[1, Row]:='test';
                  StringGrid1.Row := Row;
                end;

Účelem je mít StringGrid s jedním řádkem a postupně ho krmit.
Děkují   

Mi jde o vytvoření seznamu uživatelů s heslem.
Jméno, příjmení, zašifrované heslo
Asi možná by byla vhodnější databáze ale zatím jsem v ní ještě nedělal.

String grid v hide mi připadá nejsnadnější
První sloupec zašifrované heslo,
Druhý sloupec jméno.
Třetí sloupec příjmení.

Da se to snadno uložit a pak zas načíst.
http://delphiexamples.com/…id2file.html

Pomoci smyčky for mužů řádky projíždět a porovnávat hesla.

Zdar tu všicí.

Není náhodou komponenta jako ´ StringList s vice sloupcí?

Jak moc prasacké by bylo použít StringGrid v hide režimu?   

Zdravim.
Nějaky zdrojaček jak vytisknout data v něm i s tabulku.
Jsem toho už dost vyzkoušel ale vše bylo bez tabulky.

Ono to stačilo přimo v mem progranku uložít ne jako xls ale jako xlsx a exscel mlčí   

Zdravím.

Na netu je spousta funkčních přikladu.
Když však xls chci otevřit v exscelu vyskočí mi toto.
http://img24.cz/…34789795.png

Neda se to mějak pořešit?

Pujde to?

Na ploše jen label a do něj abych moh vypisovat třeba teplotu?

Dobrý den.

Mam PHP, kde použivám systenove přikazy. system, fopen,fwrite, fclose atd.
Přes terminal PHP stranku jako pi spustím.
Přes prohližeč ne.

failed to open stream: Permission denied

Jak na to, abyc to fungovalo přes prohližeč?

Tak to mi připadá ten muj zpúsob lepší   

#2 gna
Jsem to zkoušel pomocí te masky AND a nějak to nechapu   

0xaa je  10101010

Tedy jsou zaple bity 0x02,0x08.0x20,0x80.

Jak zjistím pomocí té masky, který bit je zaplý a který vyply?

0xaa je řetězec, takže si ho převedeme na integer a mame decimal 170

Zdravím.

Když mám Hexadecimal třeba  0x7f
Dovedu si to převest  do binari řetězce 01111111
A pak pomocí copy nebo MidStr zjistít stav jednotlivých bitu.

Jde to jednodušejí už s 0x7f třeba pomocí masky?

Vyřešeno, už fungujem   

#9 MilanL
Nejsou žadne kody.

Mam napsaný programek, který bych rad předělal, tak první zkouším a až nějake vlakno zprovozním, pak to teprve předělam.

Pokud pojede toto, budu max spokojen.
http://delphiexamples.com/…hthread.html

Tak celý problém s chýbovýmí hlaškami řeší toto.

http://forum.lazarus.freepascal.org/index.php?topic=18470.0

Program jde spustít bez chyby jak s tým BeginThread tak i s tým pruhým přikladem.

Problem však je, že se vlakno nespustí.

Tak jsem zkusil toto.a pod win v delphi i lazarusu ok

http://delphiexamples.com/application/appsynchthread.html

V linuxu do uses {$ IFDEF Unix} cthreads, cmem , {$ ENDIF}

vysledek RunError 211   

#4 KIIV
To jsem take našel a mělo by to vyřečít

uses
  {$ IFDEF Unix} cthreads, cmem , {$ ENDIF}
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls; 

projekt vyvolal vyjimku třidy RunError 211