http://wszelaki.pl

Procedury biblioteki WSBC.DLL

Biblioteka WSBC.DLL udostępnia nastepujące procedury:

DrawBarCode - rysuje kod kreskowy

UnlockBarCodes - odblokowuje zabezpieczenie czasowe biblioteki

DrawBarCode

Rysuje kod kreskowy w kontekście urządzenia (ekranu lub drukarki) z uwzględnieniem przekazanych parametrów kodu kreskowego.

Deklaracja procedury DrawBarCode

procedure DrawBarCode(pmDC: HDC; pmParams: OleVariant; pmData: OleVariant);

Argumenty wywołania procedury DrawBarCode

pmDC Kontekst urządzenia, w którym zostanie narysowany kod kreskowy, najczęściej jest to kontekst ekranu lub drukarki.
Kontekst urządzenia można uzyskać jedną z funkcji dostępnych w Windows API (CreateDC, GetDC).
Programiści używający Delphi mogą przekazać jako kontekst urządzenia uchwyt Handle klasy TCanvas, np. PaintBox1.Canvas.Handle,
a użytkownicy Visual Basic uchwyt hDC, np.: PictureBox.hDC.
pmParams Parametry rysowania kodu kreskowego. Parametry powinny zostać przekazane jako łańcuch tekstowy.
Każdy parametr powinien składać się z nazwy i wartości rozdzielonych znakiem równości '=', np.: Scale=100.
Poszczególne parametry wraz z wartościami powinny być od siebie oddzielone znakiem średnika ';', np.: Code=EAN128A;Scale=100;.
Dostępne parametry rysowania, ich dopuszczalne zakresy wartości oraz wartości domyślne
zostały szczegółowo opisane tutaj. Jeśli wartość tego argumentu będzie pustym łańcuchem,
to kod kreskowy zostanie narysowany z użyciem domyślnych parametrów rysowania.
pmData Wartość kodu kreskowego podana jako łańcuch tekstowy. Wartość kodu zostanie wyświetlona w postaci kresek.
Wartością kodu najczęściej jest ciąg cyfr, ale dla niektórych kodów dopuszczalne są również znaki alfanumeryczne.

Przykład wywołania procedury DrawBarCode

DrawBarCode(pmCanvas.Handle,'Code=EAN128A;Scale=100;','1234567890');

Powyższe wywołanie spowoduje narysowanie kodu EAN-128A z wartością 1234567890 w skali 1:1.

UnlockBarCodes

Odblokowuje zabepieczenie czasowe biblioteki WSBC.DLL. Biblioteka jest zabezpieczona czasowo, co oznacza, że jej wykorzystywanie bez zarejestrowania jest możliwe tylko przez pewien okres czasu. Procedura UnlockBarCodes usuwa to ograniczenie. Jako parametry tej procedury należy podać cztery łańcuchy tekstowe uzyskane od dostawcy biblioteki po jej zakupie.

Deklaracja procedury UnlockBarCodes

procedure UnlockBarCodes(<<pmCode1>>,pmCode2,pmCode3,pmCode4: OleVariant);

Argumenty wywołania procedury UnlockBarCodes

pmCode1 Numer seryjny użytkownika podany jako łańcuch znakowy, np.: '123456789'.
pmCode2 Nazwa skrócona użytkownika podana jako łańcuch znakowy, np.: 'WSZELAKI Software'.
pmCode3 Numer NIP użytkownika podany jako łańcuch znakowy, np.: '123-456-78-90'.
pmCode4 Kod aktywacyjny uzyskany od dostawcy biblioteki po jej zakupie, podany jako łańcuch znakowy, np.: '26ADD5F67985F691'.

Przykład wywołania procedury UnlockBarCodes

UnlockBarCodes('123456789', 'WSZELAKI Software', '123-456-78-90', '26ADD5F67985F691');