mojaSymfonia FORUM
https://forum.mix-soft.pl/

Symfonia - obrazek pod oknem notatki
https://forum.mix-soft.pl/viewtopic.php?f=2&t=5298		 Strona 1 z 1
Autor:  havo [ 2013-11-13, 10:53 ]
Tytuł:  Symfonia - obrazek pod oknem notatki
Witam,
w dniu dzisiejszym inny problem, mianowicie, jak widać na skanie załączonym poniżej - chciałbym umieścić logo ERIF/kod QR pod notatką na sztywno, tj. by pojawiało się zawsze pod ową notatką (odpowiednio po lewej i prawej stronie). Czy coś takiego jest w zasięgu możliwości w/w programu (oczywiście, zakładam, że zarówno erif jak i kod muszą być w formacie .bmp).

Plus, przy wydruku pdfa każdej faktury, całość jest minimalnie przycięta z lewej strony (czego nie widać na obrazie poniżej) - pytanie jak przesunąć całość o te 1-2-3 mm.

Pozdrawiam, havo.

Załączniki:
1.jpg
1.jpg [ 57.38 KiB | Przeglądany 2953 razy ]
Autor:  rafal [ 2013-11-13, 15:01 ]
Tytuł:  Re: Symfonia - obrazek pod oknem notatki
Grafikę na dokumencie możesz umieścić analogicznie do wiadomości
[Handel Premium 2008.c] Podpis osoby sprzedającej -> viewtopic.php?f=2&t=1155

W raporcie Raporty -> Dokumenty -> Dokumenty sprzedaży -> Dokument VAT -> Dokument VAT I

:szukaj ZNAJDŹ
Kod:
Notatka()


:wstaw_pod WSTAW POD
Kod:
print lf
bmp = Bitmap 200,150, "c:\\qrcode.bmp"
Bitmap #bmp


Jeżeli qrcode ma być wartością zmienną plik z kodem możesz generować przy drukowaniu faktury za pomocą poniższego skryptu

Kod:
   dispatch sc
   string sVB

   sc = "MSScriptControl.ScriptControl.1"
   sc.Language = "VBScript"

   sVB = "Set http = CreateObject(\"Microsoft.XMLHTTP\") "+lf
   sVB += "http.Open \"GET\", \"https://chart.googleapis.com/chart?cht=qr&chs=200&chl=mojaSymfonia.pl\", False "+lf
   sVB += "http.Send "+lf

   sVB += "set oStream = createobject(\"Adodb.Stream\") "+lf

   sVB += "Const adTypeBinary = 1 "+lf
   sVB += "Const adSaveCreateOverWrite = 2 "+lf
   sVB += "Const adSaveCreateNotExist = 1 "+lf

   sVB += "oStream.type = adTypeBinary "+lf
   sVB += "oStream.open "+lf
   sVB += "oStream.write http.responseBody "+lf

   sVB += "oStream.savetofile \"c:\qrcode.bmp\", adSaveCreateOverWrite "+lf

   sVB += "oStream.close "+lf

   sVB += "set oStream = nothing "+lf
   sVB += "Set http = Nothing "+lf

   sc.ExecuteStatement( sVB )


Załącznik:
qr.png
qr.png [ 899 bajtów | Przeglądany 2943 razy ]


Wadą tego rozwiązania jest to, że musisz być Online przy drukowaniu dokumentów.
Ale to, też można rozwiązać. W internecie jest dużo bezpłatnych narzędzi do kodów
(np. http://sourceforge.net/projects/zint/ - który można uruchamiać w batch)
Autor:  havo [ 2013-11-19, 10:58 ]
Tytuł:  Re: Symfonia - obrazek pod oknem notatki
Witam,
dziękuję za w/w porady - niezwykle pomocne. Kod QR nie musi być generowany, chodzi nam o stały kod prowadzący do naszej strony www. Mam natomiast pytanie, jak rozmieścić dwa obrazki (tak jak na rysunku - jeden po lewej drugi po prawej stronie, na tej samej wysokości?)
Autor:  rafal [ 2013-11-19, 13:21 ]
Tytuł:  Re: Symfonia - obrazek pod oknem notatki
Kod:
print at 100,100;""
int bmp = Bitmap 200,150, "c:\\qrcode.bmp"
Bitmap #bmp
print at 1000,100;""
Bitmap #bmp
Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/