delphi.si

Pozdravljeni. Z naslednjo kodo brez težav izpišem BAR CODO128. Nikakor pa ne pogruntam QRCode. Lp var Myprinter : TRawPrinter; oldprinter : TPrinter; Printdialog1 : TPrintDialog; begin Printdialog1 := TPrintDialog.Create(nil); MyPrinter:=TRawPrinter.Create; oldprinter:=setprinter(MyPrinter); try if ...

Uporabljam BlueTooth termični tiskalnik. Tiskam direktno v tisklanik -RAW printing, ker drugače, prek bluetootha, tiska počasi. Vse dela lepo, ustavi se pri QRcodi. Tiskalnik uporablja standardne EPSON(ESC/POS) komande. Mi lahko kdo pomaga, kako poslati tiskalniku pravilno ESC komando za tiskanje QR...

Pozdravljeni, jaz pa dobivam napako pri postu s idhttp unsupported encoding, oz unsupported media type Ali ve kdo kaj bi bilo lahko narobe. lp s Dodaj spodnjo kodo. IdHTTP1.Request.ContentType := 'text/xml;charset=UTF-8'; IdHTTP1.Request.Connection := 'KeepAlive'; IdHTTP1.Request.CustomHeaders.Add(...

Programiram v delphi 7, indy 10 Natsvaitve pa so: IdSSLIOHandlerSocketOpenSSL1.Port := 9002; IdSSLIOHandlerSocketOpenSSL1.Host := 'blagajne-test.fu.gov.si'; IdSSLIOHandlerSocketOpenSSL1.Destination := 'blagajne-test.fu.gov.si:9002'; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.RootCertFile := '.\test-tls...

OK, povezava uspela s pomočjo idTCPClient in IdSSLIOHandlerSocketOpenSSL komponente. Zdaj pa naprej. :) Strežnik javil: SSL status: "before/connect initialization" SSL status: "before/connect initialization" SSL status: "SSLv3 write client hello A" SSL status: "SSLv3 read server hello A" SSL status:...

Pozdravljeni. Na tem področju sem čisti začetnik. Želim vzpostativi TLS sejo s testnim okoljem https://blagajne-test.fu.gov.si:9002/v1/cash_registers. Gre za davčno potrjevanje računov. Prosim, če mi lahko kdo pomaga ter zapiše osnove za Indy10 za vzpostavitev TLS1.2 povezave. Kako nato komuniciraš ...

Najlepša hvala za pomoč. Zanesljivo deluje. In kaj je bila težava pri meni. Uporabil sem FLOAT tip za variabilo, ki vrne rezultat. SET TERM ^ ; CREATE OR ALTER PROCEDURE TMP003 RETURNS (Result FLOAT) AS BEGIN Result = cast(1 as decimal(18,9))/cast(3 as decimal(18,9)); END ^ EXECUTE PROCEDURE TMP003;...

Še nekaj
Če zaženem select stavek: dobim pravilni rezultat 0,333333333333333

Če zadevo vključim v PROCEDURO, je rezultat napačen

Lp

Pozdravljeni. Uporabljam FIREBIRD 2.5 in imam težavo s pravilnim izračunom količnika pri preprostem deljenju npr. 1/3. Rezultat je zgolj aproksimacija pravega rezultata. Količnik, ki ga dobim je 0,333333343267441 pravilni rezultat pa je 0,333333333333333. Količnik nato uporabim pri nadljevanju izvaj...

Hvala.

Ampak datoteka se zmanjša samo za dober 1 MB. Kaj lahko še storim?

Lp